math.cube on complex, imaginary part

Time bar (total: 2.4s)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
100%99.9%0%0.1%0%0%0%1
Compiler

Compiled 21 to 13 computations (38.1% saved)

sample977.0ms (41.4%)

Memory
25.0MiB live, 1 015.0MiB allocated; 342ms collecting garbage
Samples
736.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 462.0ms
ival-mult!: 407.0ms (88% of total)
ival-add!: 36.0ms (7.8% of total)
ival-sub!: 17.0ms (3.7% of total)
adjust: 2.0ms (0.4% of total)
Bogosity

preprocess81.0ms (3.4%)

Memory
-13.6MiB live, 31.4MiB allocated; 12ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
036118
1137104
2456102
3132968
4524168
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶80.7%
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Symmetry

(abs x.re)

(negabs x.im)

Compiler

Compiled 22 to 22 computations (0% saved)

series14.0ms (0.6%)

Memory
18.3MiB live, 18.3MiB allocated; 0ms collecting garbage
Counts
11 → 29
Calls
Call 1
Inputs
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im)
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re)
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (- (pow x.re 2) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (+ (* x.re x.im) (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* x.re x.im) #s(hole binary64 (* x.im x.re)))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2))))))))
Calls

6 calls:

TimeVariablePointExpression
3.0ms
x.im
@-inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re))
2.0ms
x.im
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re))
2.0ms
x.im
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re))
2.0ms
x.re
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re))
2.0ms
x.re
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re))

rewrite77.0ms (3.2%)

Memory
-3.5MiB live, 41.1MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0103662
0113592
0510576
Stop Event
1×iter-limit
1×iter-limit
1×iter-limit
1×unsound
1×iter-limit
Counts
40 → 78
Calls
Call 1
Inputs
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im)
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re)
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (- (pow x.re 2) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (+ (* x.re x.im) (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* x.re x.im) #s(hole binary64 (* x.im x.re)))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2))))))))
Outputs
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))) (-.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))))
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
(fma.f64 x.im (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
(fma.f64 x.re (*.f64 (+.f64 x.im x.im) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(-.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(+.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(+.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 x.im (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.re x.re (*.f64 (neg.f64 x.im) x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 x.re (*.f64 (+.f64 x.im x.im) x.re))
(*.f64 (+.f64 x.im x.im) x.re)
(*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))
(*.f64 (*.f64 x.im x.re) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)) (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (-.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.re) (*.f64 x.im x.re) (-.f64 (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)) (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)))))
(fma.f64 x.im x.re (*.f64 x.im x.re))
(fma.f64 x.re x.im (*.f64 x.im x.re))
(-.f64 (*.f64 x.im x.re) (*.f64 (neg.f64 x.im) x.re))
(+.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))
(*.f64 x.im x.re)
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(*.f64 x.re x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (fma.f64 (*.f64 x.re x.re) x.im (neg.f64 (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im)))
#s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.im) (* x.im x.re)) (*.f64 (+.f64 x.im x.im) x.re))
#s(approx (* x.re x.im) (*.f64 x.im x.re))
#s(approx (* x.re x.im) (*.f64 x.im x.re))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x.im (/.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 x.re x.re))) x.im) (*.f64 x.re x.re)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (+.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 x.re x.re)) x.im) (*.f64 x.re x.re)))
#s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 (+.f64 (/.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im))) x.im))
#s(approx (- (* x.re x.re) (* x.im x.im)) (fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (-.f64 (*.f64 #s(literal 3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -3 binary64) #s(literal 1 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (neg.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))

eval6.0ms (0.3%)

Memory
7.4MiB live, 7.4MiB allocated; 0ms collecting garbage
Compiler

Compiled 659 to 281 computations (57.4% saved)

prune5.0ms (0.2%)

Memory
5.4MiB live, 5.4MiB allocated; 0ms collecting garbage
Pruning

8 alts after pruning (8 fresh and 0 done)

PrunedKeptTotal
New61869
Fresh000
Picked101
Done000
Total62870
Accuracy
95.5%
Counts
70 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶13.0%
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))))
80.7%
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) #s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
50.4%
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
▶63.3%
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
▶86.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
▶50.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
50.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re)))
▶57.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Compiler

Compiled 292 to 248 computations (15.1% saved)

series83.0ms (3.5%)

Memory
5.3MiB live, 51.6MiB allocated; 4ms collecting garbage
Counts
37 → 203
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
(*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im)
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))
#s(literal 3 binary64)
(*.f64 x.re x.re)
x.re
(neg.f64 (*.f64 x.im x.im))
(*.f64 x.im x.im)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (*.f64 x.im x.im) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im)
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im)
#s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im)))
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re)
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))))
(+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64)))
(pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(-.f64 x.re x.im)
(pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 x.im x.im)
(fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))))
(-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))
(*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (* 3 (* x.re x.re)) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* 3 (* x.re x.re)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (- (pow x.re 2) (pow x.im 2))))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (+ (* x.re x.im) (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* x.re x.im) #s(hole binary64 (* x.im x.re)))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (+ (* x.re (- (+ (/ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)) (/ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (pow x.im 3))) (+ (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 4)) (/ (* (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 6)))))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3)))))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (pow x.im 9))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (pow x.im 9))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (* x.re (+ x.im (* -1 x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im x.re) (* x.im (+ x.im (* -1 x.im))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.im))
#s(approx (+ x.re x.im) #s(hole binary64 (+ x.im x.re)))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (- x.re x.im) #s(hole binary64 (- x.re x.im)))
#s(approx (pow (* (* (+ x.im x.im) x.re) x.re) 3) #s(hole binary64 (* 8 (* (pow x.im 3) (pow x.re 6)))))
#s(approx (* (* (+ x.im x.im) x.re) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (* (+ x.im x.im) x.re) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))))) (pow x.im 6))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (+ (* x.re (+ (* x.re (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (+ (* x.re (+ (* x.re (- (+ (* x.re (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (* -2 (pow x.im 4)))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* 2 (* (pow x.im 4) (pow x.re 2)))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (* -2 (* (pow x.im 2) (* x.re (+ x.im (* -1 x.im))))) (* -2 (pow x.im 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (* x.re (- (* x.re (- (* 4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* -2 (pow x.im 4))))))
#s(approx (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* 4 (* (pow x.im 2) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* -2 (* (pow x.im 4) (pow x.re 2)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 2) (+ (* -2 (pow x.im 4)) (* 2 (* (pow x.im 2) (* x.re (+ x.im (* -1 x.im)))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 2) (+ (* -2 (pow x.im 4)) (* x.re (+ (* 2 (* (pow x.im 2) x.re)) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (/ (* (pow x.re 2) (+ (* 8 (pow x.im 3)) (pow x.im 3))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* x.re (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (* (pow x.re 2) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* x.re (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* (pow x.re 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (* (pow x.re 2) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* x.re (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (/ (* (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (* (pow x.re 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))) (* (pow x.re 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (pow x.im 2) (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (+ (* 8 (pow x.im 3)) (pow x.im 3)))) (* (pow x.re 3) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (pow x.im 3)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (pow x.im 3))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (pow x.re 3)) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (pow x.re 6))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (pow x.re 3)) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.re))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (- x.re x.im) #s(hole binary64 x.re))
#s(approx (- x.re x.im) #s(hole binary64 (* x.re (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)))) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2))))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.re 3)) (pow x.im 2))))) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2))))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (* 4 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 4 (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (* 4 (pow x.im 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2)))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* 2 (* (pow x.im 2) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 4) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) x.re)) (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (* -1 (/ (- (* -1 (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) x.re))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) x.re)) (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (* -1 (/ (- (* -1 (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (/ (* (- (* -1 (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (pow x.im 2) (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (+ (* 8 (pow x.im 3)) (pow x.im 3)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) x.re))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) x.re))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) x.re)) (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) x.re) (pow x.im 3))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) x.re)) x.re)) (+ (* 8 (pow x.im 3)) (pow x.im 3))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) x.re)) x.re))) x.re)) (+ (* 8 (pow x.im 3)) (pow x.im 3))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) x.re)) x.re)) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) x.re)) x.re))) x.re)) (pow x.im 3)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (+ (* -1 (* x.im (+ x.im (* -1 x.im)))) (/ (pow x.im 3) x.re)) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* -1 (+ x.im (* -1 x.im))) (/ (pow x.im 2) x.re)) x.re))))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.re (- (/ x.im x.re) 1)))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (+ (* 4 (pow x.im 2)) (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (+ (* 4 (pow x.im 2)) (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) x.re)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (* -2 (pow x.im 4))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (+ (* 4 (pow x.im 2)) (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (* -2 (/ (pow x.im 4) x.re)) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (* 4 (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* 2 (/ (pow x.im 4) x.re))) x.re)) (* 2 (pow x.im 2))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (neg (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (neg (* (* x.im x.im) x.im)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* x.im x.im) x.im) #s(hole binary64 (pow x.im 3)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (/ (* x.im (+ (* 8 (pow x.re 6)) (pow x.re 6))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (* -1 (/ (pow x.re 3) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (pow x.re 3) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (+ (* 8 (pow x.re 6)) (pow x.re 6))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (+ (/ (* (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))) (+ (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (pow x.re 6)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (+ (* x.im (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (pow x.re 6))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (+ (* x.im (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (+ (* x.im (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2))))
#s(approx (- x.re x.im) #s(hole binary64 (+ x.re (* -1 x.im))))
#s(approx (+ x.im x.im) #s(hole binary64 (* 2 x.im)))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (+ (* x.im (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (+ (* x.im (- (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (+ (* x.im (- (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (- (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (+ (* -2 x.re) (* 2 x.re))))) (* -2 (pow x.re 2)))))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 2) (- (* 4 (pow x.re 4)) (* 2 (pow x.re 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -2 (* x.im (* (pow x.re 2) (+ x.re (* -1 x.re))))) (* 4 (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (* x.im (- (* 2 (* x.im (pow x.re 2))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))))) (* 2 (pow x.re 4))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* x.im (* (pow x.re 2) (+ x.re (* -1 x.re))))) (* 2 (pow x.re 4))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (pow x.re 4)) (* x.im (+ (* -2 (* x.im (pow x.re 2))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) (+ 1 (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) (pow x.im 2))) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) (+ 1 (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (pow x.im 3))) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (pow x.im 3)) (/ (* (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow x.im 3))))))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 9) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) 1))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) 1))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* x.im (- (/ x.re x.im) 1))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* 2 (/ x.re x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))))) (* -2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* -2 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (* 2 (/ (pow x.re 3) (pow x.im 3))))))))) (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) (pow x.im 3))))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* 4 (/ (pow x.re 4) (pow x.im 2))) (+ (* -2 (pow x.re 2)) (+ (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (/ (pow x.re 4) (pow x.im 2)))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (pow x.re 2)) (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (pow x.re 2)) (+ (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (/ (pow x.re 4) (pow x.im 2))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -3 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (- (+ (* -2 (pow x.re 2)) (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))))) (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* (+ (* -2 x.re) (* 2 x.re)) (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))))))) x.im))) (+ (* -2 x.re) (* 2 x.re))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (* -1 (/ (- (+ (* -1 (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (+ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))))) (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* (+ (* -2 x.re) (* 2 x.re)) (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re)))))))) (* (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))))))) x.im)))) (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* (+ (* -2 x.re) (* 2 x.re)) (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))))))) x.im))) (+ (* -2 x.re) (* 2 x.re))) x.im)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) x.im)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) x.im))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) x.im))) x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -1 (/ x.re x.im)) (/ x.re x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (/ (pow x.re 2) x.im)) x.im)))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (+ (* -1 x.re) (* -1 (/ (pow x.re 2) x.im)))) x.im)) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.im (+ 1 (* -1 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) x.im)) (* 2 (pow x.re 2)))) (* -2 (pow x.re 2))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* -1 (/ (- (* -1 (/ (- (* 4 (pow x.re 4)) (* 2 (pow x.re 4))) x.im)) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (pow x.re 2)) (* -1 (/ (+ (* -2 (/ (pow x.re 4) x.im)) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) x.im))))))
Calls

6 calls:

TimeVariablePointExpression
25.0ms
x.re
@-inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (pow (* (* (+ x.im x.im) x.re) x.re) 3) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))
13.0ms
x.re
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (pow (* (* (+ x.im x.im) x.re) x.re) 3) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))
10.0ms
x.im
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (pow (* (* (+ x.im x.im) x.re) x.re) 3) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))
9.0ms
x.im
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (pow (* (* (+ x.im x.im) x.re) x.re) 3) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))
8.0ms
x.re
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (pow (* (* (+ x.im x.im) x.re) x.re) 3) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))

