math.cube on complex, imaginary part

Time bar (total: 3.3s)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory
0.3MiB live, 0.3MiB 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)

sample1.6s (47.7%)

Memory
-89.0MiB live, 1 234.7MiB allocated; 1.3s collecting garbage
Samples
1.3s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-mult!: 1.0s (94% of total)
ival-add!: 32.0ms (3% of total)
ival-sub!: 31.0ms (2.9% of total)
adjust: 1.0ms (0.1% of total)
Bogosity

preprocess66.0ms (2%)

Memory
-18.4MiB live, 26.2MiB allocated; 14ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
036118
1160102
2568102
3151066
4517466
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶86.2%
(+.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.4%)

Memory
23.2MiB live, 23.2MiB allocated; 0ms collecting garbage
Counts
11 → 26
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)) (* 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.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) (+ 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
@-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))

rewrite51.0ms (1.6%)

Memory
21.4MiB live, 67.7MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0100629
0110558
0618543
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
37 → 97
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)) (* 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.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) (+ 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 #s(literal 1 binary64) (/.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 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 (+.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.re x.im) (-.f64 x.re x.im)) x.im) (neg.f64 (*.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)))
(fma.f64 (neg.f64 (*.f64 x.im x.im)) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (neg.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 x.im (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (neg.f64 (*.f64 x.im x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))) (neg.f64 (*.f64 x.im x.im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 x.im x.im)) (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 x.re x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 x.im x.im)) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 x.im x.im)) (neg.f64 (*.f64 x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 x.re x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (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)))))
(neg.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(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 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (*.f64 x.re x.re))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im)))
(-.f64 (neg.f64 (*.f64 x.im x.im)) (neg.f64 (*.f64 x.re x.re)))
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(+.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.re x.re) (neg.f64 (*.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 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (*.f64 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) (neg.f64 (*.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) (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.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 (+.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 (*.f64 (+.f64 x.re x.im) (-.f64 x.re 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.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 (fma.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))))

eval11.0ms (0.3%)

Memory
-9.3MiB live, 35.9MiB allocated; 4ms collecting garbage
Compiler

Compiled 814 to 351 computations (56.9% saved)

prune18.0ms (0.5%)

Memory
-23.6MiB live, 25.7MiB allocated; 16ms collecting garbage
Pruning

9 alts after pruning (9 fresh and 0 done)

PrunedKeptTotal
New79988
Fresh000
Picked101
Done000
Total80989
Accuracy
95.2%
Counts
89 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶23.0%
(/.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)))
17.2%
(+.f64 (*.f64 (/.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))))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
69.7%
(+.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))
▶50.2%
(+.f64 #s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
86.9%
#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))))
▶89.3%
#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.2%
#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.2%
#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)))
▶62.1%
#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 328 to 288 computations (12.2% saved)

series52.0ms (1.6%)

Memory
34.2MiB live, 120.0MiB allocated; 19ms collecting garbage
Counts
34 → 131
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 #s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 x.re x.re) 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 (*.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 (*.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.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 x.re x.im) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(-.f64 x.re 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 x.im x.im) x.re) x.re)
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 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))
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)) (* 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)) (* 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.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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (+ (* 2 x.im) (* x.re (- (* -1 (/ (+ (* -2 x.im) (* 2 x.im)) x.im)) (+ (* -1 (/ (* (+ x.im (* -1 x.im)) (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (pow x.im 2))) (* -1 (/ (* (- x.im (* 2 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 3)))))))) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -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))) #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))) #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))) #s(hole binary64 (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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) #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)) (* 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.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 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im (+ x.im (* -1 x.im))) (* x.re (- 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 (* 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 (* (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 (* (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 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 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 2) (- (pow x.im 2) (* 4 (pow x.im 2)))) (- x.im (* 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.re 2) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))))) (+ (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) (* (pow x.re 3) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im))))))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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))) #s(hole binary64 (* (pow x.re 4) (- (pow x.im 2) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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))) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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)))) (* 4 (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)) #s(hole binary64 (* (pow x.im 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)) #s(hole binary64 (* (pow x.re 4) (+ (/ (* (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)) #s(hole binary64 (* (pow x.re 4) (+ (/ (* (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)) #s(hole binary64 (* (pow x.re 4) (+ (/ (* (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) #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) (+ 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 (+ 1 (/ x.im 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.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 2) (- x.im (* 2 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) (- (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)) (* 2 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) (- (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))) (* 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.re 2) (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im)))))) x.re)) (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im)))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re)) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 4 (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))) #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))))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 4 (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)) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (* (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)) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* (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)) #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))))) x.re)) (* (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) #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.im x.im) x.re) x.re)) #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))) (* 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 (* 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 (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (- (pow x.re 4) (* 4 (pow x.re 4)))) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (- (pow x.re 2) (* 2 (pow x.re 2))))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (- (pow x.re 2) (* 2 (pow x.re 2))))))) (- (pow x.re 2) (* 2 (pow x.re 2))))))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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))) #s(hole binary64 (* (pow x.im 2) (- (pow x.re 4) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* x.im (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.re 4)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (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)) #s(hole binary64 (* (pow x.im 2) (+ (* 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)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* 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)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* 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.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.im x.im) x.re) x.re)) #s(hole binary64 (* x.im (- (pow x.re 2) (* 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 (* x.im (- (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)) (* 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 (* x.im (- (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)) (* 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 (* (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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ 1 (+ (* -1 (/ x.re x.im)) (/ 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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (/ x.re x.im) (/ (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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (pow x.im 3))) (* 2 (/ (pow x.re 2) (pow x.im 2)))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (+ (* -1 (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* 2 (pow x.re 2))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))))) (pow x.re 2)))) (pow x.im 3))) (+ (* -1 (/ (* (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 3))) (+ (/ x.re x.im) (/ (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))) #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))) #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))))))))))
#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))) #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))))))))))))
#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.im x.im) x.re) x.re)) #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 (* 2 (/ (pow 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 (* -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 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))))) (* (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re))))))) x.im)) (* 2 (pow x.re 2))))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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))) #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))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (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))) #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))) x.im)) (* 2 (pow x.re 2)))) x.im)) (* 2 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 (/ 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.im x.im) x.re) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (* -1 (/ (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) x.im))) x.im)))))))
Calls

6 calls:

TimeVariablePointExpression
11.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.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) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re 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.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.im x.im) x.re) x.re)))
10.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.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) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re 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.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.im x.im) x.re) x.re)))
8.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.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) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re 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.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.im x.im) x.re) x.re)))
6.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.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) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re 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.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.im x.im) x.re) x.re)))
6.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.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) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re 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.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.im x.im) x.re) x.re)))

rewrite324.0ms (9.8%)

