math.cube on complex, imaginary part

Time bar (total: 2.1s)

start0.0ms (0%)

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

analyze0.0ms (0%)

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

sample976.0ms (47%)

Memory
45.6MiB live, 1 121.7MiB allocated; 294ms collecting garbage
Samples
658.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 405.0ms
ival-mult!: 353.0ms (87.2% of total)
ival-add!: 34.0ms (8.4% of total)
ival-sub!: 16.0ms (4% of total)
adjust: 2.0ms (0.5% of total)
Bogosity

preprocess98.0ms (4.7%)

Memory
-41.8MiB live, 65.7MiB allocated; 13ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
036118
1137104
2456102
3136968
4508068
Stop Event
1×node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶86.5%
(+.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.7%)

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

6 calls:

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

rewrite62.0ms (3%)

Memory
-1.7MiB live, 43.8MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval6.0ms (0.3%)

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

Compiled 659 to 281 computations (57.4% saved)

prune5.0ms (0.2%)

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

8 alts after pruning (8 fresh and 0 done)

PrunedKeptTotal
New61869
Fresh000
Picked101
Done000
Total62870
Accuracy
95.2%
Counts
70 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶40.8%
(+.f64 (*.f64 (/.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))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
86.1%
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) #s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
56.4%
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
▶66.8%
(+.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))
▶91.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 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
▶56.3%
#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))
56.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re)))
▶53.7%
#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 250 to 242 computations (3.2% saved)

series74.0ms (3.5%)

Memory
-25.9MiB live, 62.7MiB allocated; 14ms collecting garbage
Counts
29 → 81
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
(*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im)
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))
#s(literal 3 binary64)
(*.f64 x.re x.re)
x.re
(neg.f64 (*.f64 x.im x.im))
(*.f64 x.im x.im)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (*.f64 x.im x.im) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im)
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im)
#s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im)))
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re)
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(+.f64 (*.f64 (/.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))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 (/.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))) x.im)
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(*.f64 (*.f64 x.re x.re) (*.f64 x.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))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (* 3 (* x.re x.re)) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* 3 (* x.re x.re)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (- (pow x.re 2) (pow x.im 2))))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (+ (* x.re x.im) (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* x.re x.im) #s(hole binary64 (* x.im x.re)))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 4))))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (- (pow x.re 4) (pow x.im 4))))
#s(approx (* (* x.re x.re) (* x.re x.re)) #s(hole binary64 (pow x.re 4)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (pow x.re 2)))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (pow x.re 4)))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (* (pow x.re 4) (+ 1 (* -1 (/ (pow x.im 4) (pow x.re 4)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (neg (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (neg (* (* x.im x.im) x.im)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* x.im x.im) x.im) #s(hole binary64 (pow x.im 3)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 4)) (pow x.re 4))))
#s(approx (* (* x.im x.im) (* x.im x.im)) #s(hole binary64 (pow x.im 4)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 1))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (* (pow x.im 4) (- (/ (pow x.re 4) (pow x.im 4)) 1))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (* (- (* 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.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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
46.0ms
x.re
@inf
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im)) (+ (* x.re x.re) (* x.im x.im)))
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.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.re) (* x.re x.re)) (* (* 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)) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im)) (+ (* x.re 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)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im)) (+ (* x.re x.re) (* x.im x.im)))
3.0ms
x.re
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im)) (+ (* x.re x.re) (* x.im x.im)))
3.0ms
x.im
@0
((+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) 3 (* x.re x.re) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg (* (* x.im x.im) x.im)) (* (* x.im x.im) x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* 3 (* x.re x.re)) x.im) (* 3 (* x.re x.re)) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (- (* x.re x.re) (* x.im x.im)) x.im) (- (* x.re x.re) (* x.im x.im)) (* (+ (* x.re x.im) (* x.im x.re)) x.re) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im)) (+ (* x.re x.re) (* x.im x.im)))

rewrite78.0ms (3.7%)

Memory
15.8MiB live, 150.6MiB allocated; 29ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02342412
02751792
011881763
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
110 → 289
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im))
(*.f64 (fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im))) x.im)
(fma.f64 #s(literal 3 binary64) (*.f64 x.re x.re) (neg.f64 (*.f64 x.im x.im)))
#s(literal 3 binary64)
(*.f64 x.re x.re)
x.re
(neg.f64 (*.f64 x.im x.im))
(*.f64 x.im x.im)
x.im
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (*.f64 x.im x.im) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.re x.re)) x.im)
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im)
#s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im)))
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re)
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(+.f64 (*.f64 (/.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))) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
(*.f64 (/.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))) x.im)
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))
(*.f64 (*.f64 x.re x.re) (*.f64 x.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))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (* 3 (* x.re x.re)) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* 3 (* x.re x.re)) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* x.im (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (- (pow x.re 2) (pow x.im 2))))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (+ (* x.re x.im) (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* x.re x.im) #s(hole binary64 (* x.im x.re)))
#s(approx (* x.im x.re) #s(hole binary64 (* x.im x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 4))))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (- (pow x.re 4) (pow x.im 4))))
#s(approx (* (* x.re x.re) (* x.re x.re)) #s(hole binary64 (pow x.re 4)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (pow x.re 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.re 2) (+ x.im (* -1 (/ (pow x.im 3) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (pow x.re 2)))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (pow x.re 4)))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (* (pow x.re 4) (+ 1 (* -1 (/ (pow x.im 4) (pow x.re 4)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* 3 (pow x.re 2)))))
#s(approx (neg (* x.im x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (neg (* (* x.im x.im) x.im)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (* x.im x.im) x.im) #s(hole binary64 (pow x.im 3)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (pow x.re 2)))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 4)) (pow x.re 4))))
#s(approx (* (* x.im x.im) (* x.im x.im)) #s(hole binary64 (pow x.im 4)))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.im 3) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.im 2) (- (* 3 (/ (pow x.re 2) (pow x.im 2))) 1))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.im) #s(hole binary64 (* (pow x.im 3) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 1))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 1))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) #s(hole binary64 (* (pow x.im 4) (- (/ (pow x.re 4) (pow x.im 4)) 1))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (* (- (* 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.re) (* x.re x.re)) (* (* 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)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) x.im))
(*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) x.im)
(*.f64 x.im (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))
(/.f64 (-.f64 (*.f64 (*.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) 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)) (pow.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (*.f64 x.im x.im) (neg.f64 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 (*.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 (*.f64 x.im 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.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 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 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) 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 (pow.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) 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))))))
(fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.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.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 (*.f64 x.im x.im) #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(fma.f64 x.im (neg.f64 x.im) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
(-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.re x.re)))
(+.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 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (neg.f64 x.im) x.im)
(*.f64 #s(literal -1 binary64) (*.f64 x.im x.im))
(*.f64 (*.f64 x.im x.im) #s(literal -1 binary64))
(*.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 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
(*.f64 (*.f64 (neg.f64 x.im) x.im) x.im)
(*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (*.f64 x.im x.im) (neg.f64 x.im))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (pow.f64 x.im #s(literal 3/2 binary64)) (pow.f64 x.im #s(literal 3/2 binary64)))
(*.f64 (*.f64 x.im x.im) x.im)
(*.f64 x.im (*.f64 x.im x.im))
(pow.f64 x.im #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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)))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(+.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 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.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) x.re) x.re)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (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 (*.f64 x.re x.re) 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 (neg.f64 x.re) (neg.f64 x.re) (*.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 (*.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)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))))
(fma.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(fma.f64 x.im #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(+.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(+.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
(*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)
(*.f64 x.im #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)
(*.f64 x.re (*.f64 (+.f64 x.im x.im) x.re))
(*.f64 (+.f64 x.im x.im) x.re)
(*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))
(*.f64 (*.f64 x.im x.re) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)) (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))) (-.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.re) (*.f64 x.im x.re) (-.f64 (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)) (*.f64 (*.f64 x.im x.re) (*.f64 x.im x.re)))))
(fma.f64 x.im x.re (*.f64 x.im x.re))
(fma.f64 x.re x.im (*.f64 x.im x.re))
(-.f64 (*.f64 x.im x.re) (*.f64 (neg.f64 x.im) x.re))
(+.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))
(*.f64 x.im x.re)
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(*.f64 x.re x.im)
(/.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.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 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) (*.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 x.re x.im) (-.f64 x.re x.im)) x.im)
(*.f64 x.im (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
(/.f64 (*.f64 (*.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) x.im) (fma.f64 x.im x.im (*.f64 x.re x.re)))
(/.f64 (-.f64 (*.f64 (*.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.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) (neg.f64 x.im)) (*.f64 (*.f64 x.im x.im) (neg.f64 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.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 (*.f64 x.im x.im) (neg.f64 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)))
(-.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 (neg.f64 x.im) (*.f64 x.re x.re)))
(+.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 x.re x.im) (-.f64 x.re x.im))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (-.f64 (*.f64 (neg.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 (*.f64 x.re x.re) x.re) x.re (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))) (neg.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) (fma.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 (neg.f64 x.re) (neg.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 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 x.re x.re))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (*.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 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 x.im x.im (*.f64 x.re x.re))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (fma.f64 x.im x.im (*.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 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)))))
(fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im)))
(fma.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im)))
(fma.f64 (fabs.f64 (*.f64 x.re x.re)) (fabs.f64 (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im)))
(fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im)))
(fma.f64 x.re (*.f64 x.re (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im)))
(-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.im x.im)))
(*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)
(*.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 (*.f64 x.re x.re)))
(*.f64 (fabs.f64 (*.f64 x.re x.re)) (fabs.f64 (*.f64 x.re x.re)))
(*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))
(*.f64 x.re (*.f64 x.re (*.f64 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 (fabs.f64 (*.f64 x.im x.im)) (fabs.f64 (*.f64 x.im x.im)))
(*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)
(*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))
(*.f64 x.im (*.f64 (*.f64 x.im x.im) x.im))
(pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))
(pow.f64 x.im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 4 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im (-.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (*.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) x.im))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.im) (* x.im x.re)) (*.f64 (+.f64 x.im x.im) x.re))
#s(approx (* x.im x.re) (*.f64 x.im x.re))
#s(approx (* x.im x.re) (*.f64 x.im x.re))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) x.im))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (*.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))))
#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.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (fma.f64 #s(literal 3 binary64) x.im (/.f64 (*.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 x.re x.re) #s(literal 3 binary64)))
#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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re x.re))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re x.re))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))
#s(approx (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (*.f64 (+.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.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)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) x.im))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) x.im))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))
#s(approx (neg (* x.im x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (neg (* (* x.im x.im) x.im)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (* x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) x.im))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))))
#s(approx (* (* x.im x.im) (* x.im x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* 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)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)))) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 x.im 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.re x.re)) (* (* 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)) (*.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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (+.f64 (neg.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64))))