rewrite244.0ms (10.3%)

Memory
-7.0MiB live, 194.0MiB allocated; 43ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0125217142
0131013170
0843012660
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
240 → 347
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
(*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im)
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))
#s(literal 3 binary64)
(*.f64 x.re x.re)
x.re
(neg.f64 (*.f64 x.im x.im))
(*.f64 x.im x.im)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (*.f64 x.im x.im) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im)
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im)
#s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im)))
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re)
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))))
(+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64)))
(pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(-.f64 x.re x.im)
(pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 x.im x.im)
(fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))))
(-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))
(*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (* 3 (* x.re x.re)) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* 3 (* x.re x.re)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (- (pow x.re 2) (pow x.im 2))))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (+ (* x.re x.im) (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* x.re x.im) #s(hole binary64 (* x.im x.re)))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (+ (* x.re (- (+ (/ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)) (/ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (pow x.im 3))) (+ (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 4)) (/ (* (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 6)))))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3)))))) (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (pow x.im 9))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (pow x.im 9))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (* x.re (+ x.im (* -1 x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im x.re) (* x.im (+ x.im (* -1 x.im))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.im))
#s(approx (+ x.re x.im) #s(hole binary64 (+ x.im x.re)))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (- x.re x.im) #s(hole binary64 (- x.re x.im)))
#s(approx (pow (* (* (+ x.im x.im) x.re) x.re) 3) #s(hole binary64 (* 8 (* (pow x.im 3) (pow x.re 6)))))
#s(approx (* (* (+ x.im x.im) x.re) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (* (+ x.im x.im) x.re) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))))) (pow x.im 6))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (+ (* x.re (+ (* x.re (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (+ (* x.re (+ (* x.re (- (+ (* x.re (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (* -2 (pow x.im 4)))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* 2 (* (pow x.im 4) (pow x.re 2)))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (* -2 (* (pow x.im 2) (* x.re (+ x.im (* -1 x.im))))) (* -2 (pow x.im 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (* x.re (- (* x.re (- (* 4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* -2 (pow x.im 4))))))
#s(approx (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* 4 (* (pow x.im 2) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* -2 (* (pow x.im 4) (pow x.re 2)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 2) (+ (* -2 (pow x.im 4)) (* 2 (* (pow x.im 2) (* x.re (+ x.im (* -1 x.im)))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 2) (+ (* -2 (pow x.im 4)) (* x.re (+ (* 2 (* (pow x.im 2) x.re)) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (/ (* (pow x.re 2) (+ (* 8 (pow x.im 3)) (pow x.im 3))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* x.re (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (* (pow x.re 2) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* x.re (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* (pow x.re 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (* (pow x.re 2) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (* x.re (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (/ (* (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (* (pow x.re 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (* (pow x.re 2) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))) (* (pow x.re 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (pow x.im 2) (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (+ (* 8 (pow x.im 3)) (pow x.im 3)))) (* (pow x.re 3) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (pow x.im 3)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (pow x.im 3))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (pow x.re 3)) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (pow x.re 6))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (pow x.re 3)) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.re))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (- x.re x.im) #s(hole binary64 x.re))
#s(approx (- x.re x.im) #s(hole binary64 (* x.re (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)))) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2))))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 4 (pow x.im 2)) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.re 3)) (pow x.im 2))))) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2))))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (* 4 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 4 (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (* 4 (pow x.im 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2)))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* 2 (* (pow x.im 2) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 4) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (pow x.im 2)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) x.re)) (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (* -1 (/ (- (* -1 (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) x.re))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) x.re)) (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (* -1 (/ (- (* -1 (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (/ (* (- (* -1 (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (* (pow x.im 2) (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (+ (* 8 (pow x.im 3)) (pow x.im 3)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) x.re))) (+ (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4)))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2)) (/ (* (- (* -1 (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))) x.re))) (/ (* (+ (* 8 (pow x.im 3)) (pow x.im 3)) (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))))) (pow (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))) 2))) x.re)) (+ (* 8 (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (pow x.im 3) (- (+ (* 4 (pow x.im 2)) (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* 8 (pow x.im 3)) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) x.re) (pow x.im 3))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) x.re)) x.re)) (+ (* 8 (pow x.im 3)) (pow x.im 3))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) x.re)) x.re))) x.re)) (+ (* 8 (pow x.im 3)) (pow x.im 3))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) x.re)) x.re)) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) x.re)) x.re))) x.re)) (pow x.im 3)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (+ (* -1 (* x.im (+ x.im (* -1 x.im)))) (/ (pow x.im 3) x.re)) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* -1 (+ x.im (* -1 x.im))) (/ (pow x.im 2) x.re)) x.re))))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.re (- (/ x.im x.re) 1)))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (+ (* 4 (pow x.im 2)) (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -2 (pow x.im 4))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (+ (* 4 (pow x.im 2)) (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) x.re)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (* -2 (pow x.im 4))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (+ (* 4 (pow x.im 2)) (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (- (* -2 (/ (pow x.im 4) x.re)) (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (* 4 (pow x.im 2))) (* 2 (pow x.im 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* 2 (/ (pow x.im 4) x.re))) x.re)) (* 2 (pow x.im 2))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (neg (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (neg (* (* x.im x.im) x.im)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* x.im x.im) x.im) #s(hole binary64 (pow x.im 3)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (/ (* x.im (+ (* 8 (pow x.re 6)) (pow x.re 6))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (* x.im (- (+ (* -1 (/ (pow x.re 3) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (pow x.re 3) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (+ (* 8 (pow x.re 6)) (pow x.re 6))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (+ (/ (* (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (+ (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))) (+ (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)) (/ (* (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))) (/ (* (+ (* 8 (pow x.re 6)) (pow x.re 6)) (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))) 2)))) (/ (pow x.re 6) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (pow x.re 6)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (+ (* x.im (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (pow x.re 6))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 3) (+ (* 8 (pow x.re 6)) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (+ (* x.im (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (+ (* x.im (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2))))
#s(approx (- x.re x.im) #s(hole binary64 (+ x.re (* -1 x.im))))
#s(approx (+ x.im x.im) #s(hole binary64 (* 2 x.im)))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (pow x.re 4)) (* 2 (pow x.re 4))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (+ (* x.im (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (+ (* x.im (- (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (+ (* x.im (- (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (- (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (+ (* -2 x.re) (* 2 x.re))))) (* -2 (pow x.re 2)))))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re)))))) (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 2) (- (* 4 (pow x.re 4)) (* 2 (pow x.re 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -2 (* x.im (* (pow x.re 2) (+ x.re (* -1 x.re))))) (* 4 (pow x.re 4))) (* 2 (pow x.re 4))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 4 (pow x.re 4)) (* x.im (- (* 2 (* x.im (pow x.re 2))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))))) (* 2 (pow x.re 4))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* x.im (* (pow x.re 2) (+ x.re (* -1 x.re))))) (* 2 (pow x.re 4))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (pow x.re 4)) (* x.im (+ (* -2 (* x.im (pow x.re 2))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) (+ 1 (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) (pow x.im 2))) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) (+ 1 (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (pow x.im 3))) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (pow x.im 3)) (/ (* (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))) (pow x.im 3))))))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 9) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) 1))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) 1))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* x.im (- (/ x.re x.im) 1))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* 2 (/ x.re x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))))) (* -2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* -2 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (* 2 (/ (pow x.re 3) (pow x.im 3))))))))) (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) (pow x.im 3))))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* 4 (/ (pow x.re 4) (pow x.im 2))) (+ (* -2 (pow x.re 2)) (+ (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (/ (pow x.re 4) (pow x.im 2)))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (pow x.re 2)) (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (pow x.re 2)) (+ (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (/ (pow x.re 4) (pow x.im 2))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -3 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (- (+ (* -2 (pow x.re 2)) (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))))) (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* (+ (* -2 x.re) (* 2 x.re)) (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))))))) x.im))) (+ (* -2 x.re) (* 2 x.re))) x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (* -1 (/ (- (+ (* -1 (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (+ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))))) (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* (+ (* -2 x.re) (* 2 x.re)) (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re)))))))) (* (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))) (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2)))))))) x.im)))) (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* (+ (* -2 x.re) (* 2 x.re)) (- (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -2 x.re) (* 2 x.re))))))) x.im))) (+ (* -2 x.re) (* 2 x.re))) x.im)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) x.im)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) x.im))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) x.im))) x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -1 (/ x.re x.im)) (/ x.re x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (/ (pow x.re 2) x.im)) x.im)))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (+ (* -1 x.re) (* -1 (/ (pow x.re 2) x.im)))) x.im)) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.im (+ 1 (* -1 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (* -2 (pow x.re 2))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) x.im)) (* 2 (pow x.re 2)))) (* -2 (pow x.re 2))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 4) (- (* -1 (/ (- (* -1 (/ (- (* 4 (pow x.re 4)) (* 2 (pow x.re 4))) x.im)) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* -2 (pow x.re 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (pow x.re 2)) (* -1 (/ (+ (* -2 (/ (pow x.re 4) x.im)) (* 2 (* (pow x.re 2) (+ x.re (* -1 x.re))))) x.im))))))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.f64 (neg.f64 x.im) x.im)) x.im))
(*.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.f64 (neg.f64 x.im) x.im)) x.im)
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (neg.f64 x.im) x.im)))))
(fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (neg.f64 x.im) x.im))
#s(literal 3 binary64)
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (neg.f64 x.im) x.im)
(*.f64 #s(literal -1 binary64) (*.f64 x.im x.im))
(*.f64 x.im (neg.f64 x.im))
(neg.f64 (*.f64 x.im x.im))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(*.f64 (*.f64 (neg.f64 x.im) x.im) x.im)
(*.f64 (*.f64 x.im x.im) (neg.f64 x.im))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (pow.f64 x.im #s(literal 3/2 binary64)) (pow.f64 x.im #s(literal 3/2 binary64)))
(*.f64 (*.f64 x.im x.im) x.im)
(*.f64 x.im (*.f64 x.im x.im))
(pow.f64 x.im #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im)
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)))))
(fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im)) (*.f64 (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re) (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re))) (-.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) (-.f64 (*.f64 (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re) (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re)) (*.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re)))))
(fma.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re))
(-.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (neg.f64 (fma.f64 x.re x.im (*.f64 x.im x.re))) x.re))
(+.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re))
(*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im)) x.im)
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (fma.f64 x.re x.im (*.f64 x.im x.re)) x.re)
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.im) (*.f64 x.re x.im)) (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (-.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.im) (*.f64 x.re x.im) (-.f64 (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)) (*.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)))))
(fma.f64 x.re x.im (*.f64 x.im x.re))
(-.f64 (*.f64 x.re x.im) (*.f64 (neg.f64 x.im) x.re))
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))) (fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))) (*.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))) (*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))
(fma.f64 (pow.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))
(fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))
(+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im))
(pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) #s(literal 3 binary64)))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 (+.f64 x.re x.im) (*.f64 (-.f64 x.re x.im) x.im))
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.re x.re (*.f64 (neg.f64 x.im) x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(/.f64 (fma.f64 (*.f64 x.re x.re) x.re (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 x.re x.re (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.im))))
(/.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 x.re x.re (fma.f64 x.im x.im (*.f64 x.re x.im))))
(/.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (+.f64 x.re x.im))
(-.f64 x.re x.im)
(*.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) x.re))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 3 binary64)))
(*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(literal 2 binary64) (*.f64 x.im (*.f64 x.re x.re)))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 x.im (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 x.im (*.f64 x.re x.re)))
(*.f64 (+.f64 x.im x.im) x.re)
(*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))
(fma.f64 x.im x.re (*.f64 x.im x.re))
(+.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))
(*.f64 #s(literal 2 binary64) x.im)
(/.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 x.im x.im))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 x.im x.im (-.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))
(+.f64 x.im x.im)
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im)) (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) (*.f64 x.im x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(fma.f64 (fabs.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (fabs.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(fma.f64 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 x.im (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(-.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re)) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re))) (fma.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re)))))
(fma.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) (*.f64 (+.f64 x.im x.im) x.re)) (*.f64 x.re x.re) (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (fabs.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 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) (*.f64 x.re (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(+.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re) (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re)
(*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) (*.f64 (+.f64 x.im x.im) x.re)) (*.f64 x.re x.re))
(*.f64 (fabs.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 (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(*.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 (+.f64 x.im x.im) x.re) (*.f64 x.re (*.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 2 binary64))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) x.re)) x.re)
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (fma.f64 (*.f64 x.im x.im) (neg.f64 x.im) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (fma.f64 (*.f64 x.im x.im) (neg.f64 x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im (*.f64 x.re x.re)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (* 3 (* x.re x.re)) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im (*.f64 x.re x.re))))
#s(approx (* 3 (* x.re x.re)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 x.im (*.f64 x.re x.re))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.im) (* x.im x.re)) (*.f64 (+.f64 x.im x.im) x.re))
#s(approx (* x.re x.im) (*.f64 x.im x.re))
#s(approx (* x.im x.re) (*.f64 x.im x.re))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 x.re (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 x.re (-.f64 (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 x.re (-.f64 (-.f64 (fma.f64 x.im #s(literal -3 binary64) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) x.im)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 x.im x.im)))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 x.re (-.f64 (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 x.re (-.f64 (-.f64 (fma.f64 x.im #s(literal -3 binary64) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (fma.f64 x.re (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) x.im)) (neg.f64 (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (/.f64 (-.f64 (-.f64 (fma.f64 x.im #s(literal -3 binary64) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) x.im)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))))) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im))))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) x.im)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 x.im x.im)))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (neg.f64 (pow.f64 x.im #s(literal 9 binary64))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (*.f64 x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.re (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 #s(literal 3 binary64) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.im #s(literal -3 binary64)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (*.f64 x.re (fma.f64 x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.re (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 #s(literal 3 binary64) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.im #s(literal -3 binary64)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (neg.f64 (pow.f64 x.im #s(literal 9 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (*.f64 x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.re (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 #s(literal 3 binary64) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.im #s(literal -3 binary64)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (*.f64 x.re (fma.f64 x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.re (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 #s(literal 3 binary64) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.im #s(literal -3 binary64)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 x.im (*.f64 x.re (*.f64 #s(literal 0 binary64) x.im)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 x.re (*.f64 x.im (+.f64 x.re (*.f64 #s(literal 0 binary64) x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (neg.f64 x.im) x.im (*.f64 x.re (*.f64 #s(literal 0 binary64) x.im))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (neg.f64 x.im) x.im (*.f64 x.re (+.f64 (+.f64 x.im x.re) (neg.f64 x.im)))))
#s(approx (+ x.re x.im) x.im)
#s(approx (+ x.re x.im) (+.f64 x.im x.re))
#s(approx (- x.re x.im) (neg.f64 x.im))
#s(approx (- x.re x.im) (-.f64 x.re x.im))
#s(approx (pow (* (* (+ x.im x.im) x.re) x.re) 3) (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))))
#s(approx (* (* (+ x.im x.im) x.re) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (* (+ x.im x.im) x.re) (*.f64 (+.f64 x.im x.im) x.re))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (fma.f64 x.re (fma.f64 x.re (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (fma.f64 x.re (fma.f64 x.re (fma.f64 x.re (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 x.re x.re)))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.re) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 x.re (fma.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 x.re x.re)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 x.re (*.f64 #s(literal 0 binary64) x.im))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im x.im) x.re (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal 0 binary64) x.im))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re)) (+.f64 x.im x.im)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im (*.f64 x.re x.re))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re)) (*.f64 #s(literal -3 binary64) x.im))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 3 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (-.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) (*.f64 x.re (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) (*.f64 x.re (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.im #s(literal -3 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (pow.f64 (*.f64 x.re (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) (*.f64 x.re (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.im #s(literal -3 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (pow.f64 (*.f64 x.re (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (fma.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (fma.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (fma.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.im #s(literal -3 binary64)))))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64))) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) x.re) (*.f64 (*.f64 x.im x.im) x.im)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) x.re) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.im #s(literal -3 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) x.re) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.im #s(literal -3 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) x.re) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) x.re) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.im #s(literal -3 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (fma.f64 x.im #s(literal -3 binary64) (+.f64 x.im x.im))) x.re) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.im #s(literal -3 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (/.f64 (*.f64 x.im (*.f64 #s(literal 0 binary64) x.im)) x.re))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 (+.f64 x.im (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) (/.f64 (*.f64 x.im (*.f64 #s(literal 0 binary64) x.im)) x.re))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (neg.f64 x.im) x.re) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (/.f64 x.im x.re)))))
#s(approx (+ x.re x.im) x.re)
#s(approx (+ x.re x.im) (*.f64 x.re (+.f64 #s(literal 1 binary64) (/.f64 x.im x.re))))
#s(approx (- x.re x.im) x.re)
#s(approx (- x.re x.im) (*.f64 x.re (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x.im) x.re))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.re) (*.f64 x.im x.im)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.re x.re)) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.re) (*.f64 x.im x.im))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.re x.re)) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.re) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 x.im x.im)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (*.f64 x.im x.im))))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (*.f64 x.im x.im)))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (*.f64 x.im x.im)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (*.f64 x.im x.im))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) x.re)) (*.f64 #s(literal 9 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) x.im))))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))) x.re))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) x.re)) (*.f64 #s(literal 9 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) x.im))))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) x.im))))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64))) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))))) x.re))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im)))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))) x.re))) (/.f64 (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) #s(literal 2 binary64)))) x.re)) (*.f64 #s(literal 9 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im))) x.re) (*.f64 (*.f64 x.im x.im) x.im)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) x.im))))) x.re))) x.re)) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) x.re))) x.re))) x.re)) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 x.im x.im) x.im)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im))) x.re) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) x.im))))) x.re))) x.re)) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 x.im (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.im)) (+.f64 x.im x.im))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) x.re))) x.re))) x.re)) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (neg.f64 (/.f64 (fma.f64 (neg.f64 x.im) (*.f64 #s(literal 0 binary64) x.im) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re)) x.re)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (/.f64 (*.f64 x.im x.im) x.re)) x.re)))))
#s(approx (+ x.re x.im) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64))))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 x.im x.re) #s(literal 1 binary64))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im))) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) x.re)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.re))) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))) x.re)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)))) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal 0 binary64) x.im)))) x.re)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) x.re))) x.re)) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.im (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.im (fma.f64 (neg.f64 x.im) x.im (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 x.im (fma.f64 (neg.f64 x.im) x.im (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))
#s(approx (neg (* x.im x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (neg (* (* x.im x.im) x.im)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (* x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (fma.f64 (neg.f64 x.im) x.im (*.f64 x.re x.re))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (neg.f64 x.im) x.im (*.f64 x.re x.re)))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (/.f64 (*.f64 x.im (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (fma.f64 x.im (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (fma.f64 x.im (fma.f64 x.im (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 3 binary64) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (fma.f64 x.im (fma.f64 x.im (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 3 binary64) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (-.f64 (fma.f64 x.im (-.f64 (+.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (/.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))) (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 3 binary64) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))) (fma.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (pow.f64 (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 x.im (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 x.im (fma.f64 x.im (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 3 binary64) x.re) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 x.im (fma.f64 x.im (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 3 binary64) x.re)) (fma.f64 x.im (+.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.im (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.im (fma.f64 x.im (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 3 binary64) x.re) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.im (fma.f64 x.im (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 3 binary64) x.re)) (fma.f64 x.im (+.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (*.f64 x.re x.re) #s(literal -3 binary64) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (fma.f64 x.im (*.f64 #s(literal 0 binary64) x.re) (*.f64 x.re x.re))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (fma.f64 x.im (+.f64 (+.f64 x.re (neg.f64 x.im)) (neg.f64 x.re)) (*.f64 x.re x.re))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 x.im (*.f64 #s(literal 0 binary64) x.re) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 x.im (+.f64 (+.f64 x.re (neg.f64 x.im)) (neg.f64 x.re)) (*.f64 x.re x.re)))
#s(approx (- x.re x.im) (+.f64 x.re (neg.f64 x.im)))
#s(approx (+ x.im x.im) (+.f64 x.im x.im))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (fma.f64 x.im (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.im (-.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 x.im (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 0 binary64) x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (fma.f64 x.im (-.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 x.im (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 x.im (*.f64 x.re #s(literal 0 binary64)))) (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 0 binary64) x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 #s(literal -2 binary64) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) #s(literal 2 binary64)))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 #s(literal 0 binary64) x.re) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im (fma.f64 (*.f64 #s(literal -2 binary64) x.im) (*.f64 x.re x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 0 binary64) x.re)))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) #s(literal 1 binary64))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) #s(literal 1 binary64))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) #s(literal 1 binary64))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1 binary64))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (*.f64 #s(literal 3 binary64) (/.f64 x.re x.im))) #s(literal 1 binary64)) (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal 3 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) (*.f64 x.im x.im)))))) #s(literal 1 binary64)) (+.f64 (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))) (+.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (-.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re))) (neg.f64 (*.f64 x.re #s(literal 0 binary64))))) (*.f64 x.im x.im)))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) (+.f64 (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)) (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 #s(literal 3 binary64) (/.f64 x.re x.im) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) (*.f64 x.im x.im))))))))) #s(literal 1 binary64)) (+.f64 (+.f64 (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))) (/.f64 (neg.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (/.f64 (-.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re))) (neg.f64 (*.f64 x.re #s(literal 0 binary64)))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (-.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (+.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re))))) (neg.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 x.re #s(literal 0 binary64)) (-.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re))) (neg.f64 (*.f64 x.re #s(literal 0 binary64)))))) (*.f64 (-.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re))) (neg.f64 (*.f64 x.re #s(literal 0 binary64)))) (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))))) (*.f64 (*.f64 x.im x.im) x.im))))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (*.f64 #s(literal 3 binary64) (/.f64 x.re x.im))) #s(literal 1 binary64))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal 3 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) (*.f64 x.im x.im)))))) #s(literal 1 binary64))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) (+.f64 (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)) (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 #s(literal 3 binary64) (/.f64 x.re x.im) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) (*.f64 x.im x.im))))))))) #s(literal 1 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (*.f64 #s(literal 3 binary64) (/.f64 x.re x.im))) #s(literal 1 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal 3 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) (*.f64 x.im x.im)))))) #s(literal 1 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) (+.f64 (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)) (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 #s(literal 3 binary64) (/.f64 x.re x.im) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) (*.f64 x.im x.im))))))))) #s(literal 1 binary64))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) #s(literal 1 binary64))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))
#s(approx (+ x.re x.im) (*.f64 x.im (+.f64 #s(literal 1 binary64) (/.f64 x.re x.im))))
#s(approx (- x.re x.im) (*.f64 x.im (-.f64 (/.f64 x.re x.im) #s(literal 1 binary64))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64)))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 (/.f64 x.re x.im) #s(literal 0 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal 2 binary64) (+.f64 (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 (*.f64 x.im x.im) x.im))))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im)) (*.f64 x.re x.re)))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im))) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -3 binary64)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (*.f64 x.re #s(literal 0 binary64))) x.im)))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (neg.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (+.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re))))))) (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 (*.f64 x.re #s(literal 0 binary64)) (-.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (*.f64 x.re #s(literal 0 binary64)))))) x.im))) (*.f64 x.re #s(literal 0 binary64))) x.im))))))
#s(approx (/ (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (neg.f64 (/.f64 (-.f64 (+.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (neg.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (+.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re))))))) (neg.f64 (/.f64 (-.f64 (-.f64 (neg.f64 (+.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re))))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (neg.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (+.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re))))))) (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 (*.f64 x.re #s(literal 0 binary64)) (-.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (*.f64 x.re #s(literal 0 binary64)))))) (*.f64 (-.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (*.f64 x.re #s(literal 0 binary64))) (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))))))) x.im))) (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 (*.f64 x.re #s(literal 0 binary64)) (-.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (*.f64 x.re #s(literal 0 binary64)))))) x.im))) (*.f64 x.re #s(literal 0 binary64))) x.im)))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (*.f64 #s(literal 3 binary64) (/.f64 x.re x.im))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (neg.f64 (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) x.im) (+.f64 (+.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) x.im)) (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) x.im) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) x.im)))) x.im))))))
#s(approx (+ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (pow (* (* (+ x.im x.im) x.re) x.re) 3)) (*.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (+.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)))))) (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) x.im)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) x.im) (/.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) x.im))) x.im))) x.im)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)) (*.f64 #s(literal 3 binary64) (/.f64 x.re x.im))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (neg.f64 (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) x.im) (+.f64 (+.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) x.im)) (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) x.im) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)) x.im)))) x.im))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (neg.f64 (pow.f64 x.im #s(literal 9 binary64))) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (+.f64 x.re (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) x.re)) (+.f64 x.re x.re)))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (+.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))) (+.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) x.re)))))) (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) x.re)) x.im)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) x.im) (/.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) x.im))) x.im))) x.im)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (/.f64 (*.f64 x.re x.re) x.im)) x.im)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) x.im) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.re (/.f64 (neg.f64 (*.f64 x.re x.re)) x.im)) x.im)) #s(literal 1 binary64))))
#s(approx (+ x.re x.im) (*.f64 (neg.f64 x.im) (-.f64 (/.f64 (neg.f64 x.re) x.im) #s(literal 1 binary64))))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.im) (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 x.re) x.im))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (+.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))) x.im) (+.f64 x.re x.re))) x.im)))))
#s(approx (+ (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)))) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (-.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 0 binary64) x.re)))) x.im)) (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) x.im)) (+.f64 x.re x.re))) x.im)))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))))
#s(approx (- (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) #s(literal 2 binary64)) x.im)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 0 binary64) x.re))) x.im)) (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im) (*.f64 x.re x.re)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 0 binary64) x.re))) x.im)))))