Memory
-8.8MiB live, 377.0MiB allocated; 121ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08358552
08806218
176296218
086135976
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
165 → 483
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 #s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 x.re x.re) 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 (*.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 (*.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.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 x.re x.im) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(-.f64 x.re 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 x.im x.im) x.re) x.re)
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 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))
#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)) (* 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)) (* 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.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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (+ (* 2 x.im) (* x.re (- (* -1 (/ (+ (* -2 x.im) (* 2 x.im)) x.im)) (+ (* -1 (/ (* (+ x.im (* -1 x.im)) (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (pow x.im 2))) (* -1 (/ (* (- x.im (* 2 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 3)))))))) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -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))) #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))) #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))) #s(hole binary64 (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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) #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)) (* 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.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 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im (+ x.im (* -1 x.im))) (* x.re (- 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 (* 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 (* (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 (* (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 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 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 2) (- (pow x.im 2) (* 4 (pow x.im 2)))) (- x.im (* 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.re 2) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))))) (+ (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) (* (pow x.re 3) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im))))))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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))) #s(hole binary64 (* (pow x.re 4) (- (pow x.im 2) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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))) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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)))) (* 4 (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)) #s(hole binary64 (* (pow x.im 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)) #s(hole binary64 (* (pow x.re 4) (+ (/ (* (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)) #s(hole binary64 (* (pow x.re 4) (+ (/ (* (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)) #s(hole binary64 (* (pow x.re 4) (+ (/ (* (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) #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) (+ 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 (+ 1 (/ x.im 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.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.re 2) (- x.im (* 2 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) (- (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)) (* 2 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) (- (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))) (* 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.re 2) (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im)))))) x.re)) (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im)))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re)) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 4 (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))) #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))))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 4 (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)) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (* (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)) #s(hole binary64 (* (pow x.re 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* (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)) #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))))) x.re)) (* (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) #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.im x.im) x.re) x.re)) #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))) (* 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 (* 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 (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (- (pow x.re 4) (* 4 (pow x.re 4)))) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (- (pow x.re 2) (* 2 (pow x.re 2))))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (- (pow x.re 2) (* 2 (pow x.re 2))))))) (- (pow x.re 2) (* 2 (pow x.re 2))))))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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))) #s(hole binary64 (* (pow x.im 2) (- (pow x.re 4) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* x.im (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.re 4)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (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)) #s(hole binary64 (* (pow x.im 2) (+ (* 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)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* 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)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* 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.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.im x.im) x.re) x.re)) #s(hole binary64 (* x.im (- (pow x.re 2) (* 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 (* x.im (- (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)) (* 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 (* x.im (- (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)) (* 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 (* (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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ 1 (+ (* -1 (/ x.re x.im)) (/ 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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (/ x.re x.im) (/ (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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (pow x.im 3))) (* 2 (/ (pow x.re 2) (pow x.im 2)))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (+ (* -1 (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* 2 (pow x.re 2))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))))) (pow x.re 2)))) (pow x.im 3))) (+ (* -1 (/ (* (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 3))) (+ (/ x.re x.im) (/ (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))) #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))) #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))))))))))
#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))) #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))))))))))))
#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.im x.im) x.re) x.re)) #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 (* 2 (/ (pow 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 (* -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 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))))) (* (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re))))))) x.im)) (* 2 (pow x.re 2))))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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))) #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))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (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))) #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))) x.im)) (* 2 (pow x.re 2)))) x.im)) (* 2 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 (/ 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.im x.im) x.re) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (* -1 (/ (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) x.im))) x.im)))))))
Outputs
#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.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(*.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im)
(*.f64 x.im (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))) (-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) #s(literal 27 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))))))
(fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 (*.f64 x.im x.im) (neg.f64 x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 x.im (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 #s(literal 3 binary64) x.im)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (neg.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))))
(+.f64 (*.f64 x.im (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im))) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))) (*.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 (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 x.im x.im) (*.f64 x.im x.im))) (fma.f64 (*.f64 x.re x.re) #s(literal 3 binary64) (*.f64 x.im x.im)))
(/.f64 (fma.f64 #s(literal 27 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 x.im x.im) x.im))) (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 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal 27 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))) (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 (*.f64 #s(literal 27 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))) (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)))))
(neg.f64 (-.f64 (*.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 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 (neg.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 x.im x.im) #s(literal -1 binary64) (*.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 -1 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.im (neg.f64 x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (neg.f64 (*.f64 (neg.f64 x.im) x.im)))
(-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.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 (neg.f64 x.im) x.im) (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))
(+.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 x.re x.re))
(+.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
#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)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))))
x.re
(*.f64 (neg.f64 x.im) x.im)
(*.f64 (*.f64 x.im x.im) #s(literal -1 binary64))
(*.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)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.im) #s(literal 2 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) (* (* (+ 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 (*.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)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.im) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 x.im) #s(literal 3 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) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re))
(*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im)
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.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)))
(fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) 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 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.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 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) 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 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))
(/.f64 (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(fma.f64 (*.f64 x.re x.re) #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 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (neg.f64 (*.f64 x.re x.re)))
(+.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 x.im 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) x.im)))) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(/.f64 (-.f64 (*.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (-.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) 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 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))))
(fma.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 2 binary64) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(fma.f64 (+.f64 x.im 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) x.im)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.im) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(fma.f64 x.re (*.f64 (+.f64 x.im x.im) x.re) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(-.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(-.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (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)) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(+.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (+.f64 x.im 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) x.im))
(*.f64 (*.f64 x.re x.re) x.im)
(*.f64 x.im (*.f64 x.re x.re))
(*.f64 x.re (*.f64 x.im x.re))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 2 binary64))
(*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 x.re (*.f64 (+.f64 x.im x.im) x.re))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (*.f64 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 x.re (+.f64 x.im x.im))
(/.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 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im))) (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) (neg.f64 (*.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)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) 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.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 2 binary64) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
(fma.f64 (+.f64 x.im x.im) (*.f64 x.re x.re) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
(fma.f64 x.im (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (+.f64 x.im x.im) (*.f64 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.im x.re)) x.im))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.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.im x.re)) x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im))
(*.f64 (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 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))))) (fma.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 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))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))))
(neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im)))
(fma.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) #s(literal 2 binary64)) (*.f64 (neg.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 (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (pow.f64 (+.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 x.re x.im) x.im) #s(literal 2 binary64)) (*.f64 (neg.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 (pow.f64 (+.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 x.re x.im) x.im) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (pow.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 x.im x.im) (*.f64 (neg.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 (pow.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im (*.f64 (neg.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 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) (*.f64 x.im x.im) (*.f64 (neg.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.im x.re)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (*.f64 (neg.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 (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (*.f64 (neg.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 (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (neg.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.im x.re)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (*.f64 (neg.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 x.re x.im) (+.f64 x.im x.re)) (*.f64 x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(fma.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (neg.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 x.im x.im) (pow.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (neg.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 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (neg.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))))
(*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (+.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 x.re x.im) x.im) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 x.im x.im))
(*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im)
(*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) (*.f64 x.im x.im))
(*.f64 (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)))
(*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)) (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)))
(*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
(*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)))
(*.f64 (*.f64 x.im x.im) (pow.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) #s(literal 2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)
(*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im))
(*.f64 x.im (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) x.im))) (-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 x.re x.re) x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 x.re x.re) x.im)))))
(fma.f64 (*.f64 (neg.f64 x.im) x.im) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 (*.f64 x.im x.im) (neg.f64 x.im) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (neg.f64 x.im) (*.f64 x.re x.re)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (neg.f64 (*.f64 (*.f64 x.re x.re) x.im)))
(+.f64 (*.f64 x.im (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))
(*.f64 (+.f64 x.im x.re) (-.f64 x.re x.im))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (fma.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))) (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)))))
(neg.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(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.im) x.im (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (*.f64 x.re x.re))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 x.re x.re))
(fma.f64 x.im (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 (neg.f64 x.im) x.im))
(-.f64 (*.f64 (neg.f64 x.im) x.im) (neg.f64 (*.f64 x.re x.re)))
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im)
(*.f64 (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)) x.re)
(*.f64 x.im (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)))
(*.f64 x.re (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 x.im x.re))
(/.f64 (fma.f64 (*.f64 x.im x.im) x.im (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 x.im x.im (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.re))))
(/.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.im x.re))))
(/.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (-.f64 x.re x.im))
(fma.f64 #s(literal 1 binary64) x.im (*.f64 (/.f64 x.re x.im) x.im))
(fma.f64 #s(literal 1 binary64) x.re (*.f64 (/.f64 x.im x.re) x.re))
(fma.f64 x.im #s(literal 1 binary64) (*.f64 x.im (/.f64 x.re x.im)))
(fma.f64 x.re #s(literal 1 binary64) (*.f64 x.re (/.f64 x.im x.re)))
(-.f64 x.im (neg.f64 x.re))
(-.f64 x.re (neg.f64 x.im))
(+.f64 (*.f64 x.im #s(literal 1 binary64)) (*.f64 x.im (/.f64 x.re x.im)))
(+.f64 (*.f64 x.re #s(literal 1 binary64)) (*.f64 x.re (/.f64 x.im x.re)))
(+.f64 (*.f64 #s(literal 1 binary64) x.im) (*.f64 (/.f64 x.re x.im) x.im))
(+.f64 (*.f64 #s(literal 1 binary64) x.re) (*.f64 (/.f64 x.im x.re) x.re))
(+.f64 x.im x.re)
(+.f64 x.re x.im)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 x.im x.re)) x.re)
(*.f64 (+.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64)) x.re)
(*.f64 x.re (+.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64)))
(/.f64 (fma.f64 (*.f64 x.re x.re) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))) (fma.f64 x.re x.re (-.f64 (*.f64 x.im x.im) (*.f64 x.re (neg.f64 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.im x.re))))
(/.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (+.f64 x.im x.re))
(neg.f64 (-.f64 x.im x.re))
(fma.f64 #s(literal 1 binary64) x.re (*.f64 (/.f64 (neg.f64 x.im) x.re) x.re))
(fma.f64 #s(literal -1 binary64) x.im x.re)
(fma.f64 x.im #s(literal -1 binary64) x.re)
(fma.f64 x.re #s(literal 1 binary64) (*.f64 x.re (/.f64 (neg.f64 x.im) x.re)))
(-.f64 x.re (neg.f64 (neg.f64 x.im)))
(-.f64 x.re (*.f64 #s(literal 1 binary64) x.im))
(-.f64 x.re x.im)
(+.f64 (*.f64 x.re #s(literal 1 binary64)) (*.f64 x.re (/.f64 (neg.f64 x.im) x.re)))
(+.f64 (*.f64 #s(literal 1 binary64) x.re) (*.f64 (/.f64 (neg.f64 x.im) x.re) x.re))
(+.f64 (neg.f64 x.im) x.re)
(+.f64 x.re (neg.f64 x.im))
(*.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 2 binary64)) #s(literal 4 binary64))
(*.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) x.re) #s(literal 2 binary64)) (*.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 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))
(*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 2 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 x.im x.im)))
(*.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 (+.f64 x.im x.im) x.re) #s(literal 2 binary64)))
(*.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 x.re x.re) x.im) #s(literal 2 binary64))
(*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 x.re (*.f64 (+.f64 x.im x.im) x.re))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.re (*.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (*.f64 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 x.re (+.f64 x.im x.im))
(/.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 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im))) (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) (neg.f64 (*.f64 x.im x.re)))
(+.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 x.im x.im)) x.im)
(*.f64 #s(literal 2 binary64) x.im)
(*.f64 x.im #s(literal 2 binary64))
(/.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 (neg.f64 x.im))
(+.f64 x.im x.im)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) 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 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(neg.f64 (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 x.im (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 x.im (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.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) (neg.f64 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.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)) (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 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.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 (*.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 (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im))
#s(approx (* (* x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) x.im))
#s(approx (* (+ (* x.re x.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) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 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 (-.f64 (fma.f64 (-.f64 (-.f64 (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) x.re (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))) (*.f64 (*.f64 #s(literal 0 binary64) 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) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (fma.f64 (-.f64 (-.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.im)) (neg.f64 (/.f64 (*.f64 (-.f64 (-.f64 (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) (neg.f64 (/.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 (*.f64 x.im x.im) x.im)))) x.re (+.f64 x.im x.im)) (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) x.re (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 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))) (*.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))) (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))) (fma.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)))) 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))) (fma.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im #s(literal 0 binary64)) x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))) x.re (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (*.f64 x.im x.im))) 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) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) 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 x.im (+.f64 x.re (*.f64 #s(literal 0 binary64) x.im))) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (neg.f64 x.im) x.im (*.f64 (+.f64 (-.f64 x.re x.im) x.im) x.re)))
#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 (* (* (* (+ 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)) (fma.f64 (fma.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 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) x.im) #s(literal 3 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 (fma.f64 #s(literal 2 binary64) x.im (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 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 (fma.f64 #s(literal 3 binary64) x.im (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* 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.im) (- x.re x.im)) x.im) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re)) x.im) (*.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.re x.re) (/.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (-.f64 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 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) 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 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (*.f64 x.re x.re))))) (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (fma.f64 x.im (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) x.re)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.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.re x.re) (-.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) 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 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))))) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))))) (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (fma.f64 x.im (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (fma.f64 x.im (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 #s(literal 0 binary64) x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 x.im (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) x.re)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re)))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 x.im x.im (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.re) (fma.f64 x.im x.im (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.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 x.im x.im (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (-.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)))) (*.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.re x.im) (- x.re x.im)) 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.re x.im) (- x.re x.im)) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) (*.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))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re 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))) (*.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)) (*.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)))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) x.im) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (+.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) x.im) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (+.f64 (+.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(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ x.re x.im) (+.f64 x.im x.re))
#s(approx (- x.re x.im) (-.f64 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 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 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) 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.im (-.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) (+.f64 x.im x.im))) (*.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 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 x.im (+.f64 x.im x.im))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 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))) (*.f64 (-.f64 (fma.f64 x.im x.im (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.re)))) (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (-.f64 (fma.f64 x.im x.im (neg.f64 (/.f64 (fma.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re)))) x.re))) (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (-.f64 (fma.f64 x.im x.im (neg.f64 (/.f64 (fma.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.re)))) x.re))) x.re))) (*.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.re x.im) (- x.re x.im)) x.im)) (*.f64 (fma.f64 x.im x.im (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #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.re x.im) (- x.re x.im)) x.im)) (*.f64 (fma.f64 x.im x.im (neg.f64 (/.f64 (fma.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re)))) 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.re x.im) (- x.re x.im)) x.im)) (*.f64 (fma.f64 x.im x.im (neg.f64 (/.f64 (fma.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.re)))) x.re))) 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) (*.f64 (+.f64 (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)) x.im) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 x.im x.im) x.re) (neg.f64 (*.f64 #s(literal 0 binary64) x.im))) x.re)) #s(literal 1 binary64)) (*.f64 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.im x.im) x.re) x.re)) (*.f64 (-.f64 (+.f64 (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)) 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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) x.im) #s(literal 3 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.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)) (neg (* 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) x.im) (*.f64 (*.f64 x.im x.im) x.im))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im 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 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) x.im) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.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 (fma.f64 x.im (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 #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 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) #s(literal 4 binary64)) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.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 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal -2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))))) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))) x.im (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) #s(literal 4 binary64)) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.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 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (/.f64 x.re (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal -2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))))) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))))))) x.im)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))))) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 #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)))))) x.im (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) #s(literal 4 binary64)) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.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))) (*.f64 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) x.im (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) x.im)) x.im (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 (*.f64 x.re #s(literal 0 binary64)) x.im)) x.im)) x.im (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.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.re x.im) (- x.re x.im)) x.im)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) x.im (*.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.re x.im) (- x.re x.im)) x.im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) x.im)) x.im (*.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.re x.im) (- x.re x.im)) x.im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (*.f64 (*.f64 x.re #s(literal 0 binary64)) x.im)) x.im)) x.im (*.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) (*.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (*.f64 x.re x.re)) x.im))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (*.f64 x.re x.re)) x.im))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.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)) (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (*.f64 x.re x.re)))
#s(approx (- x.re x.im) (-.f64 x.re 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.im x.im) x.re) x.re)) (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re 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 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re 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 (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.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 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) #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 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) #s(literal -1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) #s(literal -1 binary64)) (*.f64 x.im x.im)))
#s(approx (* (* (+ x.re x.im) (- x.re 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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))) (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal 1 binary64))) (*.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))) (*.f64 (-.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64)))) (/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) #s(literal 1 binary64)) (+.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.im x.im)))) (/.f64 x.re x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (/.f64 (neg.f64 x.re) 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))) (*.f64 (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64)))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) (*.f64 (*.f64 x.im x.im) x.im))))) #s(literal 1 binary64)) (+.f64 (+.f64 (/.f64 (neg.f64 x.re) x.im) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.im x.im))))) (+.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) x.im)))) (/.f64 x.re x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re x.re))) (*.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))) (*.f64 (fma.f64 (/.f64 x.re x.im) #s(literal 0 binary64) #s(literal 1 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))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -4 binary64) (fma.f64 (/.f64 x.re x.im) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.im x.im)))) #s(literal 1 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))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -4 binary64) (fma.f64 (/.f64 x.re x.im) #s(literal -2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) #s(literal -2 binary64) (fma.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im))) (/.f64 (+.f64 x.re x.re) x.im))))) #s(literal 1 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) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal -1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (-.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)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal -1 binary64)) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.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)) (*.f64 x.im x.im)))
#s(approx (+ x.re x.im) (+.f64 x.im x.re))
#s(approx (- x.re x.im) (*.f64 (-.f64 (/.f64 x.re x.im) #s(literal 1 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 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) #s(literal 1 binary64))) (*.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))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 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 (*.f64 (*.f64 x.im x.im) (neg.f64 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 (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (/.f64 (neg.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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (*.f64 x.re #s(literal 0 binary64)) (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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (neg.f64 (*.f64 x.re x.re)))) x.im)))) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) x.im)) #s(literal 1 binary64)) (*.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))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (-.f64 (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (neg.f64 (*.f64 x.re x.re))))))) x.im)))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (neg.f64 (*.f64 x.re x.re))))) x.im))) (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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (+.f64 (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))) #s(literal 1 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))) (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) x.im)))) x.im)) #s(literal 1 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))) (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) x.im)))) x.im)))) x.im)) #s(literal 1 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) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (fma.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) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 x.re x.re) x.im) (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 (neg.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal 1 binary64))) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.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)) (*.f64 x.im x.im)))
#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 (/.f64 (neg.f64 x.re) x.im) #s(literal 1 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.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) x.im)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) x.im)) #s(literal 1 binary64))))

eval57.0ms (1.7%)

Memory
-8.1MiB live, 134.2MiB allocated; 28ms collecting garbage
Compiler

Compiled 9 293 to 2 293 computations (75.3% saved)

prune17.0ms (0.5%)

Memory
-3.9MiB live, 41.5MiB allocated; 5ms collecting garbage
Pruning

13 alts after pruning (12 fresh and 1 done)

PrunedKeptTotal
New44611457
Fresh314
Picked415
Done000
Total45313466
Accuracy
100.0%
Counts
466 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶50.2%
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
28.0%
(/.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))) #s(approx (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))))
4.7%
(/.f64 #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))) (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 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)))
17.2%
(+.f64 (*.f64 (/.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))))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
55.6%
(+.f64 #s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) (*.f64 x.re (*.f64 x.im x.re))) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
▶89.3%
#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.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im))
▶50.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))) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
▶86.9%
#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 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
62.2%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow.f64 (neg.f64 x.im) #s(literal 3 binary64)))
50.2%
#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 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) x.im))
50.2%
#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.2%
#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)))
✓62.1%
#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 557 to 455 computations (18.3% saved)

series41.0ms (1.3%)

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

6 calls:

TimeVariablePointExpression
23.0ms
x.im
@-inf
((/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.re) 3) (* x.im x.im)) x.im) (- (* (* x.re x.re) 3) (* x.im x.im)) (* (* x.re x.re) 3) (* x.re x.re) x.re 3 (* 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)) (* (* x.re x.re) (* 3 x.im)) (* 3 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.re x.re) x.im) 3) (* (* x.re x.re) x.im) (+ (* (* (+ 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.im x.im) (* (* (+ x.re x.im) (- 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)) (+ (* (* (* x.re x.re) 3) x.im) (* (* x.im x.im) (neg x.im))) (* (* x.im x.im) (neg x.im)) (neg x.im))
3.0ms
x.im
@inf
((/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.re) 3) (* x.im x.im)) x.im) (- (* (* x.re x.re) 3) (* x.im x.im)) (* (* x.re x.re) 3) (* x.re x.re) x.re 3 (* 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)) (* (* x.re x.re) (* 3 x.im)) (* 3 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.re x.re) x.im) 3) (* (* x.re x.re) x.im) (+ (* (* (+ 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.im x.im) (* (* (+ x.re x.im) (- 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)) (+ (* (* (* x.re x.re) 3) x.im) (* (* x.im x.im) (neg x.im))) (* (* x.im x.im) (neg x.im)) (neg x.im))
3.0ms
x.im
@0
((/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.re) 3) (* x.im x.im)) x.im) (- (* (* x.re x.re) 3) (* x.im x.im)) (* (* x.re x.re) 3) (* x.re x.re) x.re 3 (* 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)) (* (* x.re x.re) (* 3 x.im)) (* 3 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.re x.re) x.im) 3) (* (* x.re x.re) x.im) (+ (* (* (+ 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.im x.im) (* (* (+ x.re x.im) (- 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)) (+ (* (* (* x.re x.re) 3) x.im) (* (* x.im x.im) (neg x.im))) (* (* x.im x.im) (neg x.im)) (neg x.im))
3.0ms
x.re
@inf
((/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.re) 3) (* x.im x.im)) x.im) (- (* (* x.re x.re) 3) (* x.im x.im)) (* (* x.re x.re) 3) (* x.re x.re) x.re 3 (* 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)) (* (* x.re x.re) (* 3 x.im)) (* 3 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.re x.re) x.im) 3) (* (* x.re x.re) x.im) (+ (* (* (+ 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.im x.im) (* (* (+ x.re x.im) (- 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)) (+ (* (* (* x.re x.re) 3) x.im) (* (* x.im x.im) (neg x.im))) (* (* x.im x.im) (neg x.im)) (neg x.im))
3.0ms
x.re
@-inf
((/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.re) 3) (* x.im x.im)) x.im) (- (* (* x.re x.re) 3) (* x.im x.im)) (* (* x.re x.re) 3) (* x.re x.re) x.re 3 (* 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)) (* (* x.re x.re) (* 3 x.im)) (* 3 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.re x.re) x.im) 3) (* (* x.re x.re) x.im) (+ (* (* (+ 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.im x.im) (* (* (+ x.re x.im) (- 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)) (+ (* (* (* x.re x.re) 3) x.im) (* (* x.im x.im) (neg x.im))) (* (* x.im x.im) (neg x.im)) (neg x.im))

rewrite230.0ms (7%)

Memory
46.1MiB live, 325.3MiB allocated; 73ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05695823
05944188
155544188
081224004
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
91 → 257
Calls
Call 1
Inputs
#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.re x.re) #s(literal 3 binary64)) (*.f64 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)
(-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 x.re x.re)
x.re
#s(literal 3 binary64)
(*.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 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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 x.re x.re) x.im)
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 x.im x.im)
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) 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)) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
(fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(*.f64 (*.f64 x.im x.im) (neg.f64 x.im))
(neg.f64 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 (* -1 (pow x.im 3))))
#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 (+ (* -1 (pow x.im 3)) (* x.re (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (+ (* 2 x.im) (* x.re (- (* -1 (/ (+ (* -2 x.im) (* 2 x.im)) x.im)) (+ (* -1 (/ (* (+ x.im (* -1 x.im)) (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (pow x.im 2))) (* -1 (/ (* (- x.im (* 2 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 3)))))))) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -1 x.im))))))))
#s(approx (* (- (* (* x.re x.re) 3) (* x.im x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* (* x.re x.re) 3) #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 (+ (* (- (* 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 x.re) x.im) #s(hole binary64 (* x.im (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)) (* x.im (* x.re (+ x.im (* -1 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 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im (+ x.im (* -1 x.im))) (* x.re (+ x.im (* 2 x.im))))))))
#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) #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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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) (- (pow x.im 2) (* 4 (pow x.im 2)))) (- x.im (* 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.re 2) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))))) (+ (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) (* (pow x.re 3) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im))))))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 x.im)) 2))))))))))))
#s(approx (* (- (* (* x.re x.re) 3) (* 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 (- (* (* x.re x.re) 3) (* 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 (* (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.im x.im) x.re) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* 2 x.im) (/ (* x.im (+ x.im (* -1 x.im))) x.re))))))
#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) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (+ (* 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 (/ (* 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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im)))))) x.re)) (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im)))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (+ (* -1 (* x.im (+ x.im (* -1 x.im)))) (/ (pow x.im 3) x.re)) x.re)) (* 2 x.im))))))
#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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (- (pow x.re 4) (* 4 (pow x.re 4)))) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (- (pow x.re 2) (* 2 (pow x.re 2))))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (- (pow x.re 2) (* 2 (pow x.re 2))))))) (- (pow x.re 2) (* 2 (pow x.re 2))))))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2)))))))))
#s(approx (* (- (* (* x.re x.re) 3) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (- (* (* x.re x.re) 3) (* 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 (+ (* (- (* 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 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.re (* -1 x.re))) (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.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2))))))
#s(approx (+ x.im x.im) #s(hole binary64 (* 2 x.im)))
#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 (neg x.im) #s(hole binary64 (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 3) (- (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ 1 (+ (* -1 (/ x.re x.im)) (/ 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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (/ x.re x.im) (/ (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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (pow x.im 3))) (* 2 (/ (pow x.re 2) (pow x.im 2)))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (+ (* -1 (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* 2 (pow x.re 2))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))))) (pow x.re 2)))) (pow x.im 3))) (+ (* -1 (/ (* (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 3))) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2))))))))))))
#s(approx (* (- (* (* x.re x.re) 3) (* 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 (- (* (* x.re x.re) 3) (* 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 (* (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.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 x.im)) (/ 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 (* (pow x.im 3) (- (+ (* -1 (/ x.re x.im)) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ x.re x.im) (/ (pow 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) (/ (pow x.re 2) (pow x.im 2)))) 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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))))) (* (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re))))))) x.im)) (* 2 (pow x.re 2))))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -1 x.re)))) x.im)))))))
#s(approx (* (- (* (* x.re x.re) 3) (* 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) (* (+ (* 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.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 x.im)) (/ 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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (* -1 (/ (+ (* -2 (pow x.re 2)) (* -1 (pow x.re 2))) 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 (/ (+ (* -1 (+ x.re (* -1 x.re))) (/ (pow x.re 2) 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 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 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)
(*.f64 x.im (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
(fma.f64 (neg.f64 (*.f64 x.im x.im)) x.im (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 x.im (neg.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(+.f64 (*.f64 x.im (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(+.f64 (*.f64 (neg.f64 (*.f64 x.im x.im)) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (neg.f64 (*.f64 x.im x.im)))) (neg.f64 (*.f64 x.im x.im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.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 (*.f64 x.im x.im)) (neg.f64 (*.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 (neg.f64 (*.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 x.im x.im) (*.f64 x.im x.im))) (fma.f64 (*.f64 x.re x.re) #s(literal 3 binary64) (*.f64 x.im x.im)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) #s(literal -1 binary64) (*.f64 #s(literal 27 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)))) (fma.f64 (neg.f64 (*.f64 x.im x.im)) (neg.f64 (*.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 (neg.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))
(/.f64 (-.f64 (*.f64 #s(literal 27 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))) (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)))))
(neg.f64 (-.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 (*.f64 x.re x.re) #s(literal 3 binary64) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (*.f64 x.re x.re) #s(literal 3 binary64) (neg.f64 (*.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 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 x.re (*.f64 x.re #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.re (*.f64 x.re #s(literal 3 binary64)) (neg.f64 (*.f64 x.im x.im)))
(-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))
(-.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 #s(literal -3 binary64) (*.f64 x.re x.re)))
(-.f64 (neg.f64 (*.f64 x.im x.im)) (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))
(+.f64 (+.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 x.re x.re))
(+.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (neg.f64 (*.f64 x.im x.im)))
(+.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(*.f64 x.re (*.f64 x.re #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))
(/.f64 (fma.f64 #s(literal 8 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(fma.f64 (*.f64 x.re x.re) #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 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (neg.f64 (*.f64 x.re x.re)))
(+.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 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))
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))))
x.re
#s(literal 3 binary64)
(*.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))
(/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) (sinh.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.im) (*.f64 x.re x.re))
(*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im)
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.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 (*.f64 #s(literal 3 binary64) x.im) x.re))
(fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) 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 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.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 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) 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 1 binary64) (/.f64 (+.f64 x.im x.im) x.im)) x.im)
(*.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 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (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 (+.f64 #s(literal 1 binary64) (/.f64 x.im x.im)) 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 (neg.f64 (+.f64 x.im 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.im) (*.f64 x.re x.re))
(*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im)
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.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 (*.f64 #s(literal 3 binary64) x.im) x.re))
(fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) 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 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.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 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) 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))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.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 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (*.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))) (-.f64 (*.f64 (+.f64 x.im 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) x.im))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 3 binary64)) (pow.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (-.f64 (*.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im))) (*.f64 (*.f64 (+.f64 x.im 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) x.im))))))
(fma.f64 (+.f64 x.im 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) x.im)))
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(fma.f64 x.re (*.f64 (+.f64 x.im x.im) x.re) #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)))
(-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (neg.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im))))
(+.f64 #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (*.f64 x.re x.re) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 (+.f64 x.im 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) x.im)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (*.f64 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 x.re (+.f64 x.im x.im))
(/.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 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im))) (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) (neg.f64 (*.f64 x.im x.re)))
(+.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 x.im x.im)) x.im)
(*.f64 #s(literal 2 binary64) x.im)
(*.f64 x.im #s(literal 2 binary64))
(/.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 (neg.f64 x.im))
(+.f64 x.im x.im)
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) 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)) (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))) (-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))) (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) #s(literal 27 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) #s(literal 27 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))))
(fma.f64 (pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 (*.f64 x.im x.im) (neg.f64 x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 (neg.f64 x.im) (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 x.im (*.f64 x.im (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(fma.f64 x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(fma.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (neg.f64 (*.f64 x.im x.im)) (neg.f64 x.im)))
(-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (neg.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.re x.re) x.im)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 #s(literal 3 binary64) x.im)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (neg.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 1 binary64)))
(*.f64 (*.f64 x.im x.im) (neg.f64 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))
(*.f64 (neg.f64 x.im) (*.f64 x.im x.im))
(*.f64 x.im (*.f64 x.im (neg.f64 x.im)))
(pow.f64 (neg.f64 x.im) #s(literal 3 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 x.im) #s(literal -3 binary64)))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 3 binary64)))
(*.f64 #s(literal -1 binary64) x.im)
(*.f64 x.im #s(literal -1 binary64))
(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)) (*.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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) 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 x.re (-.f64 (fma.f64 (-.f64 (-.f64 (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) x.re (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) (*.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 (fma.f64 (-.f64 (-.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.im)) (neg.f64 (/.f64 (*.f64 (-.f64 (-.f64 (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) (neg.f64 (/.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 (*.f64 x.im x.im) x.im)))) x.re (+.f64 x.im x.im)) (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) x.re (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (* (- (* (* x.re x.re) 3) (* x.im x.im)) x.im) (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im)))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (* (* x.re x.re) 3) (*.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 (+ (* (- (* 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) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (* (* x.re x.re) (* 3 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 (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) x.im (*.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 (fma.f64 (*.f64 #s(literal 3 binary64) x.im) x.re (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#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) (fma.f64 (*.f64 x.im (+.f64 x.re (*.f64 #s(literal 0 binary64) x.im))) 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)) (*.f64 (*.f64 x.re x.re) (/.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (-.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 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) 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 (-.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (*.f64 x.re x.re) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (*.f64 x.re x.re))))) (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (fma.f64 x.im (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) x.re)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (*.f64 x.re x.re) (-.f64 x.im (+.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.re x.re) (-.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (*.f64 x.re x.re) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) 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 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))))) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))))) (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (fma.f64 x.im (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (fma.f64 x.im (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 #s(literal 0 binary64) x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 x.im (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) x.re)) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (*.f64 x.re x.re) (-.f64 x.im (+.f64 x.im x.im))))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (*.f64 x.re x.re))))))))
#s(approx (* (- (* (* x.re x.re) 3) (* x.im x.im)) x.im) (*.f64 (fma.f64 #s(literal 3 binary64) x.im (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) (*.f64 (+.f64 (/.f64 (neg.f64 (*.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 (fma.f64 #s(literal 2 binary64) x.im (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 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) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) x.im (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) 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 (+.f64 (+.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (+.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) x.im) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) x.im) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (+.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 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) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 x.im (+.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 (+.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 x.im (+.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.re x.re) (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64))) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 x.im (+.f64 x.im x.im))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 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 (fma.f64 #s(literal 2 binary64) 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))) x.im) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (+.f64 (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)) 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 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) x.im) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #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 (fma.f64 x.im (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 4 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 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal -2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))))) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) x.im (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 4 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 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (/.f64 x.re (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal -2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))))))) x.im)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))))) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) x.im (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 4 binary64)))) x.im))
#s(approx (* (- (* (* x.re x.re) 3) (* 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 (- (* (* x.re x.re) 3) (* 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 (+ (* (- (* 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.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 (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (*.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 (*.f64 x.re x.re) #s(literal 2 binary64) (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (*.f64 x.re x.re))) 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) (*.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (*.f64 x.re x.re)) x.im))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (*.f64 x.re x.re)) x.im))
#s(approx (neg 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)) (*.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im)) (fma.f64 #s(literal 0 binary64) (/.f64 x.re 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) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (-.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im))) (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (*.f64 x.im x.im))) #s(literal 1 binary64)) (+.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.im x.im)))) (/.f64 x.re x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (/.f64 (neg.f64 x.re) 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 (-.f64 (+.f64 (+.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (*.f64 x.im x.im)) (neg.f64 (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) (*.f64 (*.f64 x.im x.im) x.im))))) #s(literal 1 binary64)) (+.f64 (+.f64 (/.f64 (neg.f64 x.re) x.im) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.im x.im))))) (+.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (/.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (*.f64 (*.f64 x.im x.im) x.im)))) (/.f64 x.re x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) x.im))))))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (- (* (* x.re x.re) 3) (* x.im x.im)) x.im) (*.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) #s(literal -1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) (*.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) #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 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) #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)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re 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) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (-.f64 (+.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (/.f64 x.re x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (/.f64 (neg.f64 x.re) x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (-.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)) (*.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 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) x.im)) #s(literal 1 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 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (*.f64 x.re x.re) #s(literal -4 binary64))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (neg.f64 (*.f64 x.re x.re)))) x.im)))) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) 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) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (-.f64 (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -4 binary64) (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (*.f64 x.re x.re) #s(literal -4 binary64))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (neg.f64 (*.f64 x.re x.re))))))) x.im)))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (neg.f64 (*.f64 x.re x.re))))) x.im))) (neg.f64 (*.f64 #s(literal 0 binary64) x.re)))) x.im)) #s(literal 1 binary64))))
#s(approx (* (- (* (* x.re x.re) 3) (* x.im x.im)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 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 (+ (* (- (* 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)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 1 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) (neg.f64 x.im)) (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal 1 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) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) x.im)) (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)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 x.re x.re) x.im) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) x.im)) #s(literal 1 binary64))))

eval32.0ms (1%)

Memory
-7.4MiB live, 84.1MiB allocated; 8ms collecting garbage
Compiler

Compiled 3 904 to 1 222 computations (68.7% saved)

prune32.0ms (1%)

Memory
-35.4MiB live, 38.8MiB allocated; 35ms collecting garbage
Pruning

12 alts after pruning (8 fresh and 4 done)

PrunedKeptTotal
New2755280
Fresh437
Picked235
Done011
Total28112293
Accuracy
100.0%
Counts
293 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
55.7%
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re #s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 x.re (*.f64 x.im x.re))))
▶4.7%
(/.f64 #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))) (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 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)))
✓89.3%
#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.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im))
▶50.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))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) x.im) #s(literal 3 binary64)))
▶55.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))) (*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64)))
✓86.9%
#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 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
▶62.2%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow.f64 (neg.f64 x.im) #s(literal 3 binary64)))
50.2%
#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 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) (*.f64 #s(literal 3 binary64) x.im)))
50.2%
#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.2%
#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.6%
#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 (*.f64 #s(literal 3 binary64) x.im) x.re)))
✓62.1%
#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 453 to 367 computations (19% saved)

series33.0ms (1%)

Memory
22.6MiB live, 70.6MiB allocated; 4ms collecting garbage
Counts
38 → 112
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)) (pow.f64 (neg.f64 x.im) #s(literal 3 binary64)))
(pow.f64 (neg.f64 x.im) #s(literal 3 binary64))
(neg.f64 x.im)
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 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re)))
(*.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re))
x.re
(*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re)
(*.f64 #s(literal 3 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) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64)))
(*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64))
(*.f64 x.re (*.f64 x.im x.re))
(*.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 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) x.im) #s(literal 3 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) x.im)
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64)))
#s(literal 1 binary64)
(pow.f64 x.re #s(literal -2 binary64))
#s(literal -2 binary64)
(/.f64 #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))) (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))
(*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)))
(*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))
#s(literal -4 binary64)
(*.f64 x.im x.im)
(*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))
(*.f64 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 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)
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 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)) #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 (* (* 3 x.im) x.re)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (* 3 x.im) x.re) #s(hole binary64 (* 3 (* 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 (+ (* -1 (pow x.im 3)) (* x.re (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (+ (* 2 x.im) (* x.re (- (* -1 (/ (+ (* -2 x.im) (* 2 x.im)) x.im)) (+ (* -1 (/ (* (+ x.im (* -1 x.im)) (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (pow x.im 2))) (* -1 (/ (* (- x.im (* 2 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 3)))))))) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -1 x.im))))))))
#s(approx (* x.re (* x.im x.re)) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (/ 1 (pow x.re -2)) #s(hole binary64 (pow x.re 2)))
#s(approx (pow x.re -2) #s(hole binary64 (/ 1 (pow x.re 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))) #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))) #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))) #s(hole binary64 (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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.im x.im) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) #s(hole binary64 (* (pow x.re 4) (+ (* -4 (pow x.im 2)) (pow x.im 2)))))
#s(approx (* (* x.re x.re) (* x.re x.re)) #s(hole binary64 (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 (+ (* -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) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im (+ x.im (* -1 x.im))) (* x.re (- x.im (* 2 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.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.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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) (- (pow x.im 2) (* 4 (pow x.im 2)))) (- x.im (* 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.re 2) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))))) (+ (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) (* (pow x.re 3) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im))))))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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))) #s(hole binary64 (* (pow x.re 4) (- (pow x.im 2) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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))) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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)))) (* 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.re 2) (- x.im (* 2 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) (- (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)) (* 2 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) (- (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))) (* 2 x.im)))))
#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) (+ 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 (+ 1 (/ x.im 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 2) (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im)))))) x.re)) (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im)))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re)) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 4 (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))) #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))))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 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.re 2) (- (+ x.im (* -1 (/ (+ (* -1 (* x.im (+ x.im (* -1 x.im)))) (/ (pow x.im 3) x.re)) x.re))) (* 2 x.im)))))
#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.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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (- (pow x.re 4) (* 4 (pow x.re 4)))) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (- (pow x.re 2) (* 2 (pow x.re 2))))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (- (pow x.re 2) (* 2 (pow x.re 2))))))) (- (pow x.re 2) (* 2 (pow x.re 2))))))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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))) #s(hole binary64 (* (pow x.im 2) (- (pow x.re 4) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* x.im (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.re 4)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (pow x.re 4))))))
#s(approx (* (+ (* x.im x.im) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) #s(hole binary64 (* -3 (* (pow x.im 2) (pow x.re 4)))))
#s(approx (+ (* x.im x.im) (* -4 (* x.im x.im))) #s(hole binary64 (* -3 (pow x.im 2))))
#s(approx (* -4 (* x.im x.im)) #s(hole binary64 (* -4 (pow x.im 2))))
#s(approx (* x.im x.im) #s(hole binary64 (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 (* x.im (- (pow x.re 2) (* 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 (* x.im (- (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)) (* 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 (* x.im (- (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)) (* 2 (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.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.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ 1 (+ (* -1 (/ x.re x.im)) (/ 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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (/ x.re x.im) (/ (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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (pow x.im 3))) (* 2 (/ (pow x.re 2) (pow x.im 2)))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (+ (* -1 (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* 2 (pow x.re 2))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))))) (pow x.re 2)))) (pow x.im 3))) (+ (* -1 (/ (* (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 3))) (+ (/ x.re x.im) (/ (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))) #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))) #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))))))))))
#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))) #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))))))))))))
#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 3) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#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 3) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) (+ 1 (* 2 (/ (pow x.re 2) (pow x.im 2))))))))
#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.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))))) (* (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re))))))) x.im)) (* 2 (pow x.re 2))))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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))) #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))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (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))) #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))) x.im)) (* 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.im x.im) x.re) x.re)) #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) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (* -1 (/ (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) 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 (/ (+ (* -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)))))))
Calls

6 calls:

TimeVariablePointExpression
7.0ms
x.re
@-inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow (neg x.im) 3) (neg x.im) x.im 3 (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* (* 3 x.im) x.re)) x.re (* (* 3 x.im) x.re) (* 3 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.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* x.im x.re) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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))) (* (* (/ 1 (pow x.re -2)) x.im) 3) (* (/ 1 (pow x.re -2)) x.im) (/ 1 (pow x.re -2)) 1 (pow x.re -2) -2 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.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) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) (+ (* x.im x.im) (* -4 (* x.im x.im))) (* -4 (* x.im x.im)) -4 (* x.im x.im) (* (* x.re x.re) (* x.re x.re)) (* x.re x.re) (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ 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.re x.im) (- x.re x.im) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im))
5.0ms
x.im
@-inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow (neg x.im) 3) (neg x.im) x.im 3 (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* (* 3 x.im) x.re)) x.re (* (* 3 x.im) x.re) (* 3 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.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* x.im x.re) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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))) (* (* (/ 1 (pow x.re -2)) x.im) 3) (* (/ 1 (pow x.re -2)) x.im) (/ 1 (pow x.re -2)) 1 (pow x.re -2) -2 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.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) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) (+ (* x.im x.im) (* -4 (* x.im x.im))) (* -4 (* x.im x.im)) -4 (* x.im x.im) (* (* x.re x.re) (* x.re x.re)) (* x.re x.re) (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ 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.re x.im) (- x.re x.im) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im))
4.0ms
x.im
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow (neg x.im) 3) (neg x.im) x.im 3 (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* (* 3 x.im) x.re)) x.re (* (* 3 x.im) x.re) (* 3 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.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* x.im x.re) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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))) (* (* (/ 1 (pow x.re -2)) x.im) 3) (* (/ 1 (pow x.re -2)) x.im) (/ 1 (pow x.re -2)) 1 (pow x.re -2) -2 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.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) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) (+ (* x.im x.im) (* -4 (* x.im x.im))) (* -4 (* x.im x.im)) -4 (* x.im x.im) (* (* x.re x.re) (* x.re x.re)) (* x.re x.re) (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ 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.re x.im) (- x.re x.im) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im))
4.0ms
x.im
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow (neg x.im) 3) (neg x.im) x.im 3 (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* (* 3 x.im) x.re)) x.re (* (* 3 x.im) x.re) (* 3 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.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* x.im x.re) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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))) (* (* (/ 1 (pow x.re -2)) x.im) 3) (* (/ 1 (pow x.re -2)) x.im) (/ 1 (pow x.re -2)) 1 (pow x.re -2) -2 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.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) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) (+ (* x.im x.im) (* -4 (* x.im x.im))) (* -4 (* x.im x.im)) -4 (* x.im x.im) (* (* x.re x.re) (* x.re x.re)) (* x.re x.re) (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ 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.re x.im) (- x.re x.im) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im))
4.0ms
x.re
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow (neg x.im) 3) (neg x.im) x.im 3 (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* x.re (* (* 3 x.im) x.re)) x.re (* (* 3 x.im) x.re) (* 3 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.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* x.im x.re) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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))) (* (* (/ 1 (pow x.re -2)) x.im) 3) (* (/ 1 (pow x.re -2)) x.im) (/ 1 (pow x.re -2)) 1 (pow x.re -2) -2 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.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) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) (+ (* x.im x.im) (* -4 (* x.im x.im))) (* -4 (* x.im x.im)) -4 (* x.im x.im) (* (* x.re x.re) (* x.re x.re)) (* x.re x.re) (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ 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.re x.im) (- x.re x.im) (* (* (+ x.im x.im) x.re) x.re) (* (+ x.im x.im) x.re) (+ x.im x.im))