eval27.0ms (1.3%)

Memory
21.6MiB live, 66.9MiB allocated; 3ms collecting garbage
Compiler

Compiled 3 141 to 1 100 computations (65% saved)

prune18.0ms (0.8%)

Memory
-11.1MiB live, 44.0MiB allocated; 8ms collecting garbage
Pruning

11 alts after pruning (9 fresh and 2 done)

PrunedKeptTotal
New2919300
Fresh303
Picked325
Done000
Total29711308
Accuracy
95.3%
Counts
308 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶68.4%
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
▶13.8%
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))
56.4%
(+.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re x.re)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
27.4%
(+.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.im) (*.f64 (/.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))))) x.re))
▶56.4%
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
56.3%
#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))
▶56.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
✓56.3%
#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))
▶91.2%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))) x.im))
53.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
✓53.7%
#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 483 to 357 computations (26.1% saved)

series49.0ms (2.4%)

Memory
-0.6MiB live, 135.4MiB allocated; 18ms collecting garbage
Counts
29 → 126
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))) x.im))
(*.f64 #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))) 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)))
(-.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.re) (* x.re x.re)) (* (* 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)) (*.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 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 x.im x.im)
(*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (neg.f64 x.im) x.im)
(neg.f64 x.im)
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))
(-.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 x.im x.im) x.re) x.re)
(-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (- (* (* x.re x.re) 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) (* 3 x.im)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (* (* x.re x.re) x.im) 3) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (+ x.im x.im) x.re) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (+ (* 2 x.im) (* (pow x.re 2) (- (* -1 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2)))) (pow x.im 3))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))) (pow x.im 3))))) (* -1 (+ (* -1 x.im) (* 2 x.im))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (+ (* 2 x.im) (* (pow x.re 2) (- (+ (* -1 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2)))) (pow x.im 3))) (* (pow x.re 2) (- (* -1 (/ (- 2 (* 2 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2))) (pow x.im 2)))) (pow x.im 3))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* -1 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2)))) (pow x.im 3))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))) (pow x.im 3)))) (pow x.im 3))))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))) (pow x.im 3))))) (* -1 (+ (* -1 x.im) (* 2 x.im))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -2 (* (pow x.im 4) (pow x.re 2))) (pow x.im 6))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 2) (- (* (pow x.re 2) (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2))))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 2) (- (* (pow x.re 2) (- (+ (* -2 (pow x.im 2)) (* (pow x.re 2) (- 2 (* 2 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2))) (pow x.im 2)))))) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2))))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (pow x.im 6)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* -2 (* (pow x.im 4) (pow x.re 2))) (pow x.im 6))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* (pow x.re 2) (- (* (pow x.re 2) (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2)))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -2 (pow x.im 2)) (* (pow x.re 2) (- 2 (* 2 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2))) (pow x.im 2)))))) (+ (* -4 (pow x.im 2)) (pow x.im 2)))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#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.im x.im) x.re) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (+ (* -1 x.im) (* 2 x.im)))) (* -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 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) #s(hole binary64 (* 3 (pow x.re 2))))
#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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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))) (* 2 x.im))))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (pow x.re 2)))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -2 (/ (pow x.im 4) (* (pow x.re 2) (- 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)))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -2 (/ (pow x.im 4) (* (pow x.re 2) (- x.im (* 2 x.im))))) (+ (* -2 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (/ (pow x.im 2) (- x.im (* 2 x.im))))) (+ (* -4 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 4) (- 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))))) (* (pow x.re 4) (- 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)))) (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -2 (/ (pow x.im 4) (* (pow x.re 2) (- x.im (* 2 x.im))))) (+ (* -2 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (+ (* -2 (pow x.im 8)) (* 2 (* (pow x.im 2) (- (* -2 (pow x.im 6)) (+ (* -4 (pow x.im 6)) (pow x.im 6)))))) (* (pow x.re 6) (- x.im (* 2 x.im))))) (/ (pow x.im 2) (- x.im (* 2 x.im)))))) (+ (* -4 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 4) (- 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))))) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 6) (- x.im (* 2 x.im)))) (+ (* -4 (/ (pow x.im 6) (- x.im (* 2 x.im)))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 4) (- 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)))) (/ (pow x.im 6) (- x.im (* 2 x.im))))))) (* (pow x.re 6) (- 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)))) (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im)))))))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (pow x.im 2)) (* 4 (pow x.im 2))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (pow x.im 2)) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 4 (pow x.im 2)) (/ (pow x.im 6) (pow x.re 4)))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (+ (* -1 (/ (+ (* -2 (pow x.im 8)) (* 2 (* (pow x.im 2) (- (* -2 (pow x.im 6)) (+ (* -4 (pow x.im 6)) (pow x.im 6)))))) (pow x.re 6))) (pow x.im 2))) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 4 (pow x.im 2)) (/ (pow x.im 6) (pow x.re 4)))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 2) (pow x.re 4))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (pow x.im 2)))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 4) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (pow x.im 2)) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (/ (pow x.im 6) (pow x.re 4))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 4) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (+ (* -1 (/ (+ (* -2 (pow x.im 8)) (* 2 (* (pow x.im 2) (- (* -2 (pow x.im 6)) (+ (* -4 (pow x.im 6)) (pow x.im 6)))))) (pow x.re 6))) (pow x.im 2))) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (/ (pow x.im 6) (pow x.re 4))))))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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)))) (* 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.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 (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (+ x.im x.im) #s(hole binary64 (* 2 x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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 (* (neg x.im) x.im) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (neg x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* x.im (- (+ (* (pow x.im 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))))) (/ (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) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* x.im (- (+ (* (pow x.im 2) (- (+ (* -2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* (pow x.im 2) (- (/ 1 (- (pow x.re 2) (* 2 (pow x.re 2)))) (* -1 (/ (- (* -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)))) (- (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))))) (/ (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) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* x.im (- (+ (* (pow x.im 2) (- (+ (* -2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* (pow x.im 2) (- (+ (/ 1 (- (pow x.re 2) (* 2 (pow x.re 2)))) (/ (* (pow x.im 2) (- (/ 1 (- (pow x.re 2) (* 2 (pow x.re 2)))) (* -1 (/ (- (* -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)))) (- (pow x.re 2) (* 2 (pow x.re 2))))))) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* -1 (/ (- (* -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)))) (- (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))))) (/ (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) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (* (pow x.im 2) (pow x.re 2))) (pow x.re 4)) (* 4 (pow x.re 4))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.im 2) (- (pow x.im 2) (* 2 (pow x.re 2)))) (pow x.re 4)) (* 4 (pow x.re 4))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 (* (pow x.im 2) (pow x.re 2))) (pow x.re 4)))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* (pow x.im 2) (- (pow x.im 2) (* 2 (pow x.re 2)))) (pow x.re 4)))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* x.im (- (+ (* -1 (pow x.im 2)) (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) 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.re x.re)) (* (* 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)) #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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 1))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 1))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 3) (- (* 4 (/ (pow x.re 2) (pow x.im 2))) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (pow x.re 4)))) (pow x.im 4))) (* 4 (/ (pow x.re 2) (pow x.im 2)))) (+ 1 (+ (* -1 (/ (* (- (* 4 (pow x.re 2)) (pow x.re 2)) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 4))) (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1 (/ (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (pow x.re 4)))) (pow x.im 4))) (+ (* 2 (/ (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))) (pow x.im 6))) (* 4 (/ (pow x.re 2) (pow x.im 2)))))) (+ 1 (+ (* -1 (/ (* (+ (* -1 (pow x.re 4)) (pow x.re 4)) (- (* 4 (pow x.re 2)) (pow x.re 2))) (pow x.im 6))) (+ (* -1 (/ (* (- (* -1 (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (pow x.re 4))))) (+ (* -1 (* (- (* 4 (pow x.re 2)) (pow x.re 2)) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* -1 (pow x.re 4)) (pow x.re 4)))) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 6))) (+ (* -1 (/ (* (- (* 4 (pow x.re 2)) (pow x.re 2)) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 4))) (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (/ (pow x.re 4) (pow x.im 4)))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 4) (pow x.im 4)))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (/ (pow x.re 4) (pow x.im 4))) (* -1 (/ (+ (* -2 (pow x.re 6)) (* 2 (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))))) (pow x.im 6))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 4) (pow x.im 4)))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (* -2 (/ (pow x.re 4) (pow x.im 4)))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 4) (pow x.im 4))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (+ (* -2 (/ (pow x.re 4) (pow x.im 4))) (* -1 (/ (+ (* -2 (pow x.re 6)) (* 2 (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))))) (pow x.im 6))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 4) (pow x.im 4))))))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 3) (- (/ (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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4)))) (+ 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.re x.re)) (* (* 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)) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (* -4 (/ (pow x.re 2) (pow x.im 2)))) (* -1 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (* -2 (/ (pow x.re 4) (pow x.im 4))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (* (- (* -4 (pow x.re 2)) (* -1 (pow x.re 2))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.im 4)) (/ (pow x.re 4) (pow x.im 4)))))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ (pow x.re 4) (pow x.im 4))) (* -1 (/ (+ (* -2 (pow x.re 6)) (* 2 (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))))) (pow x.im 6)))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (* (- (* -4 (pow x.re 2)) (* -1 (pow x.re 2))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.im 4)) (+ (/ (* (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (+ (* (- (* -4 (pow x.re 2)) (* -1 (pow x.re 2))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.re 4))))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.im 6)) (/ (pow x.re 4) (pow x.im 4))))))))))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2)))) (* -2 (/ (pow x.re 2) (pow x.im 2))))))))
Calls