eval49.0ms (2.1%)

Memory
-16.8MiB live, 79.4MiB allocated; 15ms collecting garbage
Compiler

Compiled 11 490 to 2 296 computations (80% saved)

prune11.0ms (0.4%)

Memory
27.0MiB live, 27.0MiB allocated; 0ms collecting garbage
Pruning

9 alts after pruning (7 fresh and 2 done)

PrunedKeptTotal
New3417348
Fresh303
Picked325
Done000
Total3479356
Accuracy
95.6%
Counts
356 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
12.6%
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
63.3%
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 #s(approx (+ (* x.re x.im) (* x.im x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re))
✓86.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
▶50.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
▶50.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
▶86.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im))
▶50.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
▶57.9%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
✓57.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Compiler

Compiled 357 to 277 computations (22.4% saved)

series17.0ms (0.7%)

Memory
-13.6MiB live, 32.0MiB allocated; 5ms collecting garbage
Counts
23 → 41
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im))
(*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im)
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))
(-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
#s(literal 3 binary64)
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 x.re x.re) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
(*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im)
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) x.re)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
(neg.f64 (pow.f64 x.im #s(literal 3 binary64)))
(pow.f64 x.im #s(literal 3 binary64))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* 3 (* x.re x.re)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* 3 (* (* x.re x.re) x.im)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* x.re x.re) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (* x.re x.re) (* 3 x.im)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* (* 3 x.re) x.re) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* 3 x.re) x.re) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* 3 x.re) #s(hole binary64 (* 3 x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx (neg (pow x.im 3)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (pow x.im 3) #s(hole binary64 (pow x.im 3)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -3 (/ (pow x.re 2) (pow x.im 2))))))))
Calls

6 calls:

TimeVariablePointExpression
5.0ms
x.re
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* 3 (* x.re x.re)) (* x.im x.im)) (* 3 (* x.re x.re)) 3 (* x.re x.re) x.re (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* 3 (* (* x.re x.re) x.im)) (* (* x.re x.re) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* x.re x.re) (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (pow x.im 3)) (pow x.im 3))
3.0ms
x.im
@-inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* 3 (* x.re x.re)) (* x.im x.im)) (* 3 (* x.re x.re)) 3 (* x.re x.re) x.re (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* 3 (* (* x.re x.re) x.im)) (* (* x.re x.re) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* x.re x.re) (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (pow x.im 3)) (pow x.im 3))
2.0ms
x.im
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* 3 (* x.re x.re)) (* x.im x.im)) (* 3 (* x.re x.re)) 3 (* x.re x.re) x.re (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* 3 (* (* x.re x.re) x.im)) (* (* x.re x.re) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* x.re x.re) (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (pow x.im 3)) (pow x.im 3))
2.0ms
x.re
@-inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* 3 (* x.re x.re)) (* x.im x.im)) (* 3 (* x.re x.re)) 3 (* x.re x.re) x.re (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* 3 (* (* x.re x.re) x.im)) (* (* x.re x.re) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* x.re x.re) (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (pow x.im 3)) (pow x.im 3))
2.0ms
x.re
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* 3 (* x.re x.re)) (* x.im x.im)) (* 3 (* x.re x.re)) 3 (* x.re x.re) x.re (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* 3 (* (* x.re x.re) x.im)) (* (* x.re x.re) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* x.re x.re) (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (pow x.im 3)) (pow x.im 3))