rewrite230.0ms (7%)

Memory
-12.5MiB live, 318.8MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07887820
08285498
172845498
082585307
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
150 → 381
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)) (pow.f64 (neg.f64 x.im) #s(literal 3 binary64)))
(pow.f64 (neg.f64 x.im) #s(literal 3 binary64))
(neg.f64 x.im)
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 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re)))
(*.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re))
x.re
(*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re)
(*.f64 #s(literal 3 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) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64)))
(*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64))
(*.f64 x.re (*.f64 x.im x.re))
(*.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 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) x.im) #s(literal 3 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) x.im)
(/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal -2 binary64)))
#s(literal 1 binary64)
(pow.f64 x.re #s(literal -2 binary64))
#s(literal -2 binary64)
(/.f64 #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))) (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))))
(*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)))
(*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))
#s(literal -4 binary64)
(*.f64 x.im x.im)
(*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))
(*.f64 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 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)
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 (+.f64 x.im x.im) 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)) #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 (* (* 3 x.im) x.re)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (* 3 x.im) x.re) #s(hole binary64 (* 3 (* 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 (+ (* -1 (pow x.im 3)) (* x.re (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -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) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (- (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.re (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (+ (* 2 x.im) (* x.re (- (* -1 (/ (+ (* -2 x.im) (* 2 x.im)) x.im)) (+ (* -1 (/ (* (+ x.im (* -1 x.im)) (- (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.im)) (* 2 x.im)) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (pow x.im 2))) (* -1 (/ (* (- x.im (* 2 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 3)))))))) (+ x.im (* -1 (/ (* (+ x.im (* -1 x.im)) (- (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.im)) (* x.im (+ x.im (* -1 x.im))))) (pow x.im 2))))))) (* x.im (+ x.im (* -1 x.im))))))))
#s(approx (* x.re (* x.im x.re)) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (/ 1 (pow x.re -2)) #s(hole binary64 (pow x.re 2)))
#s(approx (pow x.re -2) #s(hole binary64 (/ 1 (pow x.re 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))) #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))) #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))) #s(hole binary64 (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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))) #s(hole binary64 (+ (* x.re (+ (* x.re (+ (* (pow x.im 2) (* x.re (+ (* -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.im x.im) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) #s(hole binary64 (* (pow x.re 4) (+ (* -4 (pow x.im 2)) (pow x.im 2)))))
#s(approx (* (* x.re x.re) (* x.re x.re)) #s(hole binary64 (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 (+ (* -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) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.re (+ (* x.im (+ x.im (* -1 x.im))) (* x.re (- x.im (* 2 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.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.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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) (- (pow x.im 2) (* 4 (pow x.im 2)))) (- x.im (* 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.re 2) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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 2) (- (+ (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (* x.re (- x.im (* 2 x.im)))) (+ (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (/ (pow x.im 2) (- x.im (* 2 x.im)))))) (+ (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) (* (pow x.re 3) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (* (pow x.re 2) (pow (- x.im (* 2 x.im)) 2)))) (+ (* 4 (/ (pow x.im 2) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im))))))) (* (pow x.re 3) (- x.im (* 2 x.im)))) (+ (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (* (pow x.re 2) (- x.im (* 2 x.im)))) (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (* x.re (pow (- x.im (* 2 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))) #s(hole binary64 (* (pow x.re 4) (- (pow x.im 2) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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))) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (/ (* (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)))) (* 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.re 2) (- x.im (* 2 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) (- (+ x.im (/ (* x.im (+ x.im (* -1 x.im))) x.re)) (* 2 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) (- (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (/ (* x.im (+ x.im (* -1 x.im))) x.re))) (* 2 x.im)))))
#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) (+ 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 (+ 1 (/ x.im 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 2) (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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.re 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.im 2) (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2))))) (- x.im (* 2 x.im)))))) x.re)) (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (- x.im (* 2 x.im)))) (+ (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))))) (- x.im (* 2 x.im)))) (* -1 (/ (* (pow x.im 3) (- (pow x.im 2) (* 4 (pow x.im 2)))) (pow (- x.im (* 2 x.im)) 2))))) x.re)) (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) (- x.im (* 2 x.im)))) (* -1 (/ (* x.im (* (+ x.im (* -1 x.im)) (- (pow x.im 2) (* 4 (pow x.im 2))))) (pow (- x.im (* 2 x.im)) 2)))) x.re)) (/ (pow x.im 2) (- x.im (* 2 x.im)))) (* 4 (/ (pow x.im 2) (- x.im (* 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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im))) x.re)) (pow x.im 2)) (* 4 (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))) #s(hole binary64 (* (pow x.re 4) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x.im 2) (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 4 (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))) #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))))) x.re)) (* (pow x.im 2) (+ (* -2 x.im) (* 2 x.im)))) x.re)) (pow x.im 2)) (* 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.re 2) (- (+ x.im (* -1 (/ (+ (* -1 (* x.im (+ x.im (* -1 x.im)))) (/ (pow x.im 3) x.re)) x.re))) (* 2 x.im)))))
#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.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.re x.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (- (pow x.re 4) (* 4 (pow x.re 4)))) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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 (* x.im (- (+ (* x.im (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* x.im (- (+ (* -2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ x.re (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (- (pow x.re 2) (* 2 (pow x.re 2))))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -4 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (- (pow x.re 2) (* 2 (pow x.re 2))))))) (- (pow x.re 2) (* 2 (pow x.re 2))))))))) (+ (* -1 (/ (- (pow x.re 4) (* 4 (pow x.re 4))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2))) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 2 (/ (pow x.re 3) (- (pow x.re 2) (* 2 (pow x.re 2)))))) (/ (* (+ x.re (* -1 x.re)) (- (pow x.re 4) (* 4 (pow x.re 4)))) (pow (- (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) (* 4 (pow x.re 4)))) (pow (- (pow x.re 2) (* 2 (pow x.re 2))) 2)))) (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* 4 (/ (pow x.re 4) (- (pow x.re 2) (* 2 (pow x.re 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))) #s(hole binary64 (* (pow x.im 2) (- (pow x.re 4) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* x.im (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.re 4)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (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))) #s(hole binary64 (* (pow x.im 2) (- (+ (* 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)) (* 4 (pow x.re 4))))))
#s(approx (* (+ (* x.im x.im) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) #s(hole binary64 (* -3 (* (pow x.im 2) (pow x.re 4)))))
#s(approx (+ (* x.im x.im) (* -4 (* x.im x.im))) #s(hole binary64 (* -3 (pow x.im 2))))
#s(approx (* -4 (* x.im x.im)) #s(hole binary64 (* -4 (pow x.im 2))))
#s(approx (* x.im x.im) #s(hole binary64 (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 (* x.im (- (pow x.re 2) (* 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 (* x.im (- (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2)) (* 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 (* x.im (- (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2)) (* 2 (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.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.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ 1 (+ (* -1 (/ x.re x.im)) (/ 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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (* 2 (/ (pow x.re 2) (pow x.im 2))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (/ x.re x.im) (/ (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 3) (- (+ (* -1 (/ (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))) (pow x.im 2))) (+ (* -1 (/ (+ (* -2 x.re) (* 2 x.re)) x.im)) (+ (* -1 (/ (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (pow x.im 3))) (* 2 (/ (pow x.re 2) (pow x.im 2)))))) (+ 1 (+ (* -1 (/ x.re x.im)) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re)))) (pow x.im 2))) (+ (* -1 (/ (* (+ x.re (* -1 x.re)) (- (+ (* -1 (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* 2 (pow x.re 2))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))))) (pow x.re 2)))) (pow x.im 3))) (+ (* -1 (/ (* (- (* -1 (+ (* -2 x.re) (* 2 x.re))) (+ x.re (* -1 x.re))) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 3))) (+ (/ x.re x.im) (/ (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))) #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))) #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))))))))))
#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))) #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))))))))))))
#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 3) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#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 3) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) (+ 1 (* 2 (/ (pow x.re 2) (pow x.im 2))))))))
#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.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (/ (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (- (+ (* -2 x.re) (+ (* -1 (/ (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (+ (* -1 (/ (- (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -4 (pow x.re 2)) (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))))) (* (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re))))))) x.im)) (* 2 (pow x.re 2))))) (+ (* -1 (* (+ x.re (* -1 x.re)) (- (+ (* -2 x.re) (* 2 x.re)) (* -1 (+ x.re (* -1 x.re)))))) (* -1 (pow x.re 2)))) x.im)) (* 2 x.re))) (* -1 (+ x.re (* -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))) #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))) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -1 (/ (+ (* -2 x.re) (+ (* -1 (/ (+ (* -4 (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))) #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))) x.im)) (* 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.im x.im) x.re) x.re)) #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) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (+ 1 (* -1 (/ (+ (* -1 (+ x.re (* -1 x.re))) (* -1 (/ (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2))) 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 (/ (+ (* -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)))))))
Outputs
#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) (neg.f64 x.im)))
(*.f64 (pow.f64 (neg.f64 x.im) #s(literal 3/2 binary64)) (pow.f64 (neg.f64 x.im) #s(literal 3/2 binary64)))
(*.f64 (*.f64 x.im x.im) (neg.f64 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))
(*.f64 (neg.f64 x.im) (*.f64 x.im x.im))
(pow.f64 (neg.f64 x.im) #s(literal 3 binary64))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(exp.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 (neg.f64 x.im)) #s(literal 3 binary64))))
(*.f64 #s(literal -1 binary64) x.im)
(*.f64 x.im #s(literal -1 binary64))
(neg.f64 x.im)
x.im
#s(literal 3 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 #s(literal 3 binary64) x.im) x.re) x.re))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re) x.re)
(*.f64 (*.f64 (*.f64 x.im x.re) x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.im x.re) x.re))
(*.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re))
x.re
(*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re)
(*.f64 #s(literal 3 binary64) (*.f64 x.im x.re))
(*.f64 (*.f64 x.im x.re) #s(literal 3 binary64))
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 x.im x.im) x.im)) x.im)
(*.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 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 x.im x.im) x.im))) (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 (+.f64 #s(literal 1 binary64) (/.f64 x.im x.im)) 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 (neg.f64 (+.f64 x.im 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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 #s(literal 3 binary64) x.im) x.re) x.re))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re) x.re)
(*.f64 (*.f64 (*.f64 x.im x.re) x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.im x.re) x.re))
(*.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re))
(*.f64 (*.f64 x.im x.re) x.re)
(*.f64 x.re (*.f64 x.im x.re))
(*.f64 x.im x.re)
(*.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 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re))
(*.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))
(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 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)))
(+.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 (*.f64 #s(literal 1 binary64) x.im) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))
(*.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 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 #s(literal 1 binary64) (*.f64 x.re x.re))
(*.f64 x.re x.re)
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)) #s(literal -1 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 (pow.f64 (pow.f64 x.re #s(literal 1 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 x.re #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal -1 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal -1 binary64)) (pow.f64 (neg.f64 x.re) #s(literal -1 binary64)))
(*.f64 (pow.f64 x.re #s(literal -1 binary64)) (pow.f64 x.re #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))
(pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))
(pow.f64 x.re #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x.re x.re)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 x.re x.re))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal -2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal -2 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal -2 binary64))))
#s(literal -2 binary64)
(*.f64 #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))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (neg.f64 #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))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 x.re x.re)))) (neg.f64 (-.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 #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))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 x.re x.re))) (-.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (+.f64 x.im x.im) (*.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))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.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))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 x.re x.re)))
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal -3 binary64))
(*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)))
(*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 x.re x.re))
(*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))
(*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)))
(fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 x.im x.im))) (*.f64 x.im x.im))
(*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))
(*.f64 (*.f64 x.im x.im) #s(literal -3 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))) (-.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 x.im x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)))) (fma.f64 x.im x.im (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))))
(/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 #s(literal -64 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))) (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))))))
(/.f64 (fma.f64 #s(literal -64 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 x.im x.im)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))) (fma.f64 (*.f64 x.im x.im) (*.f64 x.im x.im) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))))))
(neg.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 x.im x.im)))
(fma.f64 (*.f64 #s(literal -4 binary64) x.im) x.im (*.f64 x.im x.im))
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))))
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))
(fma.f64 (*.f64 x.im x.im) #s(literal -4 binary64) (*.f64 x.im x.im))
(fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))
(fma.f64 x.im x.im (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))))
(fma.f64 x.im x.im (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))
(-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (neg.f64 (*.f64 x.im x.im)))
(-.f64 (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))))
(-.f64 (*.f64 x.im x.im) (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)) (*.f64 x.im x.im))
(+.f64 (*.f64 x.im x.im) (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))))
(+.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) x.im) x.im)
(*.f64 (*.f64 x.im x.im) #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) (*.f64 x.im x.im))
#s(literal -4 binary64)
(*.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)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))))
(*.f64 (pow.f64 (pow.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)) (pow.f64 (fabs.f64 x.re) #s(literal 2 binary64)))
(*.f64 (pow.f64 (neg.f64 x.re) #s(literal 2 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (*.f64 x.re x.re)) (fabs.f64 (*.f64 x.re x.re)))
(*.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 (*.f64 x.re x.re)))
(*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)
(*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))
(*.f64 x.re (*.f64 (*.f64 x.re x.re) x.re))
(pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))
(pow.f64 x.re #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal 4 binary64))))
(*.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 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 #s(literal 1 binary64) (*.f64 x.re x.re))
(*.f64 x.re x.re)
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)) #s(literal -1 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x.re x.re)))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)))) (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.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 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) x.im) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (fma.f64 (+.f64 x.im x.im) (*.f64 x.re x.re) (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im))))
(neg.f64 (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im))))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 x.im (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 x.im (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(-.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(+.f64 (*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im)) (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.im)
(*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.im))
(*.f64 x.im (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re))
(*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))
(*.f64 (+.f64 x.im x.re) (-.f64 x.re x.im))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) 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 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 (*.f64 (*.f64 x.re x.re) 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)))))
(neg.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64)) (neg.f64 (*.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 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 #s(literal 1 binary64) (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal 1 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))
(fma.f64 x.re x.re (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.re x.re (neg.f64 (*.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 (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))
(*.f64 (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im)
(*.f64 (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)) x.re)
(*.f64 x.im (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)))
(*.f64 x.re (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 x.im x.re))
(/.f64 (fma.f64 (*.f64 x.im x.im) x.im (*.f64 (*.f64 x.re x.re) x.re)) (fma.f64 x.im x.im (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.re))))
(/.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.im x.re))))
(/.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (-.f64 x.re x.im))
(fma.f64 #s(literal 1 binary64) x.im (*.f64 (/.f64 x.re x.im) x.im))
(fma.f64 #s(literal 1 binary64) x.re (*.f64 (/.f64 x.im x.re) x.re))
(fma.f64 x.im #s(literal 1 binary64) (*.f64 x.im (/.f64 x.re x.im)))
(fma.f64 x.re #s(literal 1 binary64) (*.f64 x.re (/.f64 x.im x.re)))
(-.f64 x.im (neg.f64 x.re))
(-.f64 x.re (neg.f64 x.im))
(+.f64 (*.f64 x.re #s(literal 1 binary64)) (*.f64 x.re (/.f64 x.im x.re)))
(+.f64 (*.f64 x.im #s(literal 1 binary64)) (*.f64 x.im (/.f64 x.re x.im)))
(+.f64 (*.f64 #s(literal 1 binary64) x.re) (*.f64 (/.f64 x.im x.re) x.re))
(+.f64 (*.f64 #s(literal 1 binary64) x.im) (*.f64 (/.f64 x.re x.im) x.im))
(+.f64 x.im x.re)
(+.f64 x.re x.im)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 x.im x.re)) x.re)
(*.f64 (+.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64)) x.re)
(*.f64 x.re (+.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64)))
(/.f64 (fma.f64 (*.f64 x.re x.re) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))) (fma.f64 x.re x.re (-.f64 (*.f64 x.im x.im) (*.f64 x.re (neg.f64 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.im x.re))))
(/.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (+.f64 x.im x.re))
(neg.f64 (-.f64 x.im x.re))
(fma.f64 #s(literal -1 binary64) x.im x.re)
(fma.f64 #s(literal 1 binary64) x.re (*.f64 (/.f64 (neg.f64 x.im) x.re) x.re))
(fma.f64 x.im #s(literal -1 binary64) x.re)
(fma.f64 x.re #s(literal 1 binary64) (*.f64 x.re (/.f64 (neg.f64 x.im) x.re)))
(-.f64 x.re (neg.f64 (neg.f64 x.im)))
(-.f64 x.re (*.f64 #s(literal 1 binary64) x.im))
(-.f64 x.re x.im)
(+.f64 (*.f64 x.re #s(literal 1 binary64)) (*.f64 x.re (/.f64 (neg.f64 x.im) x.re)))
(+.f64 (*.f64 #s(literal 1 binary64) x.re) (*.f64 (/.f64 (neg.f64 x.im) x.re) x.re))
(+.f64 (neg.f64 x.im) x.re)
(+.f64 x.re (neg.f64 x.im))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 2 binary64))
(*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 x.re (*.f64 (+.f64 x.im x.im) x.re))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (*.f64 x.re x.re) x.im))
(fma.f64 x.im (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) x.im))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (*.f64 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 x.re (+.f64 x.im x.im))
(/.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 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im))) (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) (neg.f64 (*.f64 x.im x.re)))
(+.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 x.im x.im)) x.im)
(*.f64 #s(literal 2 binary64) x.im)
(*.f64 x.im #s(literal 2 binary64))
(/.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 (neg.f64 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) (neg.f64 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 x.im x.im) (neg.f64 x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))))
#s(approx (* x.re (* (* 3 x.im) x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx x.re x.re)
#s(approx (* (* 3 x.im) x.re) (*.f64 (*.f64 #s(literal 3 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)) x.im)) (* (* (* (+ x.im 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 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 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 (-.f64 (fma.f64 (-.f64 (-.f64 (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) x.re (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))) (*.f64 (*.f64 #s(literal 0 binary64) 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) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (fma.f64 (-.f64 (-.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.im)) (neg.f64 (/.f64 (*.f64 (-.f64 (-.f64 (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) (neg.f64 (/.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 (*.f64 x.im x.im) x.im)))) x.re (+.f64 x.im x.im)) (neg.f64 (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.im))) x.im) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im))) (*.f64 x.im x.im)))) x.re (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.im))) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (* x.re (* x.im x.re)) (*.f64 (*.f64 x.re x.re) x.im))
#s(approx (* x.im x.re) (*.f64 x.im x.re))
#s(approx (/ 1 (pow x.re -2)) (*.f64 x.re x.re))
#s(approx (pow x.re -2) (/.f64 #s(literal 1 binary64) (*.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))) (*.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))) (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))) (fma.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)))) 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))) (fma.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im #s(literal 0 binary64)) x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))) x.re (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)))) x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (+ (* x.im x.im) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 x.re x.re)))
#s(approx (* (* x.re x.re) (* x.re x.re)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))
#s(approx (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (fma.f64 (fma.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im)) x.re (*.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 x.im (+.f64 x.re (*.f64 #s(literal 0 binary64) x.im))) x.re (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (neg.f64 (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) x.re (neg.f64 (*.f64 x.im x.im))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (+.f64 (-.f64 x.re x.im) x.im) x.re (neg.f64 (*.f64 x.im 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 (* (* (+ 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.re x.re) x.im) #s(literal 3 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 (fma.f64 #s(literal 2 binary64) x.im (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) x.im) (*.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 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (-.f64 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 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 x.im (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) x.re)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (*.f64 x.re x.re))))) (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (fma.f64 x.im (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) x.re)) (/.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.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.re x.re) (-.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))) (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) 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 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))))) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))))) (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (fma.f64 x.im (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (fma.f64 x.im (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 #s(literal 0 binary64) x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 x.im (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) x.re)) (/.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))) (*.f64 #s(literal 0 binary64) x.im)) x.im) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re)))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.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))) (*.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.re) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) 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))) (*.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 #s(literal -3 binary64) (*.f64 x.im x.im)))) (*.f64 (*.f64 (*.f64 x.re x.re) 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))) (*.f64 (-.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)))) (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) 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 (+.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 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) 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.im (-.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) (+.f64 x.im x.im))) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) x.im) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (+.f64 (fma.f64 x.im (/.f64 (*.f64 #s(literal 0 binary64) x.im) x.re) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re))) x.im) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (+.f64 (+.f64 (+.f64 (/.f64 (neg.f64 x.im) x.re) (/.f64 (neg.f64 (*.f64 x.im x.im)) (*.f64 x.re x.re))) (/.f64 x.im x.re)) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ x.re x.im) (+.f64 x.im x.re))
#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) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (fma.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64))) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 x.im (+.f64 x.im x.im))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (-.f64 (/.f64 (*.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))))))) (-.f64 x.im (+.f64 x.im x.im))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) x.re)) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (-.f64 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.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (+.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 x.im #s(literal 0 binary64)) x.re))) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) 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))) (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re)))) x.re)) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) 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))) (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 x.im x.im) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.im x.im) (neg.f64 (*.f64 (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal 0 binary64)) x.re)))) x.re))) x.re)) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) 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 (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)) x.im) (+.f64 x.im x.im)) (*.f64 x.re x.re)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (+.f64 (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)) x.im) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 x.im x.im) x.re) (neg.f64 (*.f64 #s(literal 0 binary64) x.im))) x.re)) #s(literal 1 binary64)) (*.f64 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 #s(literal 3 binary64) (*.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 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
#s(approx (* 3 x.im) (*.f64 #s(literal 3 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) (* (* (+ x.im x.im) x.re) x.re))) (/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) x.im) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 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 (fma.f64 x.im (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal 4 binary64)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 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) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal -2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))))) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) x.im (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal 4 binary64)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 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) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal -2 binary64) (*.f64 (-.f64 (*.f64 (/.f64 x.re (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 x.re x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal -2 binary64)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))))))) x.im)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) #s(literal 0 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))))) x.im)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))))) x.im (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal 4 binary64)) (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 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))) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re 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)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) x.im (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re 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)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) x.im)) x.im (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re 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)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64) (*.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (*.f64 (*.f64 x.re #s(literal 0 binary64)) x.im)) x.im)) x.im (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (*.f64 x.im x.im)))
#s(approx (* (+ (* x.im x.im) (* -4 (* x.im x.im))) (* (* x.re x.re) (* x.re x.re))) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (*.f64 x.re x.re)))
#s(approx (+ (* x.im x.im) (* -4 (* x.im x.im))) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)))
#s(approx (* -4 (* x.im x.im)) (*.f64 (*.f64 x.im x.im) #s(literal -4 binary64)))
#s(approx (* x.im x.im) (*.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 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) x.im))
#s(approx (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) x.im))
#s(approx (- (* (* (+ x.re x.im) (- x.re x.im)) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) x.im))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (*.f64 x.re x.re)) x.im))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (*.f64 x.re x.re)) x.im))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.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)) (fma.f64 (+.f64 (-.f64 x.re x.im) (neg.f64 x.re)) x.im (*.f64 x.re x.re)))
#s(approx (- x.re x.im) (-.f64 x.re 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 (fma.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))) (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal 1 binary64))) (*.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))) (*.f64 (-.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64)))) (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (*.f64 x.im x.im))) #s(literal 1 binary64)) (+.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.im x.im)))) (/.f64 x.re x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (/.f64 (neg.f64 x.re) 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))) (*.f64 (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (*.f64 x.im x.im)) (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64)))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) (*.f64 (*.f64 x.im x.im) x.im))))) #s(literal 1 binary64)) (+.f64 (+.f64 (/.f64 (neg.f64 x.re) x.im) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.im x.im))))) (+.f64 (+.f64 (+.f64 (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (/.f64 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64))) (*.f64 (*.f64 x.im x.im) x.im)))) (/.f64 x.re x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)))) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (neg.f64 (*.f64 x.re #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re x.re))) (*.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))) (*.f64 (fma.f64 (/.f64 x.re x.im) #s(literal 0 binary64) #s(literal 1 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))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -4 binary64) (fma.f64 (/.f64 x.re x.im) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.im x.im)))) #s(literal 1 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))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -4 binary64) (fma.f64 (/.f64 x.re x.im) #s(literal -2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im)) #s(literal -2 binary64) (fma.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.im x.im) x.im))) (/.f64 (+.f64 x.re x.re) x.im))))) #s(literal 1 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.im x.im) x.re) x.re)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal -1 binary64)) (*.f64 (*.f64 x.im 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 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.im) (*.f64 (-.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)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal -1 binary64)) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.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)) (*.f64 x.im x.im)))
#s(approx (+ x.re x.im) (+.f64 x.im x.re))
#s(approx (- x.re x.im) (*.f64 (-.f64 (/.f64 x.re x.im) #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) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (*.f64 x.re #s(literal 0 binary64)) (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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (*.f64 x.re x.re) #s(literal -4 binary64))) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re)))) (*.f64 x.re x.re))) x.im)))) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) x.im)) #s(literal 1 binary64)) (*.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))) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (-.f64 (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -4 binary64) (fma.f64 (*.f64 x.re x.re) #s(literal -2 binary64) (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re))) (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (*.f64 x.re x.re) #s(literal -4 binary64))) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re)))) (*.f64 x.re x.re)))))) x.im))))) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.re)) (-.f64 (*.f64 x.re #s(literal 0 binary64)) (neg.f64 (*.f64 #s(literal 0 binary64) x.re)))) (*.f64 x.re x.re))) x.im))) (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)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (+.f64 (neg.f64 (*.f64 (/.f64 x.re x.im) #s(literal 0 binary64))) #s(literal 1 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))) (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) x.im)))) x.im)) #s(literal 1 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))) (*.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (fma.f64 (*.f64 x.re x.re) #s(literal -4 binary64) (fma.f64 (*.f64 x.re x.re) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal 0 binary64)) x.im)))) x.im)))) x.im)) #s(literal 1 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.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (fma.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) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) x.im)) (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)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 x.re x.re) x.im) (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 (neg.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) #s(literal 1 binary64))) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.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)) (*.f64 x.im x.im)))
#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 (/.f64 (neg.f64 x.re) x.im) #s(literal 1 binary64))))

eval61.0ms (1.8%)

Memory
0.3MiB live, 92.3MiB allocated; 5ms collecting garbage
Compiler

Compiled 5 576 to 1 848 computations (66.9% saved)

prune18.0ms (0.6%)

Memory
-14.0MiB live, 32.8MiB allocated; 2ms collecting garbage
Pruning

11 alts after pruning (4 fresh and 7 done)

PrunedKeptTotal
New3332335
Fresh123
Picked235
Done044
Total33611347
Accuracy
100.0%
Counts
347 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
38.0%
#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 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) (-.f64 x.im (+.f64 x.im x.im))))
✓89.3%
#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.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im))
✓55.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))) (*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64)))
✓86.9%
#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 (*.f64 x.re x.re) #s(literal 3 binary64)) x.im (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
✓62.2%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (pow.f64 (neg.f64 x.im) #s(literal 3 binary64)))
50.2%
#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 1 binary64) (pow.f64 x.re #s(literal -2 binary64))) (*.f64 #s(literal 3 binary64) x.im)))
50.2%
#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.2%
#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.6%
#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 (*.f64 x.im x.re) #s(literal 3 binary64))))
✓55.6%
#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 (*.f64 #s(literal 3 binary64) x.im) x.re)))
✓62.1%
#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 581 to 333 computations (42.7% saved)

regimes32.0ms (1%)

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

3 calls:

16.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))
7.0ms
x.re
7.0ms
x.im
Results
AccuracySegmentsBranch
97.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))
97.1%2x.re
97.1%3x.im
Compiler