6 calls:

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

rewrite243.0ms (11.7%)

Memory
-17.9MiB live, 278.4MiB allocated; 50ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06249727
06585605
141465605
084685405
Stop Event
1×iter-limit
1×node-limit
1×iter-limit
Counts
155 → 350
Calls
Call 1
Inputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))) x.im))
(*.f64 #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))) 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)))
(-.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.re) (* x.re x.re)) (* (* 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)) (*.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 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(*.f64 (+.f64 x.im x.im) x.re)
(+.f64 x.im x.im)
(*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
(*.f64 (neg.f64 x.im) x.im)
(neg.f64 x.im)
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re)))
(-.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 x.im x.im) x.re) x.re)
(-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* 3 (* x.im (pow x.re 2))))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (- (* 3 (pow x.re 2)) (pow x.im 2))))
#s(approx (- (* (* x.re x.re) 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) (* 3 x.im)) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (* (* x.re x.re) x.im) 3) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (+ x.im x.im) x.re) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (* -1 (pow x.im 2)) (pow x.re 2))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (+ (* 2 x.im) (* (pow x.re 2) (- (* -1 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2)))) (pow x.im 3))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))) (pow x.im 3))))) (* -1 (+ (* -1 x.im) (* 2 x.im))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (+ (* 2 x.im) (* (pow x.re 2) (- (+ (* -1 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2)))) (pow x.im 3))) (* (pow x.re 2) (- (* -1 (/ (- 2 (* 2 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2))) (pow x.im 2)))) (pow x.im 3))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* -1 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2)))) (pow x.im 3))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))) (pow x.im 3)))) (pow x.im 3))))) (/ (* (+ (* -1 x.im) (* 2 x.im)) (- (* 2 x.im) (* -1 (+ (* -1 x.im) (* 2 x.im))))) (pow x.im 3))))) (* -1 (+ (* -1 x.im) (* 2 x.im))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (+ (* -2 (* (pow x.im 4) (pow x.re 2))) (pow x.im 6))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 2) (- (* (pow x.re 2) (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2))))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 2) (- (* (pow x.re 2) (- (+ (* -2 (pow x.im 2)) (* (pow x.re 2) (- 2 (* 2 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2))) (pow x.im 2)))))) (+ (* -4 (pow x.im 2)) (+ (* 4 (pow x.im 2)) (pow x.im 2))))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (pow x.im 6)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* -2 (* (pow x.im 4) (pow x.re 2))) (pow x.im 6))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* (pow x.re 2) (- (* (pow x.re 2) (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2)))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (+ (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -2 (pow x.im 2)) (* (pow x.re 2) (- 2 (* 2 (/ (- (* -2 (pow x.im 2)) (+ (* -4 (pow x.im 2)) (pow x.im 2))) (pow x.im 2)))))) (+ (* -4 (pow x.im 2)) (pow x.im 2)))) (* 2 (pow x.im 4)))) (pow x.im 6))))
#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.im x.im) x.re) x.re) #s(hole binary64 (* 2 (* x.im (pow x.re 2)))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (+ (* -1 (* (pow x.re 2) (+ (* -1 x.im) (* 2 x.im)))) (* -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 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ x.im (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 2 x.im))))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) #s(hole binary64 (* (pow x.re 2) (+ (* -1 (/ (pow x.im 3) (pow x.re 2))) (* 3 x.im)))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) #s(hole binary64 (* (pow x.re 2) (+ 3 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (* x.re x.re) 3) (* x.im x.im)) #s(hole binary64 (* 3 (pow x.re 2))))
#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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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))) (* 2 x.im))))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (pow x.re 2)))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -2 (/ (pow x.im 4) (* (pow x.re 2) (- 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)))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -2 (/ (pow x.im 4) (* (pow x.re 2) (- x.im (* 2 x.im))))) (+ (* -2 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (/ (pow x.im 2) (- x.im (* 2 x.im))))) (+ (* -4 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 4) (- 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))))) (* (pow x.re 4) (- 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)))) (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.re 2) (- (+ (* -2 (/ (pow x.im 4) (* (pow x.re 2) (- x.im (* 2 x.im))))) (+ (* -2 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (+ (* -2 (pow x.im 8)) (* 2 (* (pow x.im 2) (- (* -2 (pow x.im 6)) (+ (* -4 (pow x.im 6)) (pow x.im 6)))))) (* (pow x.re 6) (- x.im (* 2 x.im))))) (/ (pow x.im 2) (- x.im (* 2 x.im)))))) (+ (* -4 (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 4) (- 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))))) (* (pow x.re 4) (- x.im (* 2 x.im))))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 6) (- x.im (* 2 x.im)))) (+ (* -4 (/ (pow x.im 6) (- x.im (* 2 x.im)))) (+ (* -1 (/ (* (pow x.im 3) (- (* -2 (/ (pow x.im 4) (- 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)))) (/ (pow x.im 6) (- x.im (* 2 x.im))))))) (* (pow x.re 6) (- 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)))) (/ (pow x.im 6) (* (pow x.re 4) (- x.im (* 2 x.im)))))))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (pow x.im 2)) (* 4 (pow x.im 2))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (pow x.im 2)) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 4 (pow x.im 2)) (/ (pow x.im 6) (pow x.re 4)))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (+ (* -1 (/ (+ (* -2 (pow x.im 8)) (* 2 (* (pow x.im 2) (- (* -2 (pow x.im 6)) (+ (* -4 (pow x.im 6)) (pow x.im 6)))))) (pow x.re 6))) (pow x.im 2))) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (+ (* 4 (pow x.im 2)) (/ (pow x.im 6) (pow x.re 4)))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 2) (pow x.re 4))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 4) (+ (* -2 (/ (pow x.im 4) (pow x.re 2))) (pow x.im 2)))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 4) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (pow x.im 2)) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (/ (pow x.im 6) (pow x.re 4))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.re 4) (- (+ (* -2 (/ (pow x.im 6) (pow x.re 4))) (+ (* -1 (/ (+ (* -2 (pow x.im 8)) (* 2 (* (pow x.im 2) (- (* -2 (pow x.im 6)) (+ (* -4 (pow x.im 6)) (pow x.im 6)))))) (pow x.re 6))) (pow x.im 2))) (+ (* -4 (/ (pow x.im 6) (pow x.re 4))) (+ (* 2 (/ (pow x.im 4) (pow x.re 2))) (/ (pow x.im 6) (pow x.re 4))))))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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)))) (* 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.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 (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* x.im (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.re 2)) (pow x.re 2))))))
#s(approx (+ x.im x.im) #s(hole binary64 (* 2 x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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 (* (neg x.im) x.im) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (neg x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* x.im (- (+ (* (pow x.im 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))))) (/ (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) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* x.im (- (+ (* (pow x.im 2) (- (+ (* -2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* (pow x.im 2) (- (/ 1 (- (pow x.re 2) (* 2 (pow x.re 2)))) (* -1 (/ (- (* -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)))) (- (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))))) (/ (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) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* x.im (- (+ (* (pow x.im 2) (- (+ (* -2 (/ (pow x.re 2) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* (pow x.im 2) (- (+ (/ 1 (- (pow x.re 2) (* 2 (pow x.re 2)))) (/ (* (pow x.im 2) (- (/ 1 (- (pow x.re 2) (* 2 (pow x.re 2)))) (* -1 (/ (- (* -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)))) (- (pow x.re 2) (* 2 (pow x.re 2))))))) (- (pow x.re 2) (* 2 (pow x.re 2))))) (* -1 (/ (- (* -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)))) (- (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))))) (/ (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) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (- (+ (* -2 (* (pow x.im 2) (pow x.re 2))) (pow x.re 4)) (* 4 (pow x.re 4))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.im 2) (- (pow x.im 2) (* 2 (pow x.re 2)))) (pow x.re 4)) (* 4 (pow x.re 4))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 (* (pow x.im 2) (pow x.re 2))) (pow x.re 4)))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* (pow x.im 2) (- (pow x.im 2) (* 2 (pow x.re 2)))) (pow x.re 4)))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* x.im (- (+ (* -1 (pow x.im 2)) (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) 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.re x.re)) (* (* 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)) #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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 1))))
#s(approx (+ (* (* (+ x.im x.im) x.re) x.re) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 1))))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 3) (- (* 4 (/ (pow x.re 2) (pow x.im 2))) (+ 1 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (pow x.re 4)))) (pow x.im 4))) (* 4 (/ (pow x.re 2) (pow x.im 2)))) (+ 1 (+ (* -1 (/ (* (- (* 4 (pow x.re 2)) (pow x.re 2)) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 4))) (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* (pow x.im 3) (- (+ (* -2 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1 (/ (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (pow x.re 4)))) (pow x.im 4))) (+ (* 2 (/ (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))) (pow x.im 6))) (* 4 (/ (pow x.re 2) (pow x.im 2)))))) (+ 1 (+ (* -1 (/ (* (+ (* -1 (pow x.re 4)) (pow x.re 4)) (- (* 4 (pow x.re 2)) (pow x.re 2))) (pow x.im 6))) (+ (* -1 (/ (* (- (* -1 (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (pow x.re 4))))) (+ (* -1 (* (- (* 4 (pow x.re 2)) (pow x.re 2)) (- (pow x.re 2) (* 2 (pow x.re 2))))) (+ (* -1 (pow x.re 4)) (pow x.re 4)))) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 6))) (+ (* -1 (/ (* (- (* 4 (pow x.re 2)) (pow x.re 2)) (- (pow x.re 2) (* 2 (pow x.re 2)))) (pow x.im 4))) (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (/ (pow x.re 4) (pow x.im 4)))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 4) (pow x.im 4)))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (/ (pow x.re 4) (pow x.im 4))) (* -1 (/ (+ (* -2 (pow x.re 6)) (* 2 (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))))) (pow x.im 6))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 4) (pow x.im 4)))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 6) (+ 1 (* -2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (* -2 (/ (pow x.re 4) (pow x.im 4)))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 4) (pow x.im 4))))))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #s(hole binary64 (* (pow x.im 6) (- (+ 1 (+ (* -2 (/ (pow x.re 4) (pow x.im 4))) (* -1 (/ (+ (* -2 (pow x.re 6)) (* 2 (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))))) (pow x.im 6))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (/ (pow x.re 4) (pow x.im 4))))))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 3) (- (/ (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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4)))) (+ 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.re x.re)) (* (* 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)) #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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) #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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (* -4 (/ (pow x.re 2) (pow x.im 2)))) (* -1 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (* -2 (/ (pow x.re 4) (pow x.im 4))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (* (- (* -4 (pow x.re 2)) (* -1 (pow x.re 2))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.im 4)) (/ (pow x.re 4) (pow x.im 4)))))))))))
#s(approx (/ (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re))) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (+ (* -4 (/ (pow x.re 2) (pow x.im 2))) (+ (* -2 (/ (pow x.re 4) (pow x.im 4))) (* -1 (/ (+ (* -2 (pow x.re 6)) (* 2 (* (pow x.re 2) (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (pow x.re 4)))))) (pow x.im 6)))))) (+ (* -4 (/ (pow x.re 4) (pow x.im 4))) (+ (* -1 (/ (pow x.re 2) (pow x.im 2))) (+ (* 4 (/ (pow x.re 4) (pow x.im 4))) (+ (/ (* (- (* -4 (pow x.re 2)) (* -1 (pow x.re 2))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.im 4)) (+ (/ (* (- (* -2 (pow x.re 4)) (+ (* -4 (pow x.re 4)) (+ (* 4 (pow x.re 4)) (+ (* (- (* -4 (pow x.re 2)) (* -1 (pow x.re 2))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.re 4))))) (- (* -1 (pow x.re 2)) (* -2 (pow x.re 2)))) (pow x.im 6)) (/ (pow x.re 4) (pow x.im 4))))))))))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) #s(hole binary64 (* -1 (* (pow x.im 3) (- (+ 1 (* -1 (/ (pow x.re 2) (pow x.im 2)))) (* -2 (/ (pow x.re 2) (pow x.im 2))))))))
Outputs
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 #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))) x.im))
(*.f64 #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))) x.im)
(*.f64 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 (+ (* 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)))
(/.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 (-.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))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 x.im x.im) (*.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 #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)))))
(/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (neg.f64 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 x.im x.im) (*.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 (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) (*.f64 x.im x.im)) (*.f64 (neg.f64 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 x.im x.im) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 (neg.f64 x.im) x.im)))))
(fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (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)))
(fma.f64 x.re (*.f64 x.re #s(literal 3 binary64)) (*.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 (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)))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(*.f64 x.re (*.f64 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 (*.f64 x.re x.re) x.re) x.re)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) #s(literal 8 binary64) (*.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 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))))
(fma.f64 (exp.f64 (log.f64 x.re)) (exp.f64 (log.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 (fabs.f64 x.re) (fabs.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)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(*.f64 (exp.f64 (log.f64 x.re)) (exp.f64 (log.f64 x.re)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 (exp.f64 (log.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (*.f64 x.re x.re) #s(literal 1 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.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 (exp.f64 (log.f64 x.im)) (exp.f64 (log.f64 x.im)))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 (exp.f64 (log.f64 x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.im) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.im) #s(literal 2 binary64))
(pow.f64 (*.f64 x.im x.im) #s(literal 1 binary64))
(pow.f64 x.im #s(literal 2 binary64))
(/.f64 #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.re x.re)) (* (* 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)) (*.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 x.re (*.f64 #s(literal 3 binary64) x.im)))
(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 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(+.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 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 x.re x.re) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 #s(literal 3 binary64) x.im)
(*.f64 x.im #s(literal 3 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 x.im x.im) (+.f64 x.im x.im)) (*.f64 x.im x.im)) (*.f64 x.im #s(literal 1 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 (-.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))) (fma.f64 (+.f64 x.im x.im) (+.f64 x.im x.im) (fma.f64 x.im x.im (*.f64 (+.f64 x.im x.im) (neg.f64 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 #s(literal 2 binary64) x.im (*.f64 #s(literal 1 binary64) x.im))
(fma.f64 #s(literal 2 binary64) x.im x.im)
(fma.f64 x.im #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) x.im))
(fma.f64 x.im #s(literal 2 binary64) x.im)
(-.f64 (+.f64 x.im x.im) (neg.f64 x.im))
(-.f64 x.im (*.f64 #s(literal -2 binary64) x.im))
(+.f64 (+.f64 x.im x.im) (*.f64 #s(literal 1 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.re x.re)) (* (* 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)) (*.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 x.re (*.f64 #s(literal 3 binary64) x.im)))
(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 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) x.im) (*.f64 (*.f64 x.re x.re) x.im))
(+.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 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 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im)) (-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im) (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)))))
(fma.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 2 binary64) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(fma.f64 (+.f64 x.im x.im) (*.f64 x.re x.re) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.re x.re) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(fma.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 (*.f64 (+.f64 x.im x.im) x.re) x.re (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(fma.f64 x.im #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 x.re (*.f64 (+.f64 x.im x.im) x.re) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(-.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (neg.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im))
(+.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(+.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (+.f64 x.im x.im) x.re)
(*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))
(*.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.im) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re 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.im) (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
(fma.f64 x.im x.re (*.f64 x.im x.re))
(fma.f64 x.re x.im (*.f64 x.im x.re))
(-.f64 (*.f64 x.im x.re) (*.f64 (neg.f64 x.im) x.re))
(+.f64 (*.f64 x.im x.re) (*.f64 x.im x.re))
(*.f64 #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 (fma.f64 (*.f64 x.im x.im) x.im (*.f64 (*.f64 x.im x.im) x.im)) (fma.f64 x.im x.im (-.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))
(+.f64 x.im x.im)
(*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)
(*.f64 x.im #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
(*.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 #s(literal -1 binary64) x.im)
(*.f64 x.im #s(literal -1 binary64))
(neg.f64 x.im)
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64))) (-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im) (-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64)) (-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))))
(*.f64 (fma.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) (-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 4 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 4 binary64))) (fma.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 6 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 1 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(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 1 binary64)) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) (*.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 (neg.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)) (neg.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 (fabs.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)) (fabs.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 x.im x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) (*.f64 x.im (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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))))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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))))
(*.f64 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 1 binary64)) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im)
(*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) (*.f64 x.im x.im))
(*.f64 (neg.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)) (neg.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)))
(*.f64 (fabs.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)) (fabs.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)))
(*.f64 (*.f64 x.im x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))))
(*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im))
(*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) (*.f64 x.im (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)))
(pow.f64 (neg.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64)) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) x.re)) x.re)
(*.f64 (*.f64 (*.f64 (+.f64 x.im x.im) x.re) (*.f64 (+.f64 x.im x.im) x.re)) (*.f64 x.re x.re))
(*.f64 (*.f64 (+.f64 x.im x.im) (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) 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 (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 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)))
(*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 (+.f64 x.im x.im) x.re) (*.f64 (+.f64 x.im x.im) x.re)))
(*.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(*.f64 (*.f64 (+.f64 x.im x.im) x.re) (*.f64 x.re (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(pow.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.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 (pow.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) 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 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64) (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))) x.im) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64))) (fma.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re))))
(fma.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(fma.f64 x.im #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
(-.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(+.f64 (*.f64 #s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im)) x.im) (*.f64 (neg.f64 (*.f64 (+.f64 x.im x.im) x.re)) x.re))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (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 (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (fma.f64 (*.f64 #s(literal 3 binary64) x.im) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 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 (+ (* 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) 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) 3) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (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) x.im) 3) (*.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.re x.re)) (* (* 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)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (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.im x.im) x.re) (*.f64 (+.f64 x.im x.im) x.re))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (fma.f64 (*.f64 x.im x.im) (neg.f64 x.im) (*.f64 (*.f64 x.re x.re) x.im)))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (fma.f64 (-.f64 (+.f64 x.im x.im) (neg.f64 (*.f64 x.im #s(literal 1 binary64)))) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (fma.f64 #s(literal 5 binary64) (*.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 (+.f64 x.im x.im) (neg.f64 (*.f64 x.im #s(literal 1 binary64)))) (*.f64 x.im #s(literal 1 binary64))) (*.f64 (*.f64 x.im x.im) x.im))) (*.f64 x.re x.re) (+.f64 x.im x.im)) (neg.f64 (*.f64 x.im #s(literal 1 binary64)))) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (neg.f64 (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 x.im x.im)) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) x.im))) (*.f64 (*.f64 x.im #s(literal 1 binary64)) (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (fma.f64 #s(literal 5 binary64) (*.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 (+.f64 x.im x.im) (neg.f64 (*.f64 x.im #s(literal 1 binary64)))) (*.f64 x.im #s(literal 1 binary64))) (*.f64 (*.f64 x.im x.im) x.im))) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 x.re x.re) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (fma.f64 #s(literal 5 binary64) (*.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 (+.f64 x.im x.im) (neg.f64 (*.f64 x.im #s(literal 1 binary64)))) (*.f64 x.im #s(literal 1 binary64))) (*.f64 (*.f64 x.im x.im) x.im))) (*.f64 x.re x.re) (+.f64 x.im x.im)) (neg.f64 (*.f64 x.im #s(literal 1 binary64)))) (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (fma.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 #s(literal -2 binary64) (*.f64 x.im x.im)) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (fma.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 x.im x.im)) #s(literal 2 binary64))) (*.f64 x.re x.re) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) (fma.f64 #s(literal 5 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (fma.f64 (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 x.re x.re) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 x.im x.im)) #s(literal 2 binary64))) (*.f64 x.re x.re) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))) (*.f64 x.re x.re) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (*.f64 x.re 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) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)) #s(literal 4 binary64)))
#s(approx (* (* (+ x.im x.im) x.re) x.re) (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) (fma.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.im))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (fma.f64 #s(literal 3 binary64) x.im (/.f64 (*.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 x.re x.re) #s(literal 3 binary64)))
#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 (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))
#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.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re x.re))
#s(approx (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (*.f64 x.re x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (/.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.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))) #s(literal -2 binary64) (/.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) (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re (-.f64 x.im (+.f64 x.im x.im))) (*.f64 x.re (-.f64 x.im (+.f64 x.im x.im))))))))) (*.f64 x.re x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))) #s(literal -2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) #s(literal -2 binary64) (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im)))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) #s(literal -4 binary64) (+.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (-.f64 x.im (+.f64 x.im x.im))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re (-.f64 x.im (+.f64 x.im x.im))) (*.f64 x.re (-.f64 x.im (+.f64 x.im x.im)))))))) (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) #s(literal -2 binary64)) (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 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))))))))) (*.f64 x.re x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 x.re x.re))) #s(literal -2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) #s(literal -2 binary64) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 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)) #s(literal -2 binary64)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (pow.f64 x.im #s(literal 8 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.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)))))) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) #s(literal -4 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) #s(literal -2 binary64)) (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 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))))) (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 x.im (+.f64 x.im x.im))) #s(literal -2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 x.im (+.f64 x.im x.im))) #s(literal -4 binary64) (+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (-.f64 x.im (+.f64 x.im x.im))) #s(literal -2 binary64)) (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))))) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (-.f64 x.im (+.f64 x.im x.im)))))) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.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) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (-.f64 x.im (+.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))) (neg.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re (-.f64 x.im (+.f64 x.im x.im))) (*.f64 x.re (-.f64 x.im (+.f64 x.im x.im)))))))))))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) 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))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -2 binary64) (*.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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) #s(literal -2 binary64) (-.f64 (*.f64 x.im x.im) (fma.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.re) x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 2 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) #s(literal -2 binary64) (-.f64 (fma.f64 x.im x.im (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 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)) #s(literal -2 binary64)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (pow.f64 x.im #s(literal 8 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))))) (fma.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.re) x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 2 binary64) (fma.f64 #s(literal 4 binary64) (*.f64 x.im x.im) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 x.im x.im)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (fma.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.re) x.re)) #s(literal -2 binary64) (-.f64 (*.f64 x.im x.im) (fma.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.re) x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (fma.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.re) x.re)) #s(literal -2 binary64) (-.f64 (fma.f64 x.im x.im (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 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)) #s(literal -2 binary64)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))) (*.f64 (pow.f64 x.im #s(literal 8 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re))))) (fma.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.re) x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))))) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 x.im (-.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (*.f64 x.re x.re)) (+.f64 x.im x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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 (+ (* 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)
#s(approx (* 3 x.im) (*.f64 #s(literal 3 binary64) x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) x.im))
#s(approx (+ x.im x.im) (+.f64 x.im x.im))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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 (* (neg x.im) x.im) (*.f64 (neg.f64 x.im) x.im))
#s(approx (neg x.im) (neg.f64 x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (/.f64 (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) 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.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (-.f64 (/.f64 (*.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 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) 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 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) 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.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.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 #s(literal 1 binary64) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.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 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) 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)))))) (*.f64 x.im x.im)) (neg.f64 (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) 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 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) 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.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.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 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) 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)))))) (*.f64 x.im x.im))) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.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 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) 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)))))) (*.f64 x.im x.im) (/.f64 (*.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 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) 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 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (*.f64 x.im x.im)))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 x.im x.im (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 x.im x.im)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64))) (*.f64 x.im x.im)))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 (fma.f64 x.im x.im (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im))) (*.f64 x.im x.im)))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (fma.f64 (+.f64 x.re x.im) (-.f64 x.re x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) x.im) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* 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.re x.re)) (* (* 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)) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 4 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -4 binary64)))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))) #s(literal 1 binary64)) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.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))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (-.f64 (fma.f64 (pow.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64)) #s(literal -2 binary64) (+.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -4 binary64)))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) #s(literal 1 binary64)) (+.f64 (+.f64 (neg.f64 (*.f64 (-.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (fma.f64 #s(literal 5 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -4 binary64))))) (fma.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.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 (fma.f64 x.re x.re (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.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))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))))))) (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re)) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))))) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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) (*.f64 x.im x.im)) #s(literal -2 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -2 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -4 binary64) (fma.f64 #s(literal 5 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.im x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (- (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (* (* (* (+ x.im x.im) x.re) x.re) (* (* (+ x.im x.im) x.re) x.re))) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -2 binary64) #s(literal 1 binary64)) (neg.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 x.re x.re)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -4 binary64) (fma.f64 #s(literal 5 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.im x.im))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -2 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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -2 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (* (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im)) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -2 binary64) #s(literal 1 binary64)) (neg.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 x.re x.re)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (-.f64 (/.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.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) (/.f64 (neg.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 (/.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.re) (* x.re x.re)) (* (* 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)) (*.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.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im 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.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -4 binary64) #s(literal 1 binary64)) (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -4 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -2 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -4 binary64) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal 4 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)))) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))) (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)))))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal -4 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -2 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (*.f64 #s(literal -3 binary64) (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re))) (*.f64 x.re x.re)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) (*.f64 (*.f64 x.re x.re) x.re)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) (*.f64 (*.f64 x.im x.im) x.im)))))) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal -4 binary64) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) #s(literal 4 binary64) (fma.f64 (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))) (fma.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -2 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) #s(literal 4 binary64) (fma.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) (*.f64 (*.f64 x.re x.re) #s(literal -3 binary64))))))) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 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.re) x.re) (*.f64 (*.f64 x.im x.im) (*.f64 x.im x.im)))))) (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)))))))
#s(approx (- (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* x.im x.im) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im))) x.im) (* (* (+ x.im x.im) x.re) x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 x.im)) (-.f64 (+.f64 (/.f64 (neg.f64 (*.f64 x.re x.re)) (*.f64 x.im x.im)) #s(literal 1 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)))))

eval38.0ms (1.8%)

Memory
3.2MiB live, 90.6MiB allocated; 13ms collecting garbage
Compiler

Compiled 8 188 to 1 590 computations (80.6% saved)

prune8.0ms (0.4%)

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

9 alts after pruning (4 fresh and 5 done)

PrunedKeptTotal
New3432345
Fresh224
Picked235
Done022
Total3479356
Accuracy
100.0%
Counts
356 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓56.4%
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
▶61.8%
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64)))
▶56.3%
#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))
✓56.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
✓56.3%
#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))
✓91.2%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))) x.im))
▶61.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
▶53.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
✓53.7%
#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 167 to 157 computations (6% saved)