rewrite40.0ms (1.7%)

Memory
-2.3MiB live, 43.9MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01421095
01651028
0692996
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
64 → 194
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im))
(*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im)
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))
(-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
#s(literal 3 binary64)
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 x.re x.re) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
(*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im)
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) x.re)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
(neg.f64 (pow.f64 x.im #s(literal 3 binary64)))
(pow.f64 x.im #s(literal 3 binary64))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* 3 (* x.re x.re)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* 3 (* (* x.re x.re) x.im)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* x.re x.re) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (* x.re x.re) (* 3 x.im)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* (* 3 x.re) x.re) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* 3 x.re) x.re) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* 3 x.re) #s(hole binary64 (* 3 x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx (neg (pow x.im 3)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (pow x.im 3) #s(hole binary64 (pow x.im 3)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -3 (/ (pow x.re 2) (pow x.im 2))))))))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))) x.im))
(*.f64 #s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))) x.im)
(*.f64 x.im #s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))) (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im) (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))))
(fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(fma.f64 (*.f64 x.re x.re) #s(literal 3 binary64) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(fma.f64 x.im (neg.f64 x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(fma.f64 x.re (*.f64 #s(literal 3 binary64) x.re) (*.f64 (neg.f64 x.im) x.im))
(-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.re x.re)))
(-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))
(+.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(+.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.re))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))
(fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
#s(literal 3 binary64)
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re))
(*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im)
(*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (*.f64 x.re x.re) x.im)
(*.f64 x.im (*.f64 x.re x.re))
(*.f64 x.re (*.f64 x.im x.re))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re))
(*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im)
(*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 #s(literal 3 binary64) x.im)
(*.f64 x.im #s(literal 3 binary64))
(/.f64 (-.f64 (*.f64 x.im x.im) (*.f64 (+.f64 x.im x.im) (+.f64 x.im x.im))) (-.f64 x.im (+.f64 x.im x.im)))
(/.f64 (fma.f64 (*.f64 x.im x.im) x.im (pow.f64 (+.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 x.im x.im (-.f64 (*.f64 (+.f64 x.im x.im) (+.f64 x.im x.im)) (*.f64 x.im (+.f64 x.im x.im)))))
(fma.f64 #s(literal 2 binary64) x.im x.im)
(fma.f64 x.im #s(literal 2 binary64) x.im)
(-.f64 x.im (*.f64 #s(literal -2 binary64) x.im))
(+.f64 (+.f64 x.im x.im) x.im)
(+.f64 x.im (+.f64 x.im x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re))
(*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im)
(*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.re))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))
(fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))
(*.f64 #s(literal 3 binary64) x.re)
(*.f64 x.re #s(literal 3 binary64))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im))
(pow.f64 (neg.f64 x.im) #s(literal 3 binary64))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (pow.f64 x.im #s(literal 3/2 binary64)) (pow.f64 x.im #s(literal 3/2 binary64)))
(*.f64 (*.f64 x.im x.im) x.im)
(*.f64 x.im (*.f64 x.im x.im))
(pow.f64 x.im #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (* 3 (* x.re x.re)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (* (* 3 x.re) x.re) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (* (* x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) x.im))
#s(approx (* (* (* 3 x.re) x.re) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (* (* (* 3 x.re) x.re) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (* 3 (* x.re x.re)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
#s(approx (* 3 x.re) (*.f64 #s(literal 3 binary64) x.re))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (+.f64 (fma.f64 #s(literal 2 binary64) x.im (/.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 x.re x.re))) x.im) (*.f64 x.re x.re)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (fma.f64 #s(literal 3 binary64) x.im (/.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (+.f64 (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (*.f64 x.re x.re)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (+.f64 (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (*.f64 x.re x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (* 3 x.im) (*.f64 #s(literal 3 binary64) x.im))
#s(approx (neg (pow x.im 3)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (pow x.im 3) (*.f64 (*.f64 x.im x.im) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (- (* 3 (* x.re x.re)) (* x.im x.im)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1 binary64))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1 binary64))))

eval11.0ms (0.5%)

Memory
19.1MiB live, 19.1MiB allocated; 0ms collecting garbage
Compiler

Compiled 1 132 to 532 computations (53% saved)

prune29.0ms (1.2%)

Memory
-41.2MiB live, 12.5MiB allocated; 9ms collecting garbage
Pruning

8 alts after pruning (4 fresh and 4 done)

PrunedKeptTotal
New1253128
Fresh112
Picked235
Done112
Total1298137
Accuracy
100.0%
Counts
137 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶12.6%
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
✓50.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
✓50.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
▶55.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
▶86.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im))
▶55.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
✓57.9%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
✓57.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Compiler

Compiled 176 to 136 computations (22.7% saved)

series117.0ms (4.9%)

Memory
8.8MiB live, 193.5MiB allocated; 19ms collecting garbage
Counts
33 → 234
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
x.re
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) x.im)
#s(literal 3 binary64)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im))
(*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im)
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im)))
(-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) x.re)
(*.f64 x.im x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re))
(*.f64 x.im x.re)
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(-.f64 x.re x.im)
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
(*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))
(*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 x.im x.im)
(*.f64 x.re x.re)
(-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* x.re (* x.re (* 3 x.im))) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* x.re (* 3 x.im)) #s(hole binary64 (* 3 (* x.im x.re))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* (* 3 x.re) x.re) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* 3 x.re) #s(hole binary64 (* 3 x.re)))
#s(approx (* (* 3 x.re) (* x.im x.re)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (+ (* x.re (- (+ (/ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)) (/ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))) (+ (* -1 (/ (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (pow x.im 3))) (+ (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 4)) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 6)))))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3)))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (+ (* x.re (- (+ (/ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)) (/ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))) (+ (* -1 (/ (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (pow x.im 3))) (+ (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 4)) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 6)))))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3)))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (pow x.im 9))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (* x.re (+ x.im (* -1 x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im x.re) (* x.im (+ x.im (* -1 x.im))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.im))
#s(approx (+ x.re x.im) #s(hole binary64 (+ x.im x.re)))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (- x.re x.im) #s(hole binary64 (- x.re x.im)))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (+ (* (pow x.im 2) (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))))) (pow x.im 6))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* 2 (pow x.im 4)) (+ (* x.re (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (pow x.im 5)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (+ (* x.im (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))))) (pow x.im 5))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (+ (* x.re (+ (* x.im (* x.re (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 5))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (+ (* x.re (+ (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* x.re (+ (* x.im (* x.re (+ (* -2 x.im) (* 2 x.im)))) (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))))) (pow x.im 5))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* 2 (* (pow x.im 4) (pow x.re 2)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* -2 (* (pow x.im 2) (* x.re (+ x.im (* -1 x.im))))) (* 2 (pow x.im 4))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 2 (pow x.im 4)) (* x.re (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* 2 (* x.im (* x.re (- (* 2 x.im) x.im))))))))))
#s(approx (* (+ x.im x.im) (* x.re x.re)) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (pow x.im 3)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (- (* -1 (* x.im (* x.re (+ x.im (* -1 x.im))))) (* -1 (pow x.im 3)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (- (* x.re (- (* x.re (- (* 2 x.im) x.im)) (* x.im (+ x.im (* -1 x.im))))) (* -1 (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* 8 (/ (pow x.re 6) (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 6) (+ (* 16 (/ (* (pow x.re 3) (+ x.im (* -1 x.im))) (pow x.im 7))) (* 8 (/ 1 (pow x.im 3)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 6) (+ (* (pow x.re 3) (+ (* -8 (* x.re (+ (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 11))) (+ (* 2 (/ (- (* 2 x.im) x.im) (pow x.im 8))) (/ 1 (pow x.im 7)))))) (* 16 (/ (+ x.im (* -1 x.im)) (pow x.im 7))))) (* 8 (/ 1 (pow x.im 3)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 6) (+ (* (pow x.re 3) (+ (* 16 (/ (+ x.im (* -1 x.im)) (pow x.im 7))) (* x.re (+ (* -8 (* x.re (+ (* -1 (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (+ (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 11))) (+ (* 2 (/ (- (* 2 x.im) x.im) (pow x.im 8))) (/ 1 (pow x.im 7))))) (pow x.im 4))) (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow x.im 13)))))) (* -8 (+ (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 11))) (+ (* 2 (/ (- (* 2 x.im) x.im) (pow x.im 8))) (/ 1 (pow x.im 7))))))))) (* 8 (/ 1 (pow x.im 3)))))))
#s(approx (pow (* (+ x.im x.im) (* x.re x.re)) 3) #s(hole binary64 (* 8 (* (pow x.im 3) (pow x.re 6)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (pow x.re 3))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (* (pow x.im 3) (pow x.re 2)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (pow x.re 6))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (pow x.re 3)) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.re))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (- x.re x.im) #s(hole binary64 x.re))
#s(approx (- x.re x.im) #s(hole binary64 (* x.re (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)))))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.re 3)) (pow x.im 2))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (pow x.re 4))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (+ (/ (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (+ (/ (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re) (/ (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.re 3))))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* 2 (* x.im (* (pow x.re 4) (- (* 2 x.im) x.im))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (* x.im (- (* 2 x.im) x.im)))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (* 2 (/ (pow x.im 4) (pow x.re 2))))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (* 2 x.im) x.im))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (+ (* -1 (/ (* x.im (+ x.im (* -1 x.im))) x.re)) (* 2 x.im)) x.im))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (+ (* 2 x.im) (/ (pow x.im 3) (pow x.re 2))) (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* 8 (/ (* (pow x.im 3) (pow x.re 2)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (pow x.re 3))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))) x.re)) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* -1 (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))) x.re)))) x.re)) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -1 (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (- (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))) x.re)))) x.re)))) x.re)) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) x.re)) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (/ (- (+ (* -1 (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))) (+ (* -1 (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))) x.re))) x.re)) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) x.re)) x.re)) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) x.re)) x.re))) x.re)) (pow x.im 3)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (+ (* -1 (* x.im (+ x.im (* -1 x.im)))) (/ (pow x.im 3) x.re)) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* -1 (+ x.im (* -1 x.im))) (/ (pow x.im 2) x.re)) x.re))))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.re (- (/ x.im x.re) 1)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) x.re)) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) x.re)) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) x.re)) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (* -1 (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (* -1 (/ (+ (* -1 (/ (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* x.im (+ (* -2 x.im) (* 2 x.im)))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) x.re)) (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) x.re)) (* x.im (+ (* -2 x.im) (* 2 x.im)))) x.re))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -2 (/ (pow x.im 4) x.re)) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (* 2 (* x.im (- (* 2 x.im) x.im)))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (+ (* -1 (/ (- (* -1 (/ (pow x.im 3) x.re)) (* -1 (* x.im (+ x.im (* -1 x.im))))) x.re)) (* 2 x.im)) x.im))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* 8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (* 8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) x.re))) x.re)) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* 8 (/ (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) x.re))) x.re))) x.re)) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (+ (* x.im (- (+ (* -8 (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (+ (* x.im (- (+ (* -8 (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (+ (* -1 (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* -1 (/ (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (* -1 (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (* x.im (pow x.re 6)) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* x.im (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -1 (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (+ (* x.im (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2))))
#s(approx (- x.re x.im) #s(hole binary64 (+ x.re (* -1 x.im))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (+ (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow x.re 4))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (+ (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))))))) (pow x.re 4))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (+ (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (+ (* 4 (pow x.re 2)) (* x.im (+ (* -2 x.re) (* 2 x.re)))))))))) (pow x.re 4))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (+ (* x.im (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (+ (* x.im (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))))))) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (+ (* x.im (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (+ (* -2 x.re) (* 2 x.re))))))))) (pow x.re 4)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* 2 (* (pow x.im 2) (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 2) (+ (* -2 (* x.im (* (pow x.re 2) (+ x.re (* -1 x.re))))) (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2))))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (* 2 (* x.im (pow x.re 2)))))))))
#s(approx (+ x.im x.im) #s(hole binary64 (* 2 x.im)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* x.im (- (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* x.im (- (+ (* -1 (* x.im (+ x.re (* -1 x.re)))) (* 2 (pow x.re 2))) (pow x.re 2)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* x.im (- (+ (* 2 (pow x.re 2)) (* x.im (- x.im (+ x.re (* -1 x.re))))) (pow x.re 2)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* 8 (/ (* x.im (pow x.re 6)) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* -8 (/ (* x.im (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (* x.im (+ (* -8 (* x.im (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (* x.im (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (* x.im (+ (* -8 (* x.im (+ (* -1 (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* -1 (/ (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))) (* -8 (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.im 3))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 3)) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (pow x.im 3))))))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.im 3))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 3)) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (pow x.im 3))))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* x.im (- (/ x.re x.im) 1))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* 2 (/ x.re x.im)) (* 4 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) (pow x.im 3))) (+ (* -2 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (* 2 (/ (pow x.re 3) (pow x.im 3))) (* 4 (/ (pow x.re 2) (pow x.im 2)))))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.im 5) (+ 1 (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im)))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.im 5) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* 2 (/ x.re x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.im 5) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* -2 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (* 2 (/ (pow x.re 3) (pow x.im 3))))))))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (pow x.re 2))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (+ (* 2 (/ (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 2))) (* 2 (pow x.re 2)))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.im 3) (+ 1 (* -1 (/ (+ x.re (* -1 x.re)) x.im))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.im 3) (- (+ 1 (* 2 (/ (pow x.re 2) (pow x.im 2)))) (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (* 8 (pow x.re 6))) (pow x.im 3))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (+ (* -8 (/ (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))) (pow x.im 2))) (* 8 (pow x.re 6)))) (pow x.im 3))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (+ (* -8 (/ (+ (* -1 (* (+ (* -2 x.re) (* 2 x.re)) (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))))) (+ (* -1 (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 x.re) (* 2 x.re))))) (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))))) (pow x.im 3))) (+ (* -8 (/ (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))) (pow x.im 2))) (* 8 (pow x.re 6))))) (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -3 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im)))) (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im))) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) x.im)))) x.im))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im)))) (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) x.im)))) x.im))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) x.im))) x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -1 (/ x.re x.im)) (/ x.re x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (/ (pow x.re 2) x.im)) x.im)))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (+ (* -1 x.re) (* -1 (/ (pow x.re 2) x.im)))) x.im)) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.im (+ 1 (* -1 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (* 4 (pow x.re 2)))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* -1 (* (pow x.im 5) (- (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im))) 1)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* -1 (* (pow x.im 5) (- (* -1 (/ (+ (* -4 (/ (pow x.re 2) x.im)) (+ (* -1 (+ (* -2 x.re) (* 2 x.re))) (* 2 (/ (pow x.re 2) x.im)))) x.im)) 1)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* -1 (* (pow x.im 5) (- (* -1 (/ (+ (* -1 (+ (* -2 x.re) (* 2 x.re))) (* -1 (/ (+ (* -2 (/ (pow x.re 3) x.im)) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* 2 (/ (pow x.re 3) x.im)))) x.im))) x.im)) 1)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (pow x.re 2))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (* 2 (/ (* (pow x.re 2) (- (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im))) x.im)) (* 2 (pow x.re 2))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* -1 (* (pow x.im 3) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* -1 (* (pow x.im 3) (- (* -1 (/ (- (* -1 (/ (- (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) x.im)) (* -1 (+ x.re (* -1 x.re)))) x.im)) 1)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (* -8 (pow x.re 6))) (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (/ (+ (* -8 (pow x.re 6)) (* -1 (/ (+ (* -8 (/ (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))) x.im)) (* 8 (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))))) x.im))) (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (/ (+ (* -8 (pow x.re 6)) (* -1 (/ (+ (* -1 (/ (+ (* -8 (/ (+ (* -1 (* (+ (* -2 x.re) (* 2 x.re)) (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))))) (+ (* -1 (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 x.re) (* 2 x.re))))) (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))))) x.im)) (* 8 (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))))) x.im)) (* 8 (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))))) x.im))) (pow x.im 3)))))
Calls