Compiled 13 to 15 computations (-15.4% saved)

regimes4.0ms (0.1%)

Memory
9.9MiB live, 9.9MiB allocated; 0ms collecting garbage
Counts
12 → 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 x.re (*.f64 (*.f64 #s(literal 3 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)) (*.f64 x.re (*.f64 (*.f64 x.im 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 (*.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) (*.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (*.f64 x.im x.re)) #s(literal 3 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) 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 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal 2 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) (* (* (+ 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 (+ (* (- (* 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))
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 #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)) (*.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re)))
Calls

1 calls:

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

Compiled 1 to 2 computations (-100% saved)

regimes4.0ms (0.1%)

Memory
9.8MiB live, 9.8MiB allocated; 0ms collecting garbage
Counts
11 → 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 x.re (*.f64 (*.f64 #s(literal 3 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)) (*.f64 x.re (*.f64 (*.f64 x.im 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 (*.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) (*.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (*.f64 x.im x.re)) #s(literal 3 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) 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 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal 2 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) (* (* (+ 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))
Outputs
#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.re x.re) #s(literal 3 binary64)) (*.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 (*.f64 #s(literal 3 binary64) x.im) x.re)))
Calls

1 calls:

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

Compiled 1 to 2 computations (-100% saved)

regimes11.0ms (0.3%)

Memory
-24.5MiB live, 22.5MiB allocated; 1ms collecting garbage
Counts
10 → 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 x.re (*.f64 (*.f64 #s(literal 3 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)) (*.f64 x.re (*.f64 (*.f64 x.im 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 (*.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) (*.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.im) (- x.re x.im)) x.im) (* (* (+ x.re x.im) (- x.re x.im)) x.im)) (* (* (* (+ x.im 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 (*.f64 x.im x.re)) #s(literal 3 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) 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 (fma.f64 x.re x.re (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) 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 (*.f64 x.im 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)))
Calls

3 calls:

5.0ms
x.im
3.0ms
x.re
3.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
84.8%2x.im
97.0%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))
87.1%2x.re
Compiler

Compiled 13 to 15 computations (-15.4% saved)

regimes1.0ms (0%)

Memory
3.4MiB live, 3.4MiB 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 x.re (*.f64 (*.f64 #s(literal 3 binary64) 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)) (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 (*.f64 #s(literal 3 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)) (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
97.0%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
8.3MiB live, 8.3MiB 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.re
1.0ms
x.im
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
62.1%1x.im
62.1%1x.re
62.1%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.5%)

Memory
33.4MiB live, 33.4MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
14.0ms
3.5846598166711153e+146
9.812349167809673e+158
Samples
8.0ms160×0valid
Compiler

Compiled 322 to 336 computations (-4.3% saved)

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

bsearch23.0ms (0.7%)

Memory
-20.3MiB live, 22.9MiB allocated; 5ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
21.0ms
7.987145111830533e+144
3.5846598166711153e+146
Samples
17.0ms112×0valid
Compiler

Compiled 260 to 268 computations (-3.1% saved)

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

bsearch1.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
7.987145111830533e+144
3.5846598166711153e+146
Compiler

Compiled 379 to 289 computations (23.7% saved)

bsearch0.0ms (0%)

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

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

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

Compiled 14 to 16 computations (-14.3% saved)

derivations196.0ms (6%)

Memory
-11.0MiB live, 218.6MiB allocated; 68ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 120 to 71 computations (40.8% saved)

preprocess139.0ms (4.2%)

Memory
30.5MiB live, 216.5MiB allocated; 45ms collecting garbage
Remove

(negabs x.im)

(abs x.re)

Compiler

Compiled 1 426 to 1 113 computations (21.9% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...