series20.0ms (1%)

Memory
0.1MiB live, 54.6MiB allocated; 9ms collecting garbage
Counts
18 → 30
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 (pow.f64 x.im #s(literal 3 binary64))))
(neg.f64 (pow.f64 x.im #s(literal 3 binary64)))
(pow.f64 x.im #s(literal 3 binary64))
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 x.re (*.f64 #s(literal 3 binary64) x.im))))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
x.re
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im)
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) x.re)
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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)
Outputs
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* x.re (* x.re (* 3 x.im))) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* x.re (* 3 x.im)) #s(hole binary64 (* 3 (* x.im x.re))))
#s(approx (* (* (* 3 x.re) x.re) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* 3 x.re) x.re) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* 3 x.re) #s(hole binary64 (* 3 x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (* x.re (* x.im x.re)) 3) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#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 (+ (* (- (* 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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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) (* (+ (* 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 (neg (pow x.im 3)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (pow x.im 3) #s(hole binary64 (pow x.im 3)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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) (* (+ (* 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.re x.re)) (* (* 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)) #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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 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.re x.re)) (* (* 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)) #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)))))))))
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)) (neg (pow x.im 3)) (pow x.im 3) 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 (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (* x.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* x.im x.re))
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)) (neg (pow x.im 3)) (pow x.im 3) 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 (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (* x.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* 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)) (neg (pow x.im 3)) (pow x.im 3) 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 (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (* x.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* 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)) (neg (pow x.im 3)) (pow x.im 3) 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 (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (* x.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* 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)) (neg (pow x.im 3)) (pow x.im 3) 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 (* x.re (* 3 x.im))) x.re (* x.re (* 3 x.im)) (* 3 x.im) (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (* (* (* 3 x.re) x.re) x.im) (* (* 3 x.re) x.re) (* 3 x.re) (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (* (* x.re (* x.im x.re)) 3) (* x.re (* x.im x.re)) (* x.im x.re))

rewrite41.0ms (2%)

Memory
-4.5MiB live, 41.3MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01251077
0142835
0655784
Stop Event
1×iter-limit
1×iter-limit
1×node-limit
1×iter-limit
Counts
48 → 121
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 (pow.f64 x.im #s(literal 3 binary64))))
(neg.f64 (pow.f64 x.im #s(literal 3 binary64)))
(pow.f64 x.im #s(literal 3 binary64))
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 x.re (*.f64 #s(literal 3 binary64) x.im))))
(*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im)))
x.re
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))
(*.f64 #s(literal 3 binary64) x.im)
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im)
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 #s(literal 3 binary64) x.re)
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (+ x.im (* 2 x.im))))))
#s(approx (* x.re (* x.re (* 3 x.im))) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* x.re (* 3 x.im)) #s(hole binary64 (* 3 (* x.im x.re))))
#s(approx (* (* (* 3 x.re) x.re) x.im) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#s(approx (* (* 3 x.re) x.re) #s(hole binary64 (* 3 (pow x.re 2))))
#s(approx (* 3 x.re) #s(hole binary64 (* 3 x.re)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (+ (* -1 (pow x.im 3)) (* (pow x.re 2) (- (* 2 x.im) (* -1 x.im))))))
#s(approx (* (* x.re (* x.im x.re)) 3) #s(hole binary64 (* 3 (* x.im (pow x.re 2)))))
#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 (+ (* (- (* 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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.re 2) (+ x.im (* 2 x.im)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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) (* (+ (* 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 (neg (pow x.im 3)) #s(hole binary64 (* -1 (pow x.im 3))))
#s(approx (pow x.im 3) #s(hole binary64 (pow x.im 3)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* 3 x.im) #s(hole binary64 (* 3 x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #s(hole binary64 (* x.im (+ (* 2 (pow x.re 2)) (pow x.re 2)))))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) #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) (* (+ (* 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.re x.re)) (* (* 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)) #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.re x.re)) (* (* 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)) #s(hole binary64 (* (pow x.im 3) (- (+ (* -1 (/ (pow x.re 4) (pow x.im 4))) (+ (* 2 (/ (pow x.re 2) (pow x.im 2))) (+ (/ (pow x.re 2) (pow x.im 2)) (/ (pow x.re 4) (pow x.im 4))))) 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.re x.re)) (* (* 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)) #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)))))))))
Outputs
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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.f64 (*.f64 (*.f64 x.im x.im) x.im)))
(*.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.im))
(pow.f64 (neg.f64 x.im) #s(literal 3 binary64))
(neg.f64 (*.f64 (*.f64 x.im x.im) x.im))
(*.f64 (pow.f64 x.im #s(literal 3/2 binary64)) (pow.f64 x.im #s(literal 3/2 binary64)))
(*.f64 (*.f64 x.im x.im) x.im)
(*.f64 x.im (*.f64 x.im x.im))
(pow.f64 x.im #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 3 binary64)))
x.im
#s(literal 3 binary64)
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 x.im x.re) x.re) #s(literal 3 binary64))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re) x.re)
(*.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.im x.re) x.re))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 (*.f64 x.re x.re) x.im (*.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.im (*.f64 x.re x.re) (*.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 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
x.re
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.im)
(*.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 #s(literal 3 binary64) x.im)
(*.f64 x.im #s(literal 3 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 x.im x.im) (+.f64 x.im x.im)) (*.f64 x.im x.im)) (fma.f64 #s(literal 2 binary64) x.im (neg.f64 x.im)))
(/.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 (-.f64 (pow.f64 (+.f64 x.im x.im) #s(literal 3 binary64)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im))) (fma.f64 (+.f64 x.im x.im) (+.f64 x.im x.im) (fma.f64 x.im x.im (*.f64 (+.f64 x.im x.im) (neg.f64 x.im)))))
(/.f64 (fma.f64 (*.f64 x.im x.im) x.im (pow.f64 (+.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 x.im x.im (-.f64 (*.f64 (+.f64 x.im x.im) (+.f64 x.im x.im)) (*.f64 x.im (+.f64 x.im x.im)))))
(fma.f64 #s(literal 2 binary64) x.im (*.f64 #s(literal 1 binary64) x.im))
(fma.f64 #s(literal 2 binary64) x.im x.im)
(fma.f64 x.im #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) x.im))
(fma.f64 x.im #s(literal 2 binary64) x.im)
(-.f64 (+.f64 x.im x.im) (neg.f64 x.im))
(-.f64 x.im (*.f64 #s(literal -2 binary64) x.im))
(+.f64 (+.f64 x.im x.im) (*.f64 #s(literal 1 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.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im)
(*.f64 (*.f64 #s(literal 3 binary64) x.re) (*.f64 x.im x.re))
(*.f64 x.im (*.f64 (*.f64 #s(literal 3 binary64) x.re) 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 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 x.im (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re)
(*.f64 (*.f64 x.re x.re) #s(literal 3 binary64))
(*.f64 #s(literal 3 binary64) (*.f64 x.re x.re))
(*.f64 x.re (*.f64 #s(literal 3 binary64) x.re))
(/.f64 (-.f64 (*.f64 (*.f64 (*.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) x.re) x.re)) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))) (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 (*.f64 x.re x.re) 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 (neg.f64 x.re) (neg.f64 x.re) (*.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 (*.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)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))
(*.f64 #s(literal 3 binary64) x.re)
(*.f64 x.re #s(literal 3 binary64))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 x.im x.re) x.re) #s(literal 3 binary64))
(*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re) x.re)
(*.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.im x.re) x.re))
(*.f64 #s(literal 3 binary64) (*.f64 (*.f64 x.re x.re) x.im))
(*.f64 x.re (*.f64 (*.f64 #s(literal 3 binary64) x.im) x.re))
(fma.f64 (*.f64 x.re x.re) x.im (*.f64 (+.f64 x.im x.im) (*.f64 x.re x.re)))
(fma.f64 (*.f64 x.re x.re) x.im (*.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.im (*.f64 x.re x.re) (*.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 (*.f64 x.re x.re) x.im) (*.f64 (*.f64 x.re x.re) (+.f64 x.im x.im)))
(*.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.re) (* x.re x.re)) (* (* 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.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (fma.f64 (*.f64 (*.f64 x.im x.re) x.re) #s(literal 3 binary64) (neg.f64 (*.f64 (*.f64 x.im x.im) 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)
#s(approx (* x.re (* 3 x.im)) (*.f64 (*.f64 #s(literal 3 binary64) x.im) 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 #s(literal 3 binary64) x.re) x.re))
#s(approx (* 3 x.re) (*.f64 #s(literal 3 binary64) x.re))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (fma.f64 (*.f64 (*.f64 x.im x.re) x.re) #s(literal 3 binary64) (neg.f64 (*.f64 (*.f64 x.im x.im) 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.im x.re)) (*.f64 (*.f64 x.re x.re) x.im))
#s(approx (* x.im x.re) (*.f64 x.im x.re))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (neg.f64 (*.f64 x.im x.im))) x.im))
#s(approx (neg (pow x.im 3)) (neg.f64 (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (pow x.im 3) (*.f64 (*.f64 x.im x.im) x.im))
#s(approx x.im x.im)
#s(approx (* 3 x.im) (*.f64 #s(literal 3 binary64) x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) x.re) x.re) x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (fma.f64 (*.f64 #s(literal 3 binary64) x.re) x.re (neg.f64 (*.f64 x.im x.im))) x.im))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (*.f64 #s(literal 3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (*.f64 #s(literal 3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (-.f64 (+.f64 (fma.f64 #s(literal 3 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) x.re) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.im) x.im)))) #s(literal 1 binary64)) (*.f64 (*.f64 x.im x.im) x.im)))
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.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.re x.re)) (* (* 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)) (*.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))))

eval11.0ms (0.5%)

Memory
-21.7MiB live, 22.9MiB allocated; 5ms collecting garbage
Compiler

Compiled 710 to 335 computations (52.8% saved)

prune9.0ms (0.4%)

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

9 alts after pruning (0 fresh and 9 done)

PrunedKeptTotal
New83083
Fresh000
Picked044
Done055
Total83992
Accuracy
100.0%
Counts
92 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓56.4%
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 (*.f64 x.re x.re) x.im) #s(literal 3 binary64)))
✓61.8%
#s(approx (+ (* (/ (- (* (* x.re x.re) (* x.re x.re)) (* (* 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)) (*.f64 (*.f64 x.re (*.f64 x.im x.re)) #s(literal 3 binary64)))
✓56.3%
#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))
✓56.4%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) x.im)))
✓56.3%
#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))
✓91.2%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 #s(approx (+ (* 3 (* x.re x.re)) (neg (* x.im x.im))) (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (*.f64 x.im x.im))) x.im))
✓61.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (*.f64 x.re (*.f64 x.re (*.f64 #s(literal 3 binary64) x.im))))
✓53.8%
#s(approx (+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)) (neg.f64 (pow.f64 x.im #s(literal 3 binary64))))
✓53.7%
#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 432 to 265 computations (38.7% saved)

regimes19.0ms (0.9%)

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

3 calls:

8.0ms
x.re
5.0ms
x.im
4.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.9%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))
98.6%2x.re
96.3%2x.im
Compiler

Compiled 13 to 15 computations (-15.4% saved)

regimes3.0ms (0.2%)

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

1 calls:

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

Compiled 1 to 2 computations (-100% saved)

regimes13.0ms (0.6%)

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

3 calls:

7.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))
3.0ms
x.re
3.0ms
x.im
Results
AccuracySegmentsBranch
97.8%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))
79.8%2x.im
87.3%2x.re
Compiler

Compiled 13 to 15 computations (-15.4% saved)

regimes3.0ms (0.1%)

Memory
8.5MiB live, 8.4MiB allocated; 0ms collecting garbage
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

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

3 calls:

1.0ms
x.im
1.0ms
x.re
1.0ms
(+.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.re))
Results
AccuracySegmentsBranch
53.7%1x.im
53.7%1x.re
53.7%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)

bsearch8.0ms (0.4%)

Memory
18.4MiB live, 18.4MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
7.0ms
6.930544372033397e+147
2.7084734548055615e+148
Samples
4.0ms80×0valid
Compiler

Compiled 192 to 196 computations (-2.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 2.0ms
ival-mult!: 2.0ms (83.3% 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.8MiB live, 2.8MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
6.930544372033397e+147
2.7084734548055615e+148
Compiler

Compiled 227 to 221 computations (2.6% saved)

bsearch0.0ms (0%)

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

Compiled 14 to 16 computations (-14.3% saved)

derivations35.0ms (1.7%)

Memory
-36.5MiB live, 57.4MiB allocated; 3ms collecting garbage
Stop Event
1×done
Compiler

Compiled 78 to 51 computations (34.6% saved)

preprocess216.0ms (10.4%)

Memory
-3.8MiB live, 155.2MiB allocated; 167ms collecting garbage
Remove

(negabs x.im)

(abs x.re)

Compiler

Compiled 874 to 667 computations (23.7% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...