6 calls:

TimeVariablePointExpression
40.0ms
x.re
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) 3 x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* (* 3 x.re) x.re) (* x.im x.im)) (* (* 3 x.re) x.re) (* 3 x.re) (* x.im x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 x.re) (* x.im x.re)) (* x.im x.re) (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (* (+ x.im x.im) (* x.re x.re)) (+ x.im x.im) (* x.re x.re) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (+ x.im x.im) (* x.re x.re)) 3))
14.0ms
x.im
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) 3 x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* (* 3 x.re) x.re) (* x.im x.im)) (* (* 3 x.re) x.re) (* 3 x.re) (* x.im x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 x.re) (* x.im x.re)) (* x.im x.re) (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (* (+ x.im x.im) (* x.re x.re)) (+ x.im x.im) (* x.re x.re) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (+ x.im x.im) (* x.re x.re)) 3))
14.0ms
x.re
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) 3 x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* (* 3 x.re) x.re) (* x.im x.im)) (* (* 3 x.re) x.re) (* 3 x.re) (* x.im x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 x.re) (* x.im x.re)) (* x.im x.re) (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (* (+ x.im x.im) (* x.re x.re)) (+ x.im x.im) (* x.re x.re) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (+ x.im x.im) (* x.re x.re)) 3))
13.0ms
x.re
@-inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) 3 x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* (* 3 x.re) x.re) (* x.im x.im)) (* (* 3 x.re) x.re) (* 3 x.re) (* x.im x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 x.re) (* x.im x.re)) (* x.im x.re) (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (* (+ x.im x.im) (* x.re x.re)) (+ x.im x.im) (* x.re x.re) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (+ x.im x.im) (* x.re x.re)) 3))
8.0ms
x.im
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) 3 x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (- (* (* 3 x.re) x.re) (* x.im x.im)) (* (* 3 x.re) x.re) (* 3 x.re) (* x.im x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 x.re) (* x.im x.re)) (* x.im x.re) (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (* (+ x.im x.im) (* x.re x.re)) (+ x.im x.im) (* x.re x.re) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (pow (* (+ x.im x.im) (* x.re x.re)) 3))

rewrite242.0ms (10.2%)

Memory
24.2MiB live, 402.3MiB allocated; 76ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0161629035
0166527637
0802225950
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
267 → 302
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
x.re
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) x.im)
#s(literal 3 binary64)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im))
(*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im)
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im)))
(-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) x.re)
(*.f64 x.im x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re))
(*.f64 x.im x.re)
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(-.f64 x.re x.im)
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
(*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))
(*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))
(+.f64 x.im x.im)
(*.f64 x.re x.re)
(-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* x.re (* x.re (* 3 x.im))) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* x.re (* 3 x.im)) #s(hole binary64 (* 3 (* x.im x.re))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* (* 3 x.re) x.re) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* 3 x.re) #s(hole binary64 (* 3 x.re)))
#s(approx (* (* 3 x.re) (* x.im x.re)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (+ (* x.re (- (+ (/ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)) (/ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))) (+ (* -1 (/ (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (pow x.im 3))) (+ (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 4)) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 6)))))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3)))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (+ (* x.re (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (+ (* x.re (- (+ (/ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)) (/ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))) (+ (* -1 (/ (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (pow x.im 3))) (+ (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -2 x.im) (+ (* -1 x.im) (+ (* -1 (+ x.im (* 2 x.im))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 4)) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 6)))))) (/ (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2) (pow x.im 3)))))) (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (pow x.im 3))) (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (- (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))) (pow x.im 4))))) (pow x.im 2)))) (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (pow x.im 9))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (+ (* -1 (pow x.im 9)) (* x.re (+ (* x.re (+ (* (pow x.im 3) (* x.re (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ x.im (* 2 x.im)))) (+ (* (pow x.im 3) (+ (* -2 x.im) (* -1 x.im))) (pow (+ (* 2 (pow x.im 2)) (pow x.im 2)) 2)))))) (* (pow x.im 3) (+ (* -1 (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2)))) (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (pow x.im 2))))))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (* x.re (+ x.im (* -1 x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im x.re) (* x.im (+ x.im (* -1 x.im))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.im))
#s(approx (+ x.re x.im) #s(hole binary64 (+ x.im x.re)))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (- x.re x.im) #s(hole binary64 (- x.re x.im)))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (pow x.im 6)))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (+ (* (pow x.im 2) (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))))) (pow x.im 6))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* 2 (pow x.im 4)) (+ (* x.re (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 6))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (pow x.im 5)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (+ (* x.im (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))))) (pow x.im 5))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (+ (* x.re (+ (* x.im (* x.re (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))))) (pow x.im 5))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (+ (* x.re (+ (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* x.re (+ (* x.im (* x.re (+ (* -2 x.im) (* 2 x.im)))) (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))))) (pow x.im 5))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* 2 (* (pow x.im 4) (pow x.re 2)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* -2 (* (pow x.im 2) (* x.re (+ x.im (* -1 x.im))))) (* 2 (pow x.im 4))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 2 (pow x.im 4)) (* x.re (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* 2 (* x.im (* x.re (- (* 2 x.im) x.im))))))))))
#s(approx (* (+ x.im x.im) (* x.re x.re)) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (pow x.im 3)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (- (* -1 (* x.im (* x.re (+ x.im (* -1 x.im))))) (* -1 (pow x.im 3)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (- (* x.re (- (* x.re (- (* 2 x.im) x.im)) (* x.im (+ x.im (* -1 x.im))))) (* -1 (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* 8 (/ (pow x.re 6) (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 6) (+ (* 16 (/ (* (pow x.re 3) (+ x.im (* -1 x.im))) (pow x.im 7))) (* 8 (/ 1 (pow x.im 3)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 6) (+ (* (pow x.re 3) (+ (* -8 (* x.re (+ (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 11))) (+ (* 2 (/ (- (* 2 x.im) x.im) (pow x.im 8))) (/ 1 (pow x.im 7)))))) (* 16 (/ (+ x.im (* -1 x.im)) (pow x.im 7))))) (* 8 (/ 1 (pow x.im 3)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 6) (+ (* (pow x.re 3) (+ (* 16 (/ (+ x.im (* -1 x.im)) (pow x.im 7))) (* x.re (+ (* -8 (* x.re (+ (* -1 (/ (* (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) (+ (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 11))) (+ (* 2 (/ (- (* 2 x.im) x.im) (pow x.im 8))) (/ 1 (pow x.im 7))))) (pow x.im 4))) (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow x.im 13)))))) (* -8 (+ (* 2 (/ (* (+ x.im (* -1 x.im)) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 11))) (+ (* 2 (/ (- (* 2 x.im) x.im) (pow x.im 8))) (/ 1 (pow x.im 7))))))))) (* 8 (/ 1 (pow x.im 3)))))))
#s(approx (pow (* (+ x.im x.im) (* x.re x.re)) 3) #s(hole binary64 (* 8 (* (pow x.im 3) (pow x.re 6)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (pow x.re 3))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (* (pow x.im 3) (pow x.re 2)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 2) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* (pow x.re 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* (pow x.re 2) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (pow x.re 6))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -2 x.im) (+ (* -1 x.im) (* 2 x.im))))) x.re) (+ (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* (+ (* -2 x.im) (* -1 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (pow x.re 3)) (+ (/ (* (pow x.im 3) (+ (* 2 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (* (+ x.im (* 2 x.im)) (+ (* -2 x.im) (* -1 x.im)))))) (pow x.re 2)) (pow x.im 3)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.re))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (- x.re x.im) #s(hole binary64 x.re))
#s(approx (- x.re x.im) #s(hole binary64 (* x.re (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)))))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.re 3)) (pow x.im 2))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (pow x.re 4))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (+ (/ (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (+ (/ (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (pow x.re 2)) (+ (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re) (/ (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.re 3))))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* 2 (* x.im (* (pow x.re 4) (- (* 2 x.im) x.im))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (* 2 (* x.im (- (* 2 x.im) x.im)))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (* (pow x.im 2) (+ x.im (* -1 x.im))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (* 2 (/ (pow x.im 4) (pow x.re 2))))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (* 2 x.im) x.im))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (+ (* -1 (/ (* x.im (+ x.im (* -1 x.im))) x.re)) (* 2 x.im)) x.im))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (+ (* 2 x.im) (/ (pow x.im 3) (pow x.re 2))) (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* 8 (/ (* (pow x.im 3) (pow x.re 2)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -8 (/ (* (pow x.im 3) (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -8 (/ (+ (* -1 (/ (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (pow x.re 3))) (+ (* -8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* -2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (pow x.re 2))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))))) x.re)) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* -1 (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))) x.re)))) x.re)) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (* -1 (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (- (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))) x.re)))) x.re)))) x.re)) (+ (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (- (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (- (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) x.re)) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -1 (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* -1 (/ (- (+ (* -1 (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))) (+ (* -1 (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (+ (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (/ (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (/ (* (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) (- (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))) (* -1 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))))) (* x.re (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))) x.re))) x.re)) (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (/ (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im)))) x.re) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (/ (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2))))) x.re)) x.re)) (pow x.im 3)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.re 6) (+ (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ x.im (+ (* -1 (+ x.im (* 2 x.im))) (* 2 x.im))))) (* -1 (/ (+ (* -1 (* (pow x.im 3) (+ (* -2 (pow x.im 2)) (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (+ (* -1 (pow x.im 2)) (pow (+ x.im (* 2 x.im)) 2)))))) (/ (* (pow x.im 3) (+ (* -1 (pow x.im 3)) (+ (* (+ x.im (* 2 x.im)) (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2)))) (+ (* (+ x.im (* 2 x.im)) (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.im 3))))) x.re)) x.re))) x.re)) (pow x.im 3)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (+ (* -1 (* x.im (+ x.im (* -1 x.im)))) (/ (pow x.im 3) x.re)) x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* -1 (+ x.im (* -1 x.im))) (/ (pow x.im 2) x.re)) x.re))))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.re (- (/ x.im x.re) 1)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) x.re)) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) x.re)) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) x.re)) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) x.re)) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (* -1 (/ (* x.im (+ (* -2 x.im) (* 2 x.im))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (* -1 (/ (+ (* -1 (/ (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* x.im (+ (* -2 x.im) (* 2 x.im)))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.re 4) (+ x.im (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* x.im (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) x.re)) (* x.im (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))) x.re)) (* x.im (+ (* -2 x.im) (* 2 x.im)))) x.re))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -2 (/ (pow x.im 4) x.re)) (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im))))) x.re)) (* 2 (* x.im (- (* 2 x.im) x.im)))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (- (+ (* -1 (/ (- (* -1 (/ (pow x.im 3) x.re)) (* -1 (* x.im (+ x.im (* -1 x.im))))) x.re)) (* 2 x.im)) x.im))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* 8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (* x.re (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (* 8 (/ (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) x.re))) x.re)) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (+ (* -8 (/ (* (pow x.im 3) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (* -1 (/ (+ (* -8 (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) (* 8 (/ (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x.im 3) (pow (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) 2)) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 3) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2))) (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))))) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)))) (+ (* -1 (/ (* (pow x.im 3) (* (+ (* 2 (* (pow x.im 2) (+ x.im (* -1 x.im)))) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) (+ (* 2 (pow x.im 4)) (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 3))) (/ (* (pow x.im 5) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2)) 2)))) x.re))) x.re))) x.re)) (* 8 (/ (pow x.im 3) (+ (* 2 (* x.im (- (* 2 x.im) x.im))) (pow x.im 2))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (+ (* x.im (- (+ (* -8 (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (+ (* x.im (- (+ (* -8 (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -8 (+ (* -1 (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* -1 (/ (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (* -1 (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (* x.im (pow x.re 6)) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* x.im (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* x.im (- (+ (* x.im (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* x.im (- (+ (* -1 (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (pow x.re 3) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (* 2 (/ (* (pow x.re 3) (+ x.re (* 2 x.re))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))) (/ (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (+ (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (- (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (+ (/ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))) (/ (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))) (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 3) (+ (* x.im (+ (* x.im (+ (* 2 (* (pow x.re 3) (+ x.re (* 2 x.re)))) (+ (* x.im (+ (* -1 (pow x.re 3)) (+ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (+ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.re 3))))) (* (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (+ (* (pow x.re 3) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (* (pow x.re 3) (+ (* 2 (pow x.re 2)) (pow x.re 2)))))) (pow x.re 6)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* x.im (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2))))
#s(approx (- x.re x.im) #s(hole binary64 (+ x.re (* -1 x.im))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (+ (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow x.re 4))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (+ (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))))))) (pow x.re 4))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (+ (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (+ (* 4 (pow x.re 2)) (* x.im (+ (* -2 x.re) (* 2 x.re)))))))))) (pow x.re 4))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (+ (* x.im (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (+ (* x.im (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))))))) (pow x.re 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* x.im (+ (* x.im (+ (* -2 (pow x.re 3)) (+ (* 2 (pow x.re 3)) (* x.im (+ (* -4 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (+ (* -2 x.re) (* 2 x.re))))))))) (pow x.re 4)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* 2 (* (pow x.im 2) (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 2) (+ (* -2 (* x.im (* (pow x.re 2) (+ x.re (* -1 x.re))))) (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2))))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 2) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (* x.im (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (* 2 (* x.im (pow x.re 2)))))))))
#s(approx (+ x.im x.im) #s(hole binary64 (* 2 x.im)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* x.im (- (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* x.im (- (+ (* -1 (* x.im (+ x.re (* -1 x.re)))) (* 2 (pow x.re 2))) (pow x.re 2)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* x.im (- (+ (* 2 (pow x.re 2)) (* x.im (- x.im (+ x.re (* -1 x.re))))) (pow x.re 2)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* 8 (/ (* x.im (pow x.re 6)) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* -8 (/ (* x.im (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (* x.im (+ (* -8 (* x.im (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))) (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* x.im (+ (* 8 (/ (pow x.re 6) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (* x.im (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))) (* x.im (+ (* -8 (* x.im (+ (* -1 (/ (* (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))) (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)))) (+ (* -1 (/ (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2)))))) (* -8 (+ (* -1 (/ (* (pow x.re 6) (pow (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) 2)) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 3))) (/ (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (pow (+ (* 2 (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2)))) (pow x.re 4)) 2))))))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.im 3))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 3)) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (pow x.im 3))))))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) (+ 1 (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.im 3))) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 3)) (+ (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (pow x.im 2)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (pow x.im 3))))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))) 1))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* (pow x.im 9) (- (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) (pow x.im 2))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* -1 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (/ x.re x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) (pow x.im 3)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 3)) (+ (/ (pow x.re 3) (pow x.im 3)) (/ (pow (+ x.re (* 2 x.re)) 2) (pow x.im 2)))))))))))) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* x.im (- (/ x.re x.im) 1))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* 2 (/ x.re x.im)) (* 4 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) (pow x.im 3))) (+ (* -2 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (* 2 (/ (pow x.re 3) (pow x.im 3))) (* 4 (/ (pow x.re 2) (pow x.im 2)))))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.im 5) (+ 1 (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im)))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.im 5) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* 2 (/ x.re x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* (pow x.im 5) (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ x.re x.im)) (+ (* -2 (/ (pow x.re 3) (pow x.im 3))) (+ (* 2 (/ x.re x.im)) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (* 2 (/ (pow x.re 3) (pow x.im 3))))))))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (pow x.re 2))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* -2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (+ (* 2 (/ (* (pow x.re 2) (- (* 2 (pow x.re 2)) (pow x.re 2))) (pow x.im 2))) (* 2 (pow x.re 2)))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.im 3) (+ 1 (* -1 (/ (+ x.re (* -1 x.re)) x.im))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.im 3) (- (+ 1 (* 2 (/ (pow x.re 2) (pow x.im 2)))) (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (* 8 (pow x.re 6))) (pow x.im 3))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (+ (* -8 (/ (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))) (pow x.im 2))) (* 8 (pow x.re 6)))) (pow x.im 3))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (+ (* -8 (/ (+ (* -1 (* (+ (* -2 x.re) (* 2 x.re)) (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))))) (+ (* -1 (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 x.re) (* 2 x.re))))) (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))))) (pow x.im 3))) (+ (* -8 (/ (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))) (pow x.im 2))) (* 8 (pow x.re 6))))) (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -2 (/ (pow x.re 2) (pow x.im 2))) (* -1 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -3 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im)))) (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im))) x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) x.im)))) x.im))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im)))) (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) x.im)) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im))) x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) (* -1 (/ (- (+ (* -1 (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (+ (/ (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re))))) x.im) (/ (* (+ (* -2 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2)))) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2)))) (* (+ (* -2 x.re) (* 2 x.re)) (- (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re))) (* -1 (+ (* -2 x.re) (* 2 x.re)))))))) x.im)))) x.im))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (+ (* -1 (/ (+ x.re (* 2 x.re)) x.im)) (+ (* 2 (/ x.re x.im)) (/ x.re x.im))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -2 (/ (pow x.re 2) x.im)) (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (+ (* -1 (/ (+ (* 2 (pow x.re 2)) (pow x.re 2)) x.im)) (+ (* -1 (/ (pow x.re 2) x.im)) (/ (pow (+ x.re (* 2 x.re)) 2) x.im))))) x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) #s(hole binary64 (* -1 (* (pow x.im 9) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (+ (* -1 (+ x.re (* 2 x.re))) (* 2 x.re)))) (* -1 (/ (+ (* -1 (+ (* -2 (pow x.re 2)) (+ (* -1 (+ (* 2 (pow x.re 2)) (pow x.re 2))) (+ (* -1 (pow x.re 2)) (pow (+ x.re (* 2 x.re)) 2))))) (+ (* -1 (/ (pow x.re 3) x.im)) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im) (+ (/ (* (+ x.re (* 2 x.re)) (+ (* 2 (pow x.re 2)) (pow x.re 2))) x.im) (/ (pow x.re 3) x.im))))) x.im))) x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (+ (* -1 (/ x.re x.im)) (/ x.re x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (/ (pow x.re 2) x.im)) x.im)))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (+ (* -1 x.re) (* -1 (/ (pow x.re 2) x.im)))) x.im)) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.im (+ 1 (* -1 (/ x.re x.im)))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (* 4 (pow x.re 2)))) x.im)) (* 2 x.re))) x.im))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* -1 (* (pow x.im 5) (- (+ (* -2 (/ x.re x.im)) (* 2 (/ x.re x.im))) 1)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* -1 (* (pow x.im 5) (- (* -1 (/ (+ (* -4 (/ (pow x.re 2) x.im)) (+ (* -1 (+ (* -2 x.re) (* 2 x.re))) (* 2 (/ (pow x.re 2) x.im)))) x.im)) 1)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) #s(hole binary64 (* -1 (* (pow x.im 5) (- (* -1 (/ (+ (* -1 (+ (* -2 x.re) (* 2 x.re))) (* -1 (/ (+ (* -2 (/ (pow x.re 3) x.im)) (+ (* -1 (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* 2 (/ (pow x.re 3) x.im)))) x.im))) x.im)) 1)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* 2 (/ (* (pow x.re 2) (+ x.re (* -1 x.re))) x.im)) (* 2 (pow x.re 2))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) #s(hole binary64 (* (pow x.im 4) (+ (* -1 (/ (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (* 2 (/ (* (pow x.re 2) (- (* -2 (pow x.re 2)) (* -1 (pow x.re 2)))) x.im))) x.im)) (* 2 (pow x.re 2))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* -1 (* (pow x.im 3) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* -1 (* (pow x.im 3) (- (* -1 (/ (- (* -1 (/ (- (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) x.im)) (* -1 (+ x.re (* -1 x.re)))) x.im)) 1)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (/ (+ (* -8 (/ (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))) x.im)) (* -8 (pow x.re 6))) (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (/ (+ (* -8 (pow x.re 6)) (* -1 (/ (+ (* -8 (/ (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))) x.im)) (* 8 (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))))) x.im))) (pow x.im 3)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) #s(hole binary64 (* -1 (/ (+ (* -8 (pow x.re 6)) (* -1 (/ (+ (* -1 (/ (+ (* -8 (/ (+ (* -1 (* (+ (* -2 x.re) (* 2 x.re)) (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))))) (+ (* -1 (* (pow x.re 6) (* (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))) (+ (* -2 x.re) (* 2 x.re))))) (* (pow x.re 6) (+ (* -2 (* (pow x.re 2) (+ x.re (* -1 x.re)))) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))))) x.im)) (* 8 (+ (* -1 (* (pow x.re 6) (pow (+ (* -2 x.re) (* 2 x.re)) 2))) (* (pow x.re 6) (+ (* -4 (pow x.re 2)) (* 4 (pow x.re 2))))))) x.im)) (* 8 (* (pow x.re 6) (+ (* -2 x.re) (* 2 x.re))))) x.im))) (pow x.im 3)))))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
x.re
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) x.im)
#s(literal 3 binary64)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im))
(*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im)
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.f64 x.im x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im)))))
(-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) x.re)
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re))
(*.f64 x.im x.re)
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))) (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))) (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(*.f64 (pow.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))
(pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)) #s(literal 3 binary64)))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(/.f64 (fma.f64 (*.f64 x.re x.re) x.re (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 x.re x.re (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.im))))
(/.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 x.re x.re (fma.f64 x.im x.im (*.f64 x.re x.im))))
(/.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (+.f64 x.re x.im))
(-.f64 x.re x.im)
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im)) (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
(*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))
(*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 x.im x.im))
(/.f64 (fma.f64 (*.f64 x.im x.im) x.im (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 x.im x.im (-.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))
(+.f64 x.im x.im)
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.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 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))) (fma.f64 (+.f64 x.im x.im) (*.f64 x.re x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))
(/.f64 (neg.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
(/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im)))))
(*.f64 (*.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.im x.im) (*.f64 x.re x.re)))
(*.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.re x.re)) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.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 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 3 binary64)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)))))
#s(approx (* x.re (* x.re (* 3 x.im))) (*.f64 #s(literal 3 binary64) (*.f64 x.im (*.f64 x.re x.re))))
#s(approx x.re x.re)
#s(approx (* x.re (* 3 x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.re)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im (*.f64 x.re x.re)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im x.im)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) (*.f64 #s(literal -1 binary64) (*.f64 x.im x.im)))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))
#s(approx (* (* 3 x.re) x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))
#s(approx (* 3 x.re) (*.f64 #s(literal 3 binary64) x.re))
#s(approx (* (* 3 x.re) (* x.im x.re)) (*.f64 #s(literal 3 binary64) (*.f64 x.im (*.f64 x.re x.re))))
#s(approx (* x.im x.re) (*.f64 x.im x.re))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 x.re (-.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 x.re (-.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 x.re (-.f64 (/.f64 (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 6 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 x.re (-.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 x.re (-.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 x.re (-.f64 (/.f64 (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 6 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) x.im))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 9 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 9 binary64)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 9 binary64)) (*.f64 x.re (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 x.im #s(literal 9 binary64)) (*.f64 x.re (fma.f64 x.re (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)))))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.im (*.f64 x.re (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re (fma.f64 x.im x.re (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 #s(literal -1 binary64) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 x.re (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 x.re (+.f64 x.im (+.f64 x.re (*.f64 #s(literal -1 binary64) x.im))))))
#s(approx (+ x.re x.im) x.im)
#s(approx (+ x.re x.im) (+.f64 x.im x.re))
#s(approx (- x.re x.im) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (- x.re x.im) (-.f64 x.re x.im))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (pow.f64 x.im #s(literal 6 binary64)))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (fma.f64 (*.f64 x.im x.im) (*.f64 x.re (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 x.im #s(literal 6 binary64))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (fma.f64 x.re (fma.f64 x.re (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))))) (pow.f64 x.im #s(literal 6 binary64))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (fma.f64 x.re (fma.f64 x.re (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 x.re (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))))) (pow.f64 x.im #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (pow.f64 x.im #s(literal 5 binary64)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (fma.f64 x.im (*.f64 x.re (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 x.im #s(literal 5 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (fma.f64 x.re (fma.f64 x.im (*.f64 x.re (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))) (*.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))))) (pow.f64 x.im #s(literal 5 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (fma.f64 x.re (fma.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (*.f64 x.re (fma.f64 x.im (*.f64 x.re (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))))) (pow.f64 x.im #s(literal 5 binary64))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 x.re x.re))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.re (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)))) (*.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 x.re (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 2 binary64) (*.f64 x.im (*.f64 x.re (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)))))))))
#s(approx (* (+ x.im x.im) (* x.re x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.im (*.f64 x.re x.re))))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 x.im x.im) x.im))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 x.im (*.f64 x.re (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (-.f64 (*.f64 x.re (-.f64 (*.f64 x.re (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 7 binary64))) (*.f64 #s(literal 8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) x.im))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -8 binary64) (*.f64 x.re (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 x.im #s(literal 11 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im) (pow.f64 x.im #s(literal 8 binary64))) (pow.f64 x.im #s(literal -7 binary64))))) (*.f64 #s(literal 16 binary64) (/.f64 (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)) (pow.f64 x.im #s(literal 7 binary64))))) (*.f64 #s(literal 8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) x.im))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 16 binary64) (/.f64 (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)) (pow.f64 x.im #s(literal 7 binary64))) (*.f64 x.re (fma.f64 #s(literal -8 binary64) (*.f64 x.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 x.im #s(literal 11 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im) (pow.f64 x.im #s(literal 8 binary64))) (pow.f64 x.im #s(literal -7 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 x.im #s(literal 13 binary64)))))) (*.f64 #s(literal -8 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 x.im #s(literal 11 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im) (pow.f64 x.im #s(literal 8 binary64))) (pow.f64 x.im #s(literal -7 binary64)))))))) (*.f64 #s(literal 8 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) x.im))))))
#s(approx (pow (* (+ x.im x.im) (* x.re x.re)) 3) (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 x.re #s(literal 6 binary64)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 2 binary64) x.im)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.im (*.f64 x.re x.re))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (*.f64 #s(literal 3 binary64) x.im))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 3 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 3 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))) (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) #s(literal 2 binary64))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.re x.re) x.re)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))))) (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 (*.f64 x.re x.re) x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.re x.re) x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))) (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) #s(literal 2 binary64))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.re x.re) x.re)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))) (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 (*.f64 x.re x.re) x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (*.f64 (*.f64 x.re x.re) x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) x.re) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) x.re) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) x.re) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im))))) (*.f64 (*.f64 x.re x.re) x.re)) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal -1 binary64) x.im)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) x.im))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (/.f64 (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 x.im x.re) (/.f64 x.im x.re)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 x.im x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 x.im x.re))))))
#s(approx (+ x.re x.im) x.re)
#s(approx (+ x.re x.im) (*.f64 x.re (+.f64 #s(literal 1 binary64) (/.f64 x.im x.re))))
#s(approx (- x.re x.im) x.re)
#s(approx (- x.re x.im) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 x.im x.re)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) x.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) x.re) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 x.im x.im)))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 x.im (pow.f64 x.re #s(literal 4 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 x.im (/.f64 (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) x.re))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 x.im (+.f64 (/.f64 (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (/.f64 (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) x.re)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 x.im (+.f64 (/.f64 (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) x.re) (/.f64 (*.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (*.f64 x.re x.re) x.re)))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 #s(literal 2 binary64) (*.f64 x.im (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 x.re x.re)))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re) (*.f64 #s(literal 2 binary64) x.im)) x.im)))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 2 binary64) x.im (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re))) (+.f64 x.im (/.f64 (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) x.re)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 x.re x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))))) x.re) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))))) x.re)))) x.re) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -1 binary64) (*.f64 x.im x.im))) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))) (*.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))))) x.re)))) x.re)))) x.re) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re) (/.f64 (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))) (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))) x.re) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -1 binary64) (*.f64 x.im x.im))) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im))))) (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (/.f64 (fma.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))) (*.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))))) (*.f64 x.re (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))) x.re))) x.re) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) x.re) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) x.re)) x.re) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 x.im (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (*.f64 #s(literal 2 binary64) x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im))))))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -1 binary64) (*.f64 x.im x.im))) (fma.f64 (+.f64 x.im (*.f64 #s(literal 2 binary64) x.im)) (fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im))))) x.re)) x.re))) x.re) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re)) x.re)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im)) (/.f64 (*.f64 x.im x.im) x.re)) x.re)))))
#s(approx (+ x.re x.im) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x.im x.re)) #s(literal 1 binary64)))))
#s(approx (- x.re x.im) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 (/.f64 x.im x.re) #s(literal 1 binary64)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) x.re) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 x.im (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))) x.re)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 x.im (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))) x.re) (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) x.re)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (+.f64 x.im (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) x.re) (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))) x.re) (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) x.re)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))))) x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) x.re)) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))))) x.re) (*.f64 #s(literal 2 binary64) x.im)) x.im)))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (*.f64 x.re (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (*.f64 #s(literal 8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) x.re))) x.re) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (*.f64 #s(literal 8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im))))) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (+.f64 x.im (*.f64 #s(literal -1 binary64) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) x.im (*.f64 #s(literal 2 binary64) x.im)))) (fma.f64 #s(literal 2 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) x.im)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)) #s(literal 2 binary64))))) x.re))) x.re))) x.re) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) x.im) x.im)) (*.f64 x.im x.im)))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.im (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.im (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))))
#s(approx (* 3 x.im) (*.f64 #s(literal 3 binary64) x.im))
#s(approx x.im x.im)
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 x.im (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) (fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 x.im (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 x.im (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))) (fma.f64 x.im (-.f64 (fma.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 x.im (-.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))) (fma.f64 x.im (-.f64 (fma.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 x.im (-.f64 (fma.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (fma.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/.f64 (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 x.im (fma.f64 x.im (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 x.im (fma.f64 x.im (-.f64 (fma.f64 x.im (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 x.im (fma.f64 x.im (-.f64 (fma.f64 x.im (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 x.im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (fma.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.im (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.im (fma.f64 x.im (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (fma.f64 x.im (fma.f64 x.im (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 x.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)))) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))))) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (fma.f64 x.im (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)) (*.f64 x.re x.re))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.im (fma.f64 x.im (+.f64 x.re (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal -1 binary64) x.re))) (*.f64 x.re x.re))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 x.im (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 x.im (+.f64 x.re (fma.f64 #s(literal -1 binary64) x.im (*.f64 #s(literal -1 binary64) x.re))) (*.f64 x.re x.re)))
#s(approx (- x.re x.im) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.im)))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (fma.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (fma.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (fma.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal 4 binary64) (*.f64 x.re x.re) (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 x.im (fma.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 x.im (fma.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 x.im (fma.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 x.im (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.im (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -2 binary64) (*.f64 x.im (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (*.f64 x.im (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 2 binary64) (*.f64 x.im (*.f64 x.re x.re))))))))
#s(approx (+ x.im x.im) (*.f64 #s(literal 2 binary64) x.im))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 x.im (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 x.im (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 x.re x.re))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 x.im (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.im (-.f64 x.im (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))))) (*.f64 x.re x.re))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 x.im (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 x.im (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 x.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 x.im (fma.f64 #s(literal -8 binary64) (*.f64 x.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 x.im (fma.f64 #s(literal 8 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 x.im (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 x.im (fma.f64 #s(literal -8 binary64) (*.f64 x.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(literal -8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 4 binary64))) #s(literal 2 binary64))))))))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (*.f64 #s(literal 3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))
#s(approx (- (* (* 3 x.re) x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (*.f64 x.im x.im)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) (*.f64 x.im x.im))))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (*.f64 x.im x.im)))))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 x.re x.re) (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))))))) (*.f64 (*.f64 x.im x.im) x.im)))))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (*.f64 x.im x.im)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) (*.f64 x.im x.im))))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (*.f64 x.im x.im)))))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 x.re x.re) (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))))))) (*.f64 (*.f64 x.im x.im) x.im)))))))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im))) #s(literal 1 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (*.f64 x.im x.im)))))))) #s(literal 1 binary64))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) x.im)) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) (*.f64 x.im x.im)))))))))))) #s(literal 1 binary64))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im)) #s(literal 1 binary64))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im)) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) #s(literal 1 binary64))))
#s(approx (+ x.re x.im) (*.f64 x.im (+.f64 #s(literal 1 binary64) (/.f64 x.re x.im))))
#s(approx (- x.re x.im) (*.f64 x.im (-.f64 (/.f64 x.re x.im) #s(literal 1 binary64))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (*.f64 #s(literal 2 binary64) (/.f64 x.re x.im))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (*.f64 #s(literal 2 binary64) (/.f64 x.re x.im))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)))))))))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) x.im) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)) x.im)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 x.re x.im) (+.f64 (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) x.im) (*.f64 #s(literal 8 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) x.im) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))))) (*.f64 x.im x.im)) (*.f64 #s(literal 8 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) x.im) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))))) (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))))) (*.f64 x.im x.im)) (*.f64 #s(literal 8 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) x.im) (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) x.im) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) x.im))) x.im))))))
#s(approx (+ (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 x.re x.re) (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) x.im) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) x.im) (/.f64 (fma.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) x.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 x.re x.re) (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))))))) x.im))) x.im))) x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) x.im) (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) x.im))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) x.im) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) x.im))) x.im))))))
#s(approx (/ (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 x.re x.re) (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) x.im) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) x.im) (/.f64 (fma.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) x.im)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 x.re x.re) (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (-.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))))))) x.im))) x.im))) x.im))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) x.im) (fma.f64 #s(literal 2 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im)))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x.re x.re) x.im) (fma.f64 #s(literal -1 binary64) (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) x.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re))) x.im))))) x.im))))))
#s(approx (pow (* (* (+ x.re x.im) (- x.re x.im)) x.im) 3) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 9 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 x.re (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 x.re x.re) (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) x.im) (+.f64 (/.f64 (*.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) x.im) (/.f64 (fma.f64 (+.f64 x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal 2 binary64) (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.re x.re) x.re)) x.im)))) x.im))) x.im))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 x.re x.im) (/.f64 x.re x.im))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)) (/.f64 (*.f64 x.re x.re) x.im)) x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)) x.im)) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (fma.f64 #s(literal -1 binary64) x.re (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) x.im)) #s(literal 1 binary64))))
#s(approx (+ x.re x.im) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x.re x.im)) #s(literal 1 binary64)))))
#s(approx (- x.re x.im) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 x.re x.im))))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) x.im)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) x.im) (*.f64 #s(literal 2 binary64) x.re))) x.im)))))
#s(approx (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re)))) x.im) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) x.im) (*.f64 #s(literal 2 binary64) x.re))) x.im)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x.re x.im) (*.f64 #s(literal 2 binary64) (/.f64 x.re x.im))) #s(literal 1 binary64)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 x.re x.re) x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))) x.im)) #s(literal 1 binary64)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.im #s(literal 5 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) x.im) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) x.im)))) x.im))) x.im)) #s(literal 1 binary64)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))))
#s(approx (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re)))) x.im))) x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.re)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)) x.im)) #s(literal 1 binary64)))))
#s(approx (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (*.f64 x.re x.re))) x.im)) (*.f64 #s(literal -1 binary64) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re)))) x.im)) #s(literal 1 binary64)))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))) x.im) (*.f64 #s(literal -8 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))))) x.im) (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) x.im))) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (/ (pow (* (+ x.im x.im) (* x.re x.re)) 3) (+ (* (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (+ x.re x.im) (- x.re x.im))) x.im) (* (* (+ x.im x.im) (* x.re x.re)) (- (* (+ x.im x.im) (* x.re x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.im))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) (+.f64 x.re (*.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.re) x.re) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.re))))))) x.im) (*.f64 #s(literal 8 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re))))))) x.im) (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) x.re (*.f64 #s(literal 2 binary64) x.re))))) x.im))) (*.f64 (*.f64 x.im x.im) x.im))))

eval81.0ms (3.4%)

Memory
-0.9MiB live, 87.8MiB allocated; 14ms collecting garbage
Compiler

Compiled 20 199 to 2 546 computations (87.4% saved)

prune10.0ms (0.4%)

Memory
28.3MiB live, 28.3MiB allocated; 0ms collecting garbage
Pruning

8 alts after pruning (1 fresh and 7 done)

PrunedKeptTotal
New2751276
Fresh000
Picked134
Done044
Total2768284
Accuracy
100.0%
Counts
284 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
8.2%
(+.f64 (/.f64 (pow.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im) #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im) #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im))))))
✓50.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
✓50.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
✓55.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
✓86.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im))
✓55.5%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
✓57.9%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
✓57.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Compiler

Compiled 481 to 248 computations (48.4% saved)

regimes20.0ms (0.9%)

Memory
-4.1MiB live, 40.6MiB allocated; 7ms collecting garbage
Counts
20 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 #s(approx (+ (* x.re x.im) (* x.im x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) #s(approx (* (+ (* x.re x.im) (* x.im 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.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im) #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im) #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re)) x.im))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))) (/.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.im))))))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) (*.f64 x.im x.im))) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
Calls

3 calls:

6.0ms
x.im
5.0ms
x.re
5.0ms
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Results
AccuracySegmentsBranch
94.7%3(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
96.7%2x.re
94.7%3x.im
Compiler

Compiled 13 to 15 computations (-15.4% saved)

regimes4.0ms (0.2%)

Memory
8.3MiB live, 8.3MiB allocated; 0ms collecting garbage
Counts
9 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
Calls

1 calls:

3.0ms
x.re
Results
AccuracySegmentsBranch
96.6%2x.re
Compiler

Compiled 1 to 2 computations (-100% saved)

regimes73.0ms (3.1%)

Memory
-31.4MiB live, 21.8MiB allocated; 13ms collecting garbage
Counts
8 → 3
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Calls

3 calls:

67.0ms
x.re
3.0ms
x.im
2.0ms
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Results
AccuracySegmentsBranch
79.7%2x.im
94.5%3(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
85.7%2x.re
Compiler

Compiled 13 to 15 computations (-15.4% saved)

regimes1.0ms (0.1%)

Memory
4.0MiB live, 4.0MiB allocated; 0ms collecting garbage
Counts
2 → 3
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Calls

1 calls:

1.0ms
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Results
AccuracySegmentsBranch
89.4%3(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Compiler

Compiled 11 to 11 computations (0% saved)

regimes3.0ms (0.1%)

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

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
Calls

3 calls:

1.0ms
x.im
1.0ms
x.re
1.0ms
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Results
AccuracySegmentsBranch
57.8%1x.im
57.8%1x.re
57.8%1(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Compiler

Compiled 13 to 15 computations (-15.4% saved)

bsearch16.0ms (0.7%)

Memory
-11.3MiB live, 34.1MiB allocated; 4ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
15.0ms
8.021290990230091e+145
3.191285610772455e+151
Samples
9.0ms144×0valid
Compiler

Compiled 391 to 385 computations (1.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 4.0ms
ival-mult!: 3.0ms (70.3% of total)
ival-add!: 1.0ms (23.4% of total)
ival-sub!: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)

bsearch8.0ms (0.3%)

Memory
16.6MiB live, 16.6MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
7.0ms
3.558736407691978e+145
8.021290990230091e+145
Samples
4.0ms80×0valid
Compiler

Compiled 227 to 221 computations (2.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 2.0ms
ival-mult!: 2.0ms (84.8% of total)
ival-sub!: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.70234e-319
0.0
Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
0.0ms
-7.70234e-319
0.0
Compiler

Compiled 14 to 16 computations (-14.3% saved)

derivations47.0ms (2%)

Memory
-30.0MiB live, 60.8MiB allocated; 10ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 88 to 60 computations (31.8% saved)

preprocess95.0ms (4%)

Memory
43.8MiB live, 234.8MiB allocated; 27ms collecting garbage
Remove

(negabs x.im)

(abs x.re)

Compiler

Compiled 1 190 to 904 computations (24% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...