math.cube on complex, real part

Time bar (total: 2.7s)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
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)

sample858.0ms (32%)

Memory
38.3MiB live, 1 203.1MiB allocated; 291ms collecting garbage
Samples
537.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 273.0ms
ival-mult!: 224.0ms (82.1% of total)
ival-sub!: 31.0ms (11.4% of total)
ival-add!: 16.0ms (5.9% of total)
adjust: 2.0ms (0.7% of total)
Bogosity

explain141.0ms (5.3%)

Memory
33.1MiB live, 277.3MiB allocated; 19ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
200-0-(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
190-0-(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
140-0-(*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re)
00-0-(*.f64 x.re x.im)
00-0-(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
00-0-(*.f64 x.im x.im)
00-0-(*.f64 x.re x.re)
00-0-(*.f64 x.im x.re)
00-0-(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im)
00-0-x.re
00-0-x.im
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))nan-rescue200
(*.f64 x.re x.re)overflow63
(*.f64 x.im x.im)overflow63
-.f64(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))nan-rescue190
(*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re)overflow112
(*.f64 x.re x.re)overflow63
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))overflow106
(*.f64 x.im x.im)overflow63
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im)overflow59
(*.f64 x.im x.re)overflow34
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))overflow34
(*.f64 x.re x.im)overflow34
*.f64(*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re)n*o140
Confusion
Predicted +Predicted -
+410
-0215
Precision
1.0
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+4100
-00215
Precision?
1.0
Recall?
1.0
Freqs
test
numberfreq
0215
129
212
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
39.0ms512×0valid
Compiler

Compiled 153 to 37 computations (75.8% saved)

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

preprocess54.0ms (2%)

Memory
-51.4MiB live, 54.1MiB allocated; 26ms collecting garbage
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
036118
1121104
2418102
3119067
4405766
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
84.2%
(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
Symmetry

(abs x.im)

(negabs x.re)

Compiler

Compiled 38 to 22 computations (42.1% saved)

series15.0ms (0.6%)

Memory
23.2MiB live, 23.2MiB 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.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
(*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re)
(-.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.im)
(+.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.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (+ (* -1 (pow x.im 2)) (pow x.re 2)) (* 2 (pow x.im 2))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* -1 (* (pow x.im 2) x.re))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* x.re (+ (* -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))))
#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.im) #s(hole binary64 (* 2 (* (pow x.im 2) x.re))))
#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.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (pow x.re 3)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#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.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (/ (pow x.im 2) (pow x.re 2)) (+ 1 (* -2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* -1 (* (pow x.re 3) (- (/ (pow x.im 2) (pow x.re 2)) 1)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (+ (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re))) (pow x.re 3))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (+ (* -1 (* (pow x.im 2) x.re)) (pow x.re 3))))
#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.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 x.re) (/ (pow x.re 3) (pow x.im 2))) (* 2 x.re)))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (/ (pow x.re 3) (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) (pow x.im 2)) 1))))
Calls

6 calls:

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

rewrite64.0ms (2.4%)

Memory
19.8MiB live, 67.0MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

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

eval24.0ms (0.9%)

Memory
-30.9MiB live, 15.3MiB allocated; 4ms collecting garbage
Compiler

Compiled 1 842 to 301 computations (83.7% saved)

prune6.0ms (0.2%)

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

8 alts after pruning (8 fresh and 0 done)

PrunedKeptTotal
New65873
Fresh000
Picked101
Done000
Total66874
Accuracy
95.6%
Counts
74 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
87.3%
(fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im))
22.0%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) (fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
64.8%
(-.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
50.0%
(-.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
58.6%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
90.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) x.re))
50.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re))
50.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 x.re #s(literal -3 binary64)) (*.f64 x.im x.im)))
Compiler

Compiled 456 to 236 computations (48.2% saved)

series57.0ms (2.1%)

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

6 calls:

TimeVariablePointExpression
15.0ms
x.im
@-inf
((- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (+ (* x.re x.re) (neg (* x.im x.im))) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (* (* x.im x.im) 2) 2 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* x.re -3) (* x.im x.im)) (* x.re -3) -3 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (* x.re x.re) (* x.im x.im)) x.re) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im)) (* (* 2 (* x.im x.re)) x.im) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)))
10.0ms
x.re
@-inf
((- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (+ (* x.re x.re) (neg (* x.im x.im))) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (* (* x.im x.im) 2) 2 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* x.re -3) (* x.im x.im)) (* x.re -3) -3 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (* x.re x.re) (* x.im x.im)) x.re) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im)) (* (* 2 (* x.im x.re)) x.im) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)))
7.0ms
x.im
@inf
((- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (+ (* x.re x.re) (neg (* x.im x.im))) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (* (* x.im x.im) 2) 2 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* x.re -3) (* x.im x.im)) (* x.re -3) -3 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (* x.re x.re) (* x.im x.im)) x.re) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im)) (* (* 2 (* x.im x.re)) x.im) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)))
7.0ms
x.re
@0
((- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (+ (* x.re x.re) (neg (* x.im x.im))) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (* (* x.im x.im) 2) 2 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* x.re -3) (* x.im x.im)) (* x.re -3) -3 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (* x.re x.re) (* x.im x.im)) x.re) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im)) (* (* 2 (* x.im x.re)) x.im) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)))
6.0ms
x.re
@inf
((- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (+ (* x.re x.re) (neg (* x.im x.im))) x.re (neg (* x.im x.im)) (* x.im x.im) x.im (* (* x.im x.im) 2) 2 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* x.re -3) (* x.im x.im)) (* x.re -3) -3 (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (* x.re x.re) (* x.im x.im)) x.re) (- (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im) (+ (* x.re x.im) (* x.im x.re)) (* x.re x.im) (* x.im x.re) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (- x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im)) (* (* 2 (* x.im x.re)) x.im) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)))

rewrite225.0ms (8.4%)

Memory
22.4MiB live, 298.5MiB allocated; 36ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
092710471
09837357
162937357
083147116
Stop Event
iter-limit
node-limit
iter-limit
Counts
229 → 474
Calls
Call 1
Inputs
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) x.re))
(*.f64 (-.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) x.re)
(-.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im)))
x.re
(neg.f64 (*.f64 x.im x.im))
(*.f64 x.im x.im)
x.im
(*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 x.re #s(literal -3 binary64)) (*.f64 x.im x.im)))
(*.f64 (*.f64 x.re #s(literal -3 binary64)) (*.f64 x.im x.im))
(*.f64 x.re #s(literal -3 binary64))
#s(literal -3 binary64)
(-.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
(*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) x.re)
#s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
(*.f64 x.re x.re)
(*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im)
(+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re))
(*.f64 x.re x.im)
(*.f64 x.im x.re)
(fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im))
(*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(-.f64 x.re x.im)
(*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im)
(neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)))
(*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) (fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re))
(*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)
(fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (+ (* -1 (pow x.im 2)) (pow x.re 2)) (* 2 (pow x.im 2))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* -1 (* x.re (+ (* 2 (pow x.im 2)) (pow x.im 2))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* x.re (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.re 2)))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2)))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (- (pow x.re 2) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) #s(hole binary64 (- (pow x.re 2) (pow x.im 2))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (* x.re -3) (* x.im x.im)) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (* x.re -3) #s(hole binary64 (* -3 x.re)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* -1 (* (pow x.im 2) x.re))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* x.re (+ (* -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))))
#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 x.im) (* x.im x.re)) x.im) #s(hole binary64 (* 2 (* (pow x.im 2) x.re))))
#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.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.im))
#s(approx (+ x.re x.im) #s(hole binary64 (+ x.im x.re)))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (- x.re x.im) #s(hole binary64 (- x.re x.im)))
#s(approx (* (neg (* 2 (* x.im x.re))) x.im) #s(hole binary64 (* -2 (* (pow x.im 2) x.re))))
#s(approx (neg (* 2 (* x.im x.re))) #s(hole binary64 (* -2 (* x.im x.re))))
#s(approx (* 2 (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (/ (* x.re (- (pow x.im 4) (* 4 (pow x.im 4)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.re (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.re (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (* x.re (- (+ (* -2 (/ x.im (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ x.im (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 3)))) (+ (* -2 (/ (pow x.im 3) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (* 2 (/ (pow x.im 3) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (/ (* (+ x.im (* -1 x.im)) (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 2) (- (pow x.im 4) (* 4 (pow x.im 4))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 2) (- (+ (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 4)) (* 4 (pow x.im 4))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 2) (- (+ (* x.re (+ (* -2 (pow x.im 3)) (+ (* 2 (pow x.im 3)) (* x.re (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow x.im 4)) (* 4 (pow x.im 4))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 2) (- (+ (* x.re (+ (* -2 (pow x.im 3)) (+ (* 2 (pow x.im 3)) (* x.re (+ (* -4 (pow x.im 2)) (+ (* 2 (pow x.im 2)) (* x.re (+ (* -2 x.im) (* 2 x.im))))))))) (pow x.im 4)) (* 4 (pow x.im 4))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.im 4) (pow x.re 2))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ (* x.re (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (pow x.im 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ (* x.re (+ (* -2 (pow x.im 3)) (+ (* 2 (pow x.im 3)) (* x.re (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))))))) (pow x.im 4)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 2) (+ (* x.re (+ (* -2 (pow x.im 3)) (+ (* 2 (pow x.im 3)) (* x.re (+ (* -4 (pow x.im 2)) (+ (* 2 (pow x.im 2)) (* x.re (+ (* -2 x.im) (* 2 x.im))))))))) (pow x.im 4)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* -1 (* (pow x.im 2) x.re))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* x.re (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* x.re (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im))))))))
#s(approx (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* 4 (* (pow x.im 4) (pow x.re 2)))))
#s(approx (* (* 2 (* x.im x.re)) x.im) #s(hole binary64 (* 2 (* (pow x.im 2) x.re))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (+ (* -1 (pow x.im 2)) (+ (* 2 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (pow x.re 3)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (neg (* 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.re) #s(hole binary64 (pow x.re 3)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#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.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -2 (/ (pow x.im 2) (pow x.re 2))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.re))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (- x.re x.im) #s(hole binary64 x.re))
#s(approx (- x.re x.im) #s(hole binary64 (* x.re (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (pow x.re 3)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re)))) (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re))))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (/ x.im x.re) (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (+ (* -2 (/ (pow x.im 3) (pow x.re 3))) (+ (* 2 (/ x.im x.re)) (* 2 (/ (pow x.im 3) (pow x.re 3)))))))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (/ x.im x.re) (+ (/ (* (+ x.im (* -1 x.im)) (- (* -4 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im))))))) (pow x.re 3)) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 2)) (/ (* (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 3)))))))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (pow x.re 6)))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 6) (+ 1 (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re)))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 6) (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (+ (* 2 (/ x.im x.re)) (* 2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 6) (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (+ (* -2 (/ (pow x.im 3) (pow x.re 3))) (+ (* 2 (/ x.im x.re)) (+ (* 2 (/ (pow x.im 2) (pow x.re 2))) (* 2 (/ (pow x.im 3) (pow x.re 3))))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (pow x.re 6)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 6) (+ 1 (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re)))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 6) (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (+ (* 2 (/ x.im x.re)) (* 2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 6) (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (+ (* -2 (/ (pow x.im 3) (pow x.re 3))) (+ (* 2 (/ x.im x.re)) (+ (* 2 (/ (pow x.im 2) (pow x.re 2))) (* 2 (/ (pow x.im 3) (pow x.re 3))))))))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (pow x.re 3)))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (* 2 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re))))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (/ (pow x.im 2) (pow x.re 2)) (+ 1 (* -2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* -1 (* (pow x.re 3) (- (+ (* 2 (/ (pow x.im 2) (pow x.re 2))) (/ (pow x.im 2) (pow x.re 2))) 1)))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (* -1 (* (pow x.re 3) (- (/ (pow x.im 2) (pow x.re 2)) 1)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (* -1 x.im)) x.re)) 1)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (+ (* -1 x.im) (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) x.re)))) x.re)) 1)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* -1 (+ x.im (* -1 x.im))) (/ (pow x.im 2) x.re)) x.re))))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.re (- (/ x.im x.re) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (+ (* -1 (+ (* -2 x.im) (* 2 x.im))) (* -1 (/ (- (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))) x.re))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (+ (* -1 (+ (* -2 x.im) (* 2 x.im))) (* -1 (/ (- (+ (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -1 (/ (- (* -1 (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (* -1 (* (+ (* -2 (pow x.im 2)) (pow x.im 2)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))))) x.re))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))) x.re))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 6) (+ 1 (* -1 (/ (+ (* -2 x.im) (* 2 x.im)) x.re))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 6) (+ 1 (* -1 (/ (+ (* -2 x.im) (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.re)) (* 2 x.im))) x.re))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 6) (+ 1 (* -1 (/ (+ (* -2 x.im) (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.re)) (* 2 (pow x.im 2)))) x.re)) (* 2 x.im))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 6) (+ 1 (* -1 (/ (+ (* -2 x.im) (* 2 x.im)) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 6) (+ 1 (* -1 (/ (+ (* -2 x.im) (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2))) x.re)) (* 2 x.im))) x.re))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.re 6) (+ 1 (* -1 (/ (+ (* -2 x.im) (+ (* -1 (/ (+ (* -4 (pow x.im 2)) (+ (* -1 (/ (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3))) x.re)) (* 2 (pow x.im 2)))) x.re)) (* 2 x.im))) x.re))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (* -1 x.im)) x.re)) 1)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (+ (* -1 x.im) (* -1 (/ (pow x.im 2) x.re)))) x.re)) 1)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (* -1 x.im)) x.re)) 1)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (+ (* -1 x.im) (* -1 (/ (+ (* -2 (pow x.im 2)) (pow x.im 2)) x.re)))) x.re)) 1)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (+ (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re))) (pow x.re 3))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (+ (* -3 (* (pow x.im 2) x.re)) (pow x.re 3))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (+ (* -3 (pow x.im 2)) (pow x.re 2))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) #s(hole binary64 (+ (* -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 (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* (* x.im x.im) 2) #s(hole binary64 (* 2 (pow x.im 2))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) #s(hole binary64 (+ (* -1 (* (pow x.im 2) x.re)) (pow x.re 3))))
#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.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (+ (* x.im (* x.re (+ x.re (* -1 x.re)))) (pow x.re 3))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (+ (* x.im (+ (* x.im (+ (* -2 x.re) (* -1 x.re))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2))))
#s(approx (- x.re x.im) #s(hole binary64 (+ x.re (* -1 x.im))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (- (* -4 x.re) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (- (+ (* -4 x.re) (* -1 (* x.im (+ (/ (* (+ x.re (* -1 x.re)) (- (* -4 x.re) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))) (pow x.re 2)) (/ (* (+ (* -1 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3)))))) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow x.re 6))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (+ (* x.im (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))))) (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow x.re 6))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (+ (* x.im (+ (* x.im (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re)))) (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))))) (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow x.re 6))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (+ (* x.im (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3))))) (pow x.re 6))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (+ (* x.im (+ (* x.im (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))))) (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow x.re 6))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (+ (* x.im (+ (* x.im (+ (* x.im (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re)))) (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))))) (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))))) (pow x.re 6))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (+ (* x.im (* x.re (+ x.re (* -1 x.re)))) (pow x.re 3))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (+ (* x.im (+ (* -1 (* x.im x.re)) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (+ (* x.im (* x.re (+ x.re (* -1 x.re)))) (pow x.re 3))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (+ (* x.im (+ (* x.im (+ (* -1 x.re) (* 2 x.re))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 x.re) (/ (pow x.re 3) (pow x.im 2))) (* 2 x.re)))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -3 x.re) (/ (pow x.re 3) (pow x.im 2))))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* -3 (pow x.im 2))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 3))))
#s(approx (+ (* x.re x.re) (neg (* 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.re) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (/ (pow x.re 3) (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) (pow x.im 2)) 1))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (* -1 x.re)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (/ (* x.re (+ x.re (* -1 x.re))) x.im))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (+ (/ (* x.re (+ x.re (* -1 x.re))) x.im) (/ (pow x.re 3) (pow x.im 2))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* x.im (- (/ x.re x.im) 1))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (/ (* (pow x.im 2) (- (pow x.re 2) (* 4 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (* (pow x.im 2) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))) (+ (/ (* (pow x.re 3) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (* (pow x.im 2) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 4) (- (pow x.re 2) (* 4 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 4) (- (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im) (pow x.re 2)) (* 4 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 4) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (pow x.im 2)) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im) (pow x.re 2))) (* 4 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 4) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (pow x.im 2)) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im) (+ (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.im 3)) (pow x.re 2)))) (* 4 (pow x.re 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im) (pow x.re 2)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (pow x.im 2)) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im) (pow x.re 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (pow x.im 2)) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im) (+ (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (pow x.im 3)) (pow x.re 2)))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (/ (* x.re (+ x.re (* -1 x.re))) x.im)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (+ (/ (* x.re (+ x.re (* -1 x.re))) x.im) (/ (pow x.re 3) (pow x.im 2)))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (+ (* 2 x.re) (/ (* x.re (+ x.re (* -1 x.re))) x.im))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (+ (* 2 x.re) (+ (/ (* x.re (+ x.re (* -1 x.re))) x.im) (/ (pow x.re 3) (pow x.im 2))))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (* x.re (+ x.re (* -1 x.re))) x.im)))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (+ (* -1 (/ (pow x.re 3) x.im)) (* x.re (+ x.re (* -1 x.re)))) x.im)))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (+ (* -1 x.re) (* -1 (/ (pow x.re 2) x.im)))) x.im)) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.im (+ 1 (* -1 (/ x.re x.im)))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) x.im)) (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) (+ (* -1 x.re) (* 2 x.re))))) x.im)) (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) x.im)) (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 4) (- (+ (* -1 (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im)) (pow x.re 2)) (* 4 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 4) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) x.im)) (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re)))) x.im)) (pow x.re 2)) (* 4 (pow x.re 2))))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 4) (- (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))))) x.im)) (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re)))) x.im)) (pow x.re 2)) (* 4 (pow x.re 2))))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -1 (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) x.im)) (pow x.re 2)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -1 (/ (+ (* -1 (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) x.im)) (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re)))) x.im)) (pow x.re 2)))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) #s(hole binary64 (* (pow x.im 4) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) x.im)) (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2))))) x.im)) (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re)))) x.im)) (pow x.re 2)))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (* -1 (/ (* x.re (+ x.re (* -1 x.re))) x.im))))))
#s(approx (* (* (+ x.re x.im) (- x.re x.im)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (* -1 (/ (+ (* -1 (/ (pow x.re 3) x.im)) (* x.re (+ x.re (* -1 x.re)))) x.im))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (+ (* -1 (/ (* x.re (+ x.re (* -1 x.re))) x.im)) (* 2 x.re))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (+ (* -1 (/ (+ (* -1 (/ (pow x.re 3) x.im)) (* x.re (+ x.re (* -1 x.re)))) x.im)) (* 2 x.re))))))
Outputs
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
(*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re)
(*.f64 x.re (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))) (fma.f64 (-.f64 x.re x.im) (+.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64))) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 x.re x.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 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.im x.im) #s(literal -3 binary64)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (neg.f64 x.im) x.im (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(fma.f64 (-.f64 x.re x.im) (+.f64 x.im x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)))
(fma.f64 (-.f64 x.re x.im) (+.f64 x.im x.re) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(fma.f64 (+.f64 x.im x.re) (-.f64 x.re x.im) (*.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)))
(fma.f64 (+.f64 x.im x.re) (-.f64 x.re x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(fma.f64 #s(literal -3 binary64) (*.f64 x.im x.im) (*.f64 x.re x.re))
(fma.f64 x.im (neg.f64 x.im) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(fma.f64 x.re x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(-.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 x.re x.re))
(+.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)))
(+.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))
(*.f64 (+.f64 x.im x.re) (-.f64 x.re x.im))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.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 x.re #s(literal 6 binary64))) (fma.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.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 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 x.re x.re))
(fma.f64 x.im (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 (neg.f64 x.im) x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))
x.re
(*.f64 (neg.f64 x.im) x.im)
(*.f64 (*.f64 x.im x.im) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 x.im x.im))
(*.f64 x.im (neg.f64 x.im))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 x.im x.im)))))
(neg.f64 (*.f64 x.im x.im))
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 x.im x.im))
(fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (*.f64 x.im x.im))
(fma.f64 x.im x.im (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(+.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 x.im x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64))))
x.im
(*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 x.im x.im))
(*.f64 x.im (*.f64 #s(literal 2 binary64) x.im))
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.im x.im))
(fma.f64 x.im x.im (*.f64 x.im x.im))
(+.f64 (*.f64 x.im x.im) (*.f64 x.im x.im))
#s(literal 2 binary64)
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im) x.im)
(*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re)
(*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64))
(*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -3 binary64) x.re))
(*.f64 (*.f64 #s(literal -3 binary64) x.re) (*.f64 x.im x.im))
(*.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.im x.im) x.re))
(*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) x.re (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) x.re (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.re) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -2 binary64) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(fma.f64 x.re (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(fma.f64 x.re (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im)) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) x.re) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(*.f64 #s(literal -3 binary64) x.re)
(*.f64 x.re #s(literal -3 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 #s(literal -2 binary64) x.re)) (*.f64 x.re x.re)) (-.f64 (*.f64 #s(literal -2 binary64) x.re) (neg.f64 x.re)))
(/.f64 (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 #s(literal 2 binary64) x.re) (*.f64 #s(literal 2 binary64) x.re))) (*.f64 x.re #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) x.re) #s(literal 3 binary64))) (fma.f64 x.re x.re (fma.f64 (*.f64 #s(literal 2 binary64) x.re) (*.f64 #s(literal 2 binary64) x.re) (*.f64 (neg.f64 x.re) (*.f64 #s(literal 2 binary64) x.re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) x.re) #s(literal 3 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 #s(literal -2 binary64) x.re) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 #s(literal -2 binary64) x.re) (neg.f64 x.re)))))
(fma.f64 #s(literal -2 binary64) x.re (neg.f64 x.re))
(fma.f64 #s(literal -1 binary64) x.re (*.f64 #s(literal -2 binary64) x.re))
(fma.f64 x.re #s(literal -2 binary64) (neg.f64 x.re))
(fma.f64 x.re #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) x.re))
(-.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 #s(literal 1 binary64) x.re))
(-.f64 (neg.f64 x.re) (*.f64 #s(literal 2 binary64) x.re))
(+.f64 (*.f64 #s(literal -2 binary64) x.re) (neg.f64 x.re))
(+.f64 (neg.f64 x.re) (*.f64 #s(literal -2 binary64) x.re))
#s(literal -3 binary64)
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re) (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64))) (fma.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re) (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))))
(fma.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(fma.f64 x.re #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(-.f64 (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(+.f64 (*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)) x.re)
(*.f64 x.re #s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.re) x.im))
(*.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)))
(*.f64 (*.f64 #s(literal 2 binary64) 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 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64))) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(fma.f64 x.im (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(fma.f64 x.re (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re))) x.im))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))
(*.f64 (+.f64 x.im x.re) (-.f64 x.re x.im))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 x.re x.re (*.f64 x.im x.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re))) (-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im))) (-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (+.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.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 x.re #s(literal 6 binary64))) (fma.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 x.re x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re)))))
(/.f64 (+.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (neg.f64 x.im) x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 (neg.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 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 x.re x.re))
(fma.f64 x.im (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 (neg.f64 x.im) x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))
(/.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 x.im x.re))
(/.f64 (+.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (fma.f64 x.im x.im (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 x.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (fma.f64 x.re x.re (-.f64 (*.f64 x.im x.im) (*.f64 x.im x.re))))
(/.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (-.f64 x.re x.im))
(+.f64 x.im x.re)
(+.f64 x.re x.im)
(/.f64 (-.f64 (pow.f64 x.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (fma.f64 x.re x.re (fma.f64 x.im x.im (*.f64 x.im x.re))))
(/.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (+.f64 x.im x.re))
(-.f64 x.re x.im)
(*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im)
(*.f64 x.im (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)))
(neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (*.f64 #s(literal -2 binary64) x.im) x.re)
(*.f64 #s(literal -2 binary64) (*.f64 x.im x.re))
(*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 x.im) x.re))
(*.f64 (*.f64 x.im x.re) #s(literal -2 binary64))
(neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)))
(*.f64 (*.f64 #s(literal 2 binary64) 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 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64))) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(fma.f64 x.im (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(fma.f64 x.re (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re))) x.im))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)) (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 6 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (*.f64 (*.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))) x.re (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) (*.f64 x.re x.re) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 x.re (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(*.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.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))) x.re)
(*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re))) (*.f64 x.re x.re))
(*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) (neg.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)))
(*.f64 (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) (fabs.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)))
(*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 x.re (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)))
(pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)) #s(literal 2 binary64)))
(*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)
(*.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re))
(*.f64 x.re (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re) (pow.f64 x.re #s(literal 3 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re) #s(literal 3 binary64)) (pow.f64 x.re #s(literal 9 binary64))) (fma.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re) (-.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re) (pow.f64 x.re #s(literal 3 binary64))))))
(fma.f64 (pow.f64 x.re #s(literal 3/2 binary64)) (pow.f64 x.re #s(literal 3/2 binary64)) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -1 binary64) (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 (*.f64 x.re x.re) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 x.re x.re) x.re (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 (neg.f64 x.im) x.im) x.re (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) x.re) (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 x.re (*.f64 x.re x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 x.re (*.f64 (neg.f64 x.im) x.im) (pow.f64 x.re #s(literal 3 binary64)))
(+.f64 (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
(+.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(+.f64 (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re) (pow.f64 x.re #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) (*.f64 x.im x.im))
(*.f64 (fabs.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)) (fabs.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) (*.f64 x.im (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.re) x.im))
(*.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re)))
(fma.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x.im x.re) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(fma.f64 x.im (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
(fma.f64 x.re (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (neg.f64 x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))) x.re))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (-.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)))
#s(approx x.re x.re)
#s(approx (* (* x.re -3) (* x.im x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (* x.re -3) (*.f64 #s(literal -3 binary64) x.re))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal 2 binary64)))
#s(approx (* 2 (* x.im x.re)) (*.f64 #s(literal 2 binary64) (*.f64 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.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)) x.re))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (neg.f64 x.im) x.im))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (fma.f64 (neg.f64 x.im) x.im (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)))
#s(approx (+ x.re x.im) x.im)
#s(approx (+ x.re x.im) (+.f64 x.im x.re))
#s(approx (- x.re x.im) (neg.f64 x.im))
#s(approx (- x.re x.im) (-.f64 x.re x.im))
#s(approx (* (neg (* 2 (* x.im x.re))) x.im) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) x.re))
#s(approx (neg (* 2 (* x.im x.re))) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)))
#s(approx (* 2 (* x.im x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 x.re (/.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))) x.re (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))) x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64))))) x.re)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))) x.re (-.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 (/.f64 x.im (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -2 binary64) (fma.f64 (/.f64 x.im (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 3 binary64))))) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))))) x.re (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64))))) x.re)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) #s(literal 2 binary64)))) x.re (-.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) x.re))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 x.re x.re)))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64)) x.re (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)))) (*.f64 x.re x.re)))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (fma.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) x.re)) x.re (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)))) (*.f64 x.re x.re)))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (fma.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.im #s(literal 0 binary64)) x.re)) x.re)) x.re (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)))) (*.f64 x.re x.re)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 x.re x.re)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64)) x.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 x.re x.re)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (fma.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im)) x.re)) x.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 x.re x.re)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (fma.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.im #s(literal 0 binary64)) x.re)) x.re)) x.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 x.re x.re)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) x.re))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)) x.re))
#s(approx (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 x.re x.re)))
#s(approx (* (+ (* x.re x.im) (* x.im x.re)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal 2 binary64)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) x.re))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) x.re))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal 1 binary64) (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)) x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re)))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re))) (*.f64 x.re x.re)))
#s(approx (+ x.re x.im) x.re)
#s(approx (+ x.re x.im) (*.f64 (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)) x.re))
#s(approx (- x.re x.im) x.re)
#s(approx (- x.re x.im) (*.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (-.f64 (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re))) #s(literal 1 binary64)) (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.re x.re)) (/.f64 x.im x.re)))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal -2 binary64) (fma.f64 #s(literal 2 binary64) (+.f64 (/.f64 x.im x.re) (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64)) #s(literal -2 binary64))))) (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re)) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (fma.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im) (*.f64 (neg.f64 x.im) x.im))) (pow.f64 x.re #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 x.re #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.re x.re)))))))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 6 binary64)))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) #s(literal 1 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 x.re x.re)))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal -2 binary64) (fma.f64 (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64)) #s(literal -2 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64)))))))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (pow.f64 x.re #s(literal 6 binary64)))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) #s(literal 1 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 x.re x.re)))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal -2 binary64) (fma.f64 (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64)) #s(literal -2 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64)))))))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (+.f64 (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 2 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) #s(literal 1 binary64))) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (neg.f64 (*.f64 (-.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.im (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) x.re)) x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.im) #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) x.re)) x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ x.re x.im) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64))))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 x.im x.re) #s(literal 1 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 x.im #s(literal 0 binary64) (/.f64 (-.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) x.re))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 x.im #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (/.f64 (-.f64 (neg.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64))) (*.f64 #s(literal -1 binary64) (fma.f64 (-.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) (*.f64 #s(literal 0 binary64) x.im) (*.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (neg.f64 x.im) x.im))))) x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) x.re))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 (/.f64 x.im x.re) #s(literal 0 binary64)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal 2 binary64) x.im (/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) x.re))) x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) #s(literal 2 binary64) (/.f64 (neg.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64))) x.re))) x.re)))) x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (*.f64 (/.f64 x.im x.re) #s(literal 0 binary64)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal 2 binary64) x.im (/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) x.re))) x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -2 binary64) x.im (fma.f64 #s(literal 2 binary64) x.im (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) #s(literal 2 binary64) (/.f64 (neg.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 0 binary64))) x.re))) x.re)))) x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.im (/.f64 (*.f64 (neg.f64 x.im) x.im) x.re)) x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.im (neg.f64 (/.f64 (*.f64 (neg.f64 x.im) x.im) x.re))) x.re)) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (fma.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)))
#s(approx (neg (* x.im x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (* (* x.im x.im) 2) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) x.re))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (*.f64 x.re x.re)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (fma.f64 (fma.f64 #s(literal -1 binary64) (+.f64 x.im x.re) x.re) x.im (*.f64 x.re x.re)))
#s(approx (- x.re x.im) (fma.f64 #s(literal -1 binary64) x.im x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 #s(literal -4 binary64) x.re) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (neg.f64 x.im) (fma.f64 (*.f64 x.re #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (pow.f64 x.re #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -4 binary64) x.re) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re x.re))) (*.f64 #s(literal -4 binary64) x.re)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (fma.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re x.re))) x.im (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (fma.f64 (fma.f64 (fma.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 x.re #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) x.im (*.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re x.re))) x.im (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (fma.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (fma.f64 (fma.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re x.re))) x.im (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (fma.f64 (fma.f64 (fma.f64 (*.f64 x.im (*.f64 x.re x.re)) (*.f64 x.re #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re))) x.im (*.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re x.re))) x.im (pow.f64 x.re #s(literal 6 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (fma.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (*.f64 (neg.f64 x.im) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (fma.f64 (fma.f64 (*.f64 x.re #s(literal 1 binary64)) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)) (neg.f64 x.re)) (*.f64 #s(literal 2 binary64) x.re)) (*.f64 x.im x.im)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im))) (*.f64 x.im x.im)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* x.re x.re) (neg (* 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.re) (*.f64 (+.f64 (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* x.re x.re) (neg (* 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.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im)) (*.f64 x.im x.im)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (fma.f64 x.re (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)))) (*.f64 x.im x.im)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ x.re x.im) (*.f64 (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im))
#s(approx (- x.re x.im) (*.f64 (-.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (*.f64 x.re #s(literal 1 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)) x.im))))) (*.f64 x.im x.im)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (fma.f64 (/.f64 x.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal 0 binary64) x.re)) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 x.re #s(literal 1 binary64)) x.im) #s(literal 2 binary64))))))) (*.f64 x.im x.im)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64)))))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (fma.f64 (/.f64 x.re (pow.f64 x.im #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal 0 binary64) x.re)) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 3 binary64)))) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 x.re #s(literal 1 binary64)) x.im) #s(literal 2 binary64))))))))) (*.f64 x.im x.im)))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 x.re x.re))) (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im) (*.f64 x.re x.re)) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im) (*.f64 x.re x.re))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im) (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 x.re x.re)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (fma.f64 x.re (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (+.f64 (fma.f64 x.re (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im))) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (*.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 x.re #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im)) (*.f64 x.im x.im)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 x.re #s(literal 1 binary64) (fma.f64 x.re (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)))) (*.f64 x.im x.im)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im))) (*.f64 x.im x.im)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (neg.f64 (/.f64 (pow.f64 x.re #s(literal 3 binary64)) x.im))) x.im))) (*.f64 x.im x.im)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im))) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* x.re x.re) (neg (* x.im x.im))) (*.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.re (neg.f64 (/.f64 (*.f64 x.re x.re) x.im))) x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ x.re x.im) (*.f64 (neg.f64 x.im) (-.f64 (/.f64 (neg.f64 x.re) x.im) #s(literal 1 binary64))))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.im) (fma.f64 (/.f64 x.re x.im) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 x.re #s(literal 1 binary64)))) x.im))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 (*.f64 x.re #s(literal 1 binary64)) #s(literal 2 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im)) #s(literal -1 binary64) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re) (neg.f64 (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) x.im)))) x.im) #s(literal -1 binary64) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re) (neg.f64 (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) x.im)))) x.im))) x.im) #s(literal -1 binary64) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) x.im)))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 x.re x.re (neg.f64 (/.f64 (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re) (neg.f64 (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) x.im)))) x.im))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (*.f64 (fma.f64 x.re x.re (neg.f64 (/.f64 (fma.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.re x.re)) (*.f64 x.re x.re) (neg.f64 (*.f64 (*.f64 x.re x.re) (/.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) x.im)))) x.im))) x.im))) (pow.f64 x.im #s(literal 4 binary64))))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im) #s(literal -1 binary64) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (* (- (* x.re x.re) (* x.im x.im)) x.re) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (neg.f64 (/.f64 (pow.f64 x.re #s(literal 3 binary64)) x.im))) x.im) #s(literal -1 binary64) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -1 binary64) (+.f64 x.re (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im)) (*.f64 #s(literal 2 binary64) x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -1 binary64) x.re (fma.f64 #s(literal 2 binary64) x.re (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (neg.f64 (/.f64 (pow.f64 x.re #s(literal 3 binary64)) x.im))) x.im)))) (*.f64 x.im x.im)))

eval84.0ms (3.1%)

Memory
-10.6MiB live, 135.3MiB allocated; 18ms collecting garbage
Compiler

Compiled 30 518 to 2 392 computations (92.2% saved)

prune22.0ms (0.8%)

Memory
-7.0MiB live, 40.4MiB allocated; 3ms collecting garbage
Pruning

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New5699578
Fresh213
Picked505
Done000
Total57610586
Accuracy
100.0%
Counts
586 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
92.4%
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
60.5%
(fma.f64 (*.f64 #s(approx (+ x.re x.im) x.im) (-.f64 x.re x.im)) x.re (*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im))
28.6%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) #s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) x.re)))
58.6%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
86.9%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
50.0%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
90.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 x.re x.im) (+.f64 x.im x.re) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) x.re))
50.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re))
55.1%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im) x.im))
58.5%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
Compiler

Compiled 812 to 360 computations (55.7% saved)

series72.0ms (2.7%)

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

6 calls:

TimeVariablePointExpression
51.0ms
x.re
@-inf
((+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (+ x.im x.re) x.im x.re (* (- x.re x.im) x.re) (- x.re x.im) (* (* -2 (* x.im x.re)) x.im) (* -2 (* x.im x.re)) -2 (* x.im x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (* x.re x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* x.im x.im) -3) x.re) (* (* x.im x.im) -3) (* x.im x.im) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) (+ (* (* x.im x.im) -3) (* x.re x.re)) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) 2)
4.0ms
x.re
@inf
((+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (+ x.im x.re) x.im x.re (* (- x.re x.im) x.re) (- x.re x.im) (* (* -2 (* x.im x.re)) x.im) (* -2 (* x.im x.re)) -2 (* x.im x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (* x.re x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* x.im x.im) -3) x.re) (* (* x.im x.im) -3) (* x.im x.im) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) (+ (* (* x.im x.im) -3) (* x.re x.re)) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) 2)
3.0ms
x.re
@0
((+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (+ x.im x.re) x.im x.re (* (- x.re x.im) x.re) (- x.re x.im) (* (* -2 (* x.im x.re)) x.im) (* -2 (* x.im x.re)) -2 (* x.im x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (* x.re x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* x.im x.im) -3) x.re) (* (* x.im x.im) -3) (* x.im x.im) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) (+ (* (* x.im x.im) -3) (* x.re x.re)) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) 2)
3.0ms
x.im
@-inf
((+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (+ x.im x.re) x.im x.re (* (- x.re x.im) x.re) (- x.re x.im) (* (* -2 (* x.im x.re)) x.im) (* -2 (* x.im x.re)) -2 (* x.im x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (* x.re x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* x.im x.im) -3) x.re) (* (* x.im x.im) -3) (* x.im x.im) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) (+ (* (* x.im x.im) -3) (* x.re x.re)) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) 2)
3.0ms
x.im
@inf
((+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (+ x.im x.re) x.im x.re (* (- x.re x.im) x.re) (- x.re x.im) (* (* -2 (* x.im x.re)) x.im) (* -2 (* x.im x.re)) -2 (* x.im x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (* x.re x.re) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* x.im x.im) -3) x.re) (* (* x.im x.im) -3) (* x.im x.im) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) (+ (* (* x.im x.im) -3) (* x.re x.re)) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) (* (+ x.re x.im) (- x.re x.im)) (+ x.re x.im) (* (neg (* 2 (* x.im x.re))) x.im) (neg (* 2 (* x.im x.re))) (* 2 (* x.im x.re)) 2)

rewrite285.0ms (10.6%)

Memory
-25.4MiB live, 306.5MiB allocated; 58ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06987445
07305136
147235104
087744970
Stop Event
iter-limit
node-limit
iter-limit
Counts
169 → 320
Calls
Call 1
Inputs
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(+.f64 x.im x.re)
x.im
x.re
(*.f64 (-.f64 x.re x.im) x.re)
(-.f64 x.re x.im)
(*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im)
(*.f64 #s(literal -2 binary64) (*.f64 x.im x.re))
#s(literal -2 binary64)
(*.f64 x.im x.re)
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
(*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re)
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re))
(*.f64 x.re x.re)
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re))
(*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re)
(*.f64 (*.f64 x.im x.im) #s(literal -3 binary64))
(*.f64 x.im x.im)
#s(literal -3 binary64)
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
(*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re)
(fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re))
(fma.f64 (*.f64 #s(approx (+ x.re x.im) x.im) (-.f64 x.re x.im)) x.re (*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im))
(*.f64 #s(approx (+ x.re x.im) x.im) (-.f64 x.re x.im))
#s(approx (+ x.re x.im) x.im)
(*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im)
(neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)))
(*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))
#s(literal 2 binary64)
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2))))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))))
#s(approx (+ x.im x.re) #s(hole binary64 x.im))
#s(approx (+ x.im x.re) #s(hole binary64 (+ x.im x.re)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* -1 (* x.im x.re))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* x.re (+ x.re (* -1 x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (- x.re x.im) #s(hole binary64 (- x.re x.im)))
#s(approx (* (* -2 (* x.im x.re)) x.im) #s(hole binary64 (* -2 (* (pow x.im 2) x.re))))
#s(approx (* -2 (* x.im x.re)) #s(hole binary64 (* -2 (* 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.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (+ (* -1 (pow x.im 2)) (pow x.re 2)) (* 2 (pow x.im 2))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* -1 (* x.re (+ (* 2 (pow x.im 2)) (pow x.im 2))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* x.re (+ (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2))) (pow x.re 2)))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* -1 (+ (* 2 (pow x.im 2)) (pow x.im 2)))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (- (pow x.re 2) (+ (* 2 (pow x.im 2)) (pow x.im 2)))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (* (* x.im x.im) -3) x.re) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (/ (* x.re (- (pow x.im 4) (* 4 (pow x.im 4)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.re (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.re (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (* x.re (- (+ (* -2 (/ x.im (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ x.im (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 3)))) (+ (* -2 (/ (pow x.im 3) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (* 2 (/ (pow x.im 3) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (/ (* (+ x.im (* -1 x.im)) (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) #s(hole binary64 (* x.re (+ (* -3 (pow x.im 2)) (pow x.re 2)))))
#s(approx (+ (* (* x.im x.im) -3) (* x.re x.re)) #s(hole binary64 (* -3 (pow x.im 2))))
#s(approx (+ (* (* x.im x.im) -3) (* x.re x.re)) #s(hole binary64 (+ (* -3 (pow x.im 2)) (pow x.re 2))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* -1 (pow x.im 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.im))
#s(approx (+ x.re x.im) #s(hole binary64 (+ x.im x.re)))
#s(approx (* (neg (* 2 (* x.im x.re))) x.im) #s(hole binary64 (* -2 (* (pow x.im 2) x.re))))
#s(approx (neg (* 2 (* x.im x.re))) #s(hole binary64 (* -2 (* x.im x.re))))
#s(approx (* 2 (* x.im x.re)) #s(hole binary64 (* 2 (* x.im x.re))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -2 (/ (pow x.im 2) (pow x.re 2))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re))))))))
#s(approx (+ x.im x.re) #s(hole binary64 x.re))
#s(approx (+ x.im x.re) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (- x.re x.im) #s(hole binary64 x.re))
#s(approx (- x.re x.im) #s(hole binary64 (* x.re (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (pow x.re 3)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (pow x.re 2)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (pow x.re 3)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re)))) (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re))))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (/ x.im x.re) (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (+ (* -2 (/ (pow x.im 3) (pow x.re 3))) (+ (* 2 (/ x.im x.re)) (* 2 (/ (pow x.im 3) (pow x.re 3)))))))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (/ x.im x.re) (+ (/ (* (+ x.im (* -1 x.im)) (- (* -4 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im))))))) (pow x.re 3)) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 2)) (/ (* (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 3)))))))))))
#s(approx (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) #s(hole binary64 (pow x.re 3)))
#s(approx (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -3 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (* x.im x.im) -3) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* (* x.im x.im) -3) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -3 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -2 (/ (pow x.im 2) (pow x.re 2))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ x.re x.im) #s(hole binary64 x.re))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (* -1 x.im)) x.re)) 1)))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (+ (* -1 x.im) (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) x.re)))) x.re)) 1)))))
#s(approx (+ x.im x.re) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.re (- (/ x.im x.re) 1)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (/ (pow x.im 2) (pow x.re 2)) (+ 1 (* -2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* -1 (* (pow x.re 3) (- (+ (* 2 (/ (pow x.im 2) (pow x.re 2))) (/ (pow x.im 2) (pow x.re 2))) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (+ (* -1 (+ (* -2 x.im) (* 2 x.im))) (* -1 (/ (- (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))) x.re))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (+ (* -1 (+ (* -2 x.im) (* 2 x.im))) (* -1 (/ (- (+ (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -1 (/ (- (* -1 (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (* -1 (* (+ (* -2 (pow x.im 2)) (pow x.im 2)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))))) x.re))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))) x.re))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* 3 (/ (pow x.im 2) (pow x.re 2))) 1)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (* -1 x.im)) x.re)) 1)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (+ (* -1 x.im) (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) x.re)))) x.re)) 1)))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ (+ (* -1 (+ x.im (* -1 x.im))) (/ (pow x.im 2) x.re)) x.re))))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (+ (* x.im (* x.re (+ x.re (* -1 x.re)))) (pow x.re 3))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (+ (* x.im (+ (* x.im (+ (* -2 x.re) (* -1 x.re))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (+ (* -1 (* x.im x.re)) (pow x.re 2))))
#s(approx (- x.re x.im) #s(hole binary64 (+ x.re (* -1 x.im))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (+ (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re))) (pow x.re 3))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (+ (* -3 (* (pow x.im 2) x.re)) (pow x.re 3))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (+ (* -3 (pow x.im 2)) (pow x.re 2))))
#s(approx (* (* x.im x.im) -3) #s(hole binary64 (* -3 (pow x.im 2))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (- (* -4 x.re) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (- (+ (* -4 x.re) (* -1 (* x.im (+ (/ (* (+ x.re (* -1 x.re)) (- (* -4 x.re) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))) (pow x.re 2)) (/ (* (+ (* -1 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3)))))) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) #s(hole binary64 (+ (* -3 (* (pow x.im 2) x.re)) (pow x.re 3))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (+ (* x.im (* x.re (+ x.re (* -1 x.re)))) (pow x.re 3))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (+ (* x.im (+ (* x.im (+ (* -2 x.re) (* -1 x.re))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (* -1 x.re))) (pow x.re 2))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (+ (* x.im (+ x.re (+ (* -1 x.im) (* -1 x.re)))) (pow x.re 2))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (* -1 x.re)))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (/ (* x.re (+ x.re (* -1 x.re))) x.im))))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (+ (/ (* x.re (+ x.re (* -1 x.re))) x.im) (/ (pow x.re 3) (pow x.im 2))))))))
#s(approx (+ x.im x.re) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* x.im (+ (* -1 x.re) (/ (pow x.re 2) x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* x.im (- (/ x.re x.im) 1))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 x.re) (/ (pow x.re 3) (pow x.im 2))) (* 2 x.re)))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -3 x.re) (/ (pow x.re 3) (pow x.im 2))))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* -3 (pow x.im 2))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (/ (* (pow x.im 2) (- (pow x.re 2) (* 4 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (* (pow x.im 2) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))) (+ (/ (* (pow x.re 3) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (* (pow x.im 2) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))))))
#s(approx (* (+ (* (* x.im x.im) -3) (* x.re x.re)) x.re) #s(hole binary64 (* (pow x.im 2) (+ (* -3 x.re) (/ (pow x.re 3) (pow x.im 2))))))
#s(approx (+ (* (* x.im x.im) -3) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (- (/ (pow x.re 2) (pow x.im 2)) 3))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (* -1 x.re)))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (/ (* x.re (+ x.re (* -1 x.re))) x.im))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (+ (/ (* x.re (+ x.re (* -1 x.re))) x.im) (/ (pow x.re 3) (pow x.im 2))))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (/ x.re x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ x.re x.im)) (+ (/ x.re x.im) (/ (pow x.re 2) (pow x.im 2)))) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (* x.re (+ x.re (* -1 x.re))) x.im)))))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (+ (* -1 (/ (pow x.re 3) x.im)) (* x.re (+ x.re (* -1 x.re)))) x.im)))))))
#s(approx (+ x.im x.re) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* -1 (* x.im (+ x.re (* -1 (/ (pow x.re 2) x.im)))))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.im (+ 1 (* -1 (/ x.re x.im)))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) x.im)) (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) (+ (* -1 x.re) (* 2 x.re))))) x.im)) (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) x.im)) (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (* x.re (+ x.re (* -1 x.re))) x.im)))))))
#s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (neg (* 2 (* x.im x.re))) x.im)) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (+ (* -1 (/ (pow x.re 3) x.im)) (* x.re (+ x.re (* -1 x.re)))) x.im)))))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (* -1 x.re)) x.im)) 1))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 (/ (+ x.re (+ (* -1 x.re) (* -1 (/ (pow x.re 2) x.im)))) x.im)) 1))))
#s(approx (+ x.re x.im) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
Outputs
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 x.re x.im) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im) #s(literal 2 binary64))) (fma.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im)))
(fma.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)))
(fma.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(fma.f64 (+.f64 x.re x.im) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.im) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)))
(fma.f64 x.re (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(fma.f64 x.im (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) #s(literal 2 binary64)) (fma.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im) #s(literal 2 binary64)) (fma.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im))))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) (*.f64 (neg.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64))) x.im))
(-.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) (+.f64 x.re x.im)) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(/.f64 (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (-.f64 x.im x.re))
(/.f64 (+.f64 (pow.f64 x.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (fma.f64 x.im x.im (-.f64 (*.f64 x.re x.re) (*.f64 x.re x.im))))
(/.f64 (+.f64 (pow.f64 x.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (fma.f64 x.re x.re (-.f64 (*.f64 x.im x.im) (*.f64 x.re x.im))))
(/.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (-.f64 x.re x.im))
(+.f64 x.re x.im)
(+.f64 x.im x.re)
x.im
x.re
(*.f64 (-.f64 x.re x.im) x.re)
(*.f64 x.re (-.f64 x.re x.im))
(/.f64 (-.f64 (pow.f64 x.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (fma.f64 x.re x.re (fma.f64 x.im x.im (*.f64 x.re x.im))))
(/.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (+.f64 x.re x.im))
(-.f64 x.re x.im)
(*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im)
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.im) x.im))
(*.f64 x.im (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)))
(neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im))
(*.f64 (*.f64 #s(literal -2 binary64) x.im) x.re)
(*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 x.im) x.re))
(*.f64 (*.f64 x.re x.im) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 x.re x.im))
(neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)))
#s(literal -2 binary64)
(*.f64 x.re x.im)
(*.f64 x.im x.re)
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
(*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re)
(*.f64 x.re #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re))
(*.f64 (exp.f64 (log.f64 x.re)) (exp.f64 (log.f64 x.re)))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 (exp.f64 (log.f64 x.re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 x.re) #s(literal 2 binary64))
(pow.f64 (neg.f64 x.re) #s(literal 2 binary64))
(pow.f64 (*.f64 x.re x.re) #s(literal 1 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(/.f64 #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))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
(*.f64 (*.f64 #s(literal -3 binary64) x.re) (*.f64 x.im x.im))
(*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re)
(*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64))
(*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -3 binary64) x.re))
(*.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.im x.im) x.re))
(*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.im x.im) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -2 binary64)) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im)) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(*.f64 (*.f64 x.im x.im) #s(literal -3 binary64))
(*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))
(*.f64 x.im (*.f64 x.im #s(literal -3 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (neg.f64 x.im) x.im)))))
(fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.im (neg.f64 x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 x.im x.im)))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (neg.f64 x.im) x.im))
(*.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))))
#s(literal -3 binary64)
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
(*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re)
(*.f64 x.re (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal 3 binary64)) #s(literal -27 binary64) (pow.f64 x.re #s(literal 9 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)) (pow.f64 x.re #s(literal 3 binary64))))))
(fma.f64 (pow.f64 x.re #s(literal 3/2 binary64)) (pow.f64 x.re #s(literal 3/2 binary64)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
(fma.f64 (*.f64 #s(literal -3 binary64) x.re) (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 (*.f64 x.re x.re) x.re (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
(fma.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64) (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 (*.f64 x.im x.im) (*.f64 #s(literal -3 binary64) x.re) (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.im x.im) x.re) (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (pow.f64 x.re #s(literal 3 binary64)))
(fma.f64 x.re (*.f64 x.re x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
(+.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)) (pow.f64 x.re #s(literal 3 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 (+.f64 x.re x.im) (-.f64 x.re x.im) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 x.re x.re)))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) #s(literal 3 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -27 binary64) (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 x.re x.re)))))
(fma.f64 (exp.f64 (log.f64 x.re)) (exp.f64 (log.f64 x.re)) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (neg.f64 x.im) x.im (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re))
(fma.f64 (+.f64 x.re x.im) (-.f64 x.re x.im) (*.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)))
(fma.f64 (+.f64 x.re x.im) (-.f64 x.re x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 (-.f64 x.re x.im) (+.f64 x.re x.im) (*.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)))
(fma.f64 (-.f64 x.re x.im) (+.f64 x.re x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 #s(literal -3 binary64) (*.f64 x.im x.im) (*.f64 x.re x.re))
(fma.f64 x.re x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 x.im (*.f64 x.im #s(literal -3 binary64)) (*.f64 x.re x.re))
(fma.f64 x.im (neg.f64 x.im) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 (neg.f64 x.re) x.re))
(-.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) (*.f64 x.re x.re))
(+.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(+.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)))
(+.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im) #s(literal 2 binary64))) (-.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im)))))
(fma.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)))
(fma.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (-.f64 x.re x.im)) x.re (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(fma.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.im) x.im) (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)))
(fma.f64 x.re (*.f64 #s(approx (+ x.im x.re) x.im) (-.f64 x.re x.im)) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(fma.f64 x.im (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)))
(-.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) (*.f64 (neg.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64))) x.im))
(-.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im))
(+.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)) (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im))
(+.f64 (*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im) (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)))
(*.f64 #s(approx (+ x.im x.re) x.im) (-.f64 x.re x.im))
(*.f64 (-.f64 x.re x.im) #s(approx (+ x.im x.re) x.im))
#s(approx (+ x.im x.re) x.im)
(*.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im)
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x.re x.im) x.im))
(*.f64 x.im (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)))
(neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)) x.im))
(*.f64 (*.f64 #s(literal -2 binary64) x.im) x.re)
(*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 x.im) x.re))
(*.f64 (*.f64 x.re x.im) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 x.re x.im))
(neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)))
(*.f64 (*.f64 #s(literal 2 binary64) x.im) x.re)
(*.f64 #s(literal 2 binary64) (*.f64 x.re x.im))
(*.f64 (*.f64 x.re x.im) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 x.re x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re x.im) #s(literal 2 binary64))) (-.f64 (*.f64 x.re x.im) (*.f64 x.re x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 x.re x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 x.re x.im) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 x.re x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re x.im) #s(literal 2 binary64)))))
(fma.f64 x.re x.im (*.f64 x.re x.im))
(fma.f64 x.im x.re (*.f64 x.re x.im))
(-.f64 (*.f64 x.re x.im) (*.f64 (neg.f64 x.im) x.re))
(+.f64 (*.f64 x.re x.im) (*.f64 x.re x.im))
#s(literal 2 binary64)
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)) x.re))
#s(approx (+ x.im x.re) x.im)
#s(approx (+ x.im x.re) (+.f64 x.re x.im))
#s(approx x.re x.re)
#s(approx (* (- x.re x.im) x.re) (*.f64 (neg.f64 x.im) x.re))
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.re))
#s(approx (- x.re x.im) (neg.f64 x.im))
#s(approx (- x.re x.im) (-.f64 x.re x.im))
#s(approx (* (* -2 (* x.im x.re)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -2 binary64)))
#s(approx (* -2 (* x.im x.re)) (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)))
#s(approx (* x.im x.re) (*.f64 x.re x.im))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (neg.f64 x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)))) x.re))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (-.f64 (*.f64 x.re x.re) (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (* (* (* x.im x.im) -3) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 x.re (/.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) x.re (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))) x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))))) x.re)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) x.re (-.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 (/.f64 x.im (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -2 binary64) (fma.f64 (/.f64 x.im (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 1 binary64))))) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal -2 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))))) x.re (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))))) x.re)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) x.re (-.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) x.re))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)) x.re))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (neg.f64 x.im) x.im))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (neg.f64 x.im) x.im (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)))
#s(approx (+ x.im x.re) x.im)
#s(approx (+ x.im x.re) (+.f64 x.re x.im))
#s(approx (* (* -2 (* x.im x.re)) x.im) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -2 binary64)))
#s(approx (* -2 (* x.im x.re)) (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)))
#s(approx (* 2 (* x.im x.re)) (*.f64 #s(literal 2 binary64) (*.f64 x.re x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re)))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ x.im x.re) x.re)
#s(approx (+ x.im x.re) (*.f64 (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)) x.re))
#s(approx (* (- x.re x.im) x.re) (*.f64 x.re x.re))
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (- x.re x.im) x.re)
#s(approx (- x.re x.im) (*.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (*.f64 (/.f64 x.im x.re) #s(literal 0 binary64))) #s(literal 1 binary64)) (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.re x.re)) (/.f64 x.im x.re)))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal -2 binary64) (fma.f64 #s(literal 2 binary64) (+.f64 (/.f64 x.im x.re) (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64)) #s(literal -2 binary64))))) (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re)) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (fma.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im) (*.f64 (neg.f64 x.im) x.im))) (pow.f64 x.re #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 x.re #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.re x.re)))))))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -3 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -3 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re)))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 x.re x.re))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re))) (*.f64 x.re x.re)))
#s(approx (+ x.im x.re) x.re)
#s(approx (+ x.im x.re) (*.f64 (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)) x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.im (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) x.re)) x.re)) #s(literal 1 binary64))))
#s(approx (+ x.im x.re) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64))))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 x.im x.re) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) #s(literal 1 binary64)))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 x.im #s(literal 0 binary64) (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) x.re))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 x.im #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) #s(literal 3 binary64)) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (-.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (neg.f64 x.im) x.im))))) x.re))) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (fma.f64 (neg.f64 (*.f64 #s(literal 0 binary64) x.im)) (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.im x.im)))) x.re))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.im (/.f64 (neg.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im))) x.re)) x.re)) #s(literal 1 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.im) #s(literal -1 binary64) (/.f64 (*.f64 x.im x.im) x.re)) x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (+ x.im x.re) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (fma.f64 (fma.f64 (*.f64 #s(literal -3 binary64) x.re) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx x.im x.im)
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.re))
#s(approx (- x.re x.im) (fma.f64 #s(literal -1 binary64) x.im x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)))
#s(approx (* (* x.im x.im) -3) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (fma.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (fma.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 #s(literal -4 binary64) x.re) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (fma.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (neg.f64 x.im) (fma.f64 (*.f64 x.re #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (pow.f64 x.re #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -4 binary64) x.re) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re x.re))) (*.f64 #s(literal -4 binary64) x.re)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (fma.f64 (fma.f64 (*.f64 #s(literal -3 binary64) x.re) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.im (*.f64 x.re x.re)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (fma.f64 (fma.f64 #s(literal -1 binary64) (+.f64 x.re x.im) x.re) x.im (*.f64 x.re x.re)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im)) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (fma.f64 x.re (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)))) (*.f64 x.im x.im)))
#s(approx (+ x.im x.re) (*.f64 (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im))
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 #s(literal -1 binary64) x.re (/.f64 (*.f64 x.re x.re) x.im)) x.im))
#s(approx (- x.re x.im) (*.f64 (-.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)) (neg.f64 x.re)) (*.f64 #s(literal 2 binary64) x.re)) (*.f64 x.im x.im)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im))) (*.f64 x.im x.im)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (*.f64 x.re #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) x.im))))) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (fma.f64 (/.f64 x.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 x.re #s(literal 1 binary64)) x.im) #s(literal 2 binary64))))))) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64)))))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (fma.f64 (/.f64 x.re (pow.f64 x.im #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (fma.f64 (pow.f64 (/.f64 x.re x.im) #s(literal 3 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 x.re #s(literal 1 binary64)) x.im) #s(literal 2 binary64))))))))) (*.f64 x.im x.im)))
#s(approx (* (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) x.re) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im))) (*.f64 x.im x.im)))
#s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) #s(literal 3 binary64)) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im)) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (fma.f64 x.re (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)))) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.re x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ x.im x.re) (*.f64 (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im))) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (/.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) x.im)) x.im))) (*.f64 x.im x.im)))
#s(approx (+ x.im x.re) (*.f64 (neg.f64 x.im) (-.f64 (/.f64 (neg.f64 x.re) x.im) #s(literal 1 binary64))))
#s(approx (* (- x.re x.im) x.re) (*.f64 (neg.f64 x.im) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) #s(literal -1 binary64) x.re)))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.im) (fma.f64 (/.f64 x.re x.im) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 x.re #s(literal 1 binary64)))) x.im))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im))) (*.f64 x.im x.im)))
#s(approx (+ (* (+ x.im x.re) (* (- x.re x.im) x.re)) (* (* -2 (* x.im x.re)) x.im)) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (/.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) x.im)) x.im))) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.re x.im))) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (* (+ x.re x.im) (- x.re x.im)) (*.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.re (neg.f64 (/.f64 (*.f64 x.re x.re) x.im))) x.im)) #s(literal 1 binary64)) (*.f64 x.im x.im)))
#s(approx (+ x.im x.re) (*.f64 (neg.f64 x.im) (-.f64 (/.f64 (neg.f64 x.re) x.im) #s(literal 1 binary64))))

eval45.0ms (1.7%)

Memory
6.2MiB live, 103.4MiB allocated; 25ms collecting garbage
Compiler

Compiled 13 731 to 1 303 computations (90.5% saved)

prune10.0ms (0.4%)

Memory
31.7MiB live, 31.6MiB allocated; 0ms collecting garbage
Pruning

9 alts after pruning (6 fresh and 3 done)

PrunedKeptTotal
New3072309
Fresh145
Picked235
Done000
Total3109319
Accuracy
100.0%
Counts
319 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
71.5%
(fma.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)))
28.6%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) #s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) x.re)))
58.6%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
86.9%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
50.0%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
50.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) x.re))
50.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re))
55.1%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im) x.im))
58.5%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
Compiler

Compiled 641 to 279 computations (56.5% saved)

series29.0ms (1.1%)

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

6 calls:

TimeVariablePointExpression
6.0ms
x.re
@0
((+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (* (* x.re x.im) -2) (* x.re x.im) x.re x.im -2 (* (+ x.im x.re) (* (- x.re x.im) x.re)) (+ x.im x.re) (* (- x.re x.im) x.re) (- x.re x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* -3 x.re) x.im) x.im) (* (* -3 x.re) x.im) (* -3 x.re) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (* (* x.im x.im) x.re) -3) (* (* x.im x.im) x.re) (* x.im x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) x.re) (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) (neg x.im) (* (* x.im x.im) -2) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow x.re 3) 3)
5.0ms
x.im
@inf
((+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (* (* x.re x.im) -2) (* x.re x.im) x.re x.im -2 (* (+ x.im x.re) (* (- x.re x.im) x.re)) (+ x.im x.re) (* (- x.re x.im) x.re) (- x.re x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* -3 x.re) x.im) x.im) (* (* -3 x.re) x.im) (* -3 x.re) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (* (* x.im x.im) x.re) -3) (* (* x.im x.im) x.re) (* x.im x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) x.re) (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) (neg x.im) (* (* x.im x.im) -2) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow x.re 3) 3)
4.0ms
x.re
@-inf
((+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (* (* x.re x.im) -2) (* x.re x.im) x.re x.im -2 (* (+ x.im x.re) (* (- x.re x.im) x.re)) (+ x.im x.re) (* (- x.re x.im) x.re) (- x.re x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* -3 x.re) x.im) x.im) (* (* -3 x.re) x.im) (* -3 x.re) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (* (* x.im x.im) x.re) -3) (* (* x.im x.im) x.re) (* x.im x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) x.re) (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) (neg x.im) (* (* x.im x.im) -2) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow x.re 3) 3)
3.0ms
x.im
@-inf
((+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (* (* x.re x.im) -2) (* x.re x.im) x.re x.im -2 (* (+ x.im x.re) (* (- x.re x.im) x.re)) (+ x.im x.re) (* (- x.re x.im) x.re) (- x.re x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* -3 x.re) x.im) x.im) (* (* -3 x.re) x.im) (* -3 x.re) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (* (* x.im x.im) x.re) -3) (* (* x.im x.im) x.re) (* x.im x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) x.re) (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) (neg x.im) (* (* x.im x.im) -2) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow x.re 3) 3)
3.0ms
x.re
@inf
((+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (* (* x.re x.im) -2) (* x.re x.im) x.re x.im -2 (* (+ x.im x.re) (* (- x.re x.im) x.re)) (+ x.im x.re) (* (- x.re x.im) x.re) (- x.re x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (* (* -3 x.re) x.im) x.im) (* (* -3 x.re) x.im) (* -3 x.re) -3 (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (* (* (* x.im x.im) x.re) -3) (* (* x.im x.im) x.re) (* x.im x.im) (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (* (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) x.re) (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) (neg x.im) (* (* x.im x.im) -2) (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow x.re 3) 3)

rewrite200.0ms (7.5%)

Memory
27.4MiB live, 216.7MiB allocated; 17ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06106244
06364170
142554138
083294004
Stop Event
iter-limit
node-limit
iter-limit
Counts
123 → 264
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)))
(*.f64 (*.f64 x.re x.im) #s(literal -2 binary64))
(*.f64 x.re x.im)
x.re
x.im
#s(literal -2 binary64)
(*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re))
#s(approx (+ x.im x.re) x.im)
(*.f64 (-.f64 x.re x.im) x.re)
(-.f64 x.re x.im)
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im) x.im))
(*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im) x.im)
(*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im)
(*.f64 #s(literal -3 binary64) x.re)
#s(literal -3 binary64)
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
(*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64))
(*.f64 (*.f64 x.im x.im) x.re)
(*.f64 x.im x.im)
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) x.re))
(*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) x.re)
(fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(neg.f64 x.im)
(*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
(pow.f64 x.re #s(literal 3 binary64))
#s(literal 3 binary64)
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2))))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im))))))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im)))))))))
#s(approx (* (* x.re x.im) -2) #s(hole binary64 (* -2 (* x.im x.re))))
#s(approx (* x.re x.im) #s(hole binary64 (* x.im x.re)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* -1 (* (pow x.im 2) x.re))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* x.re (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (* -1 x.im)))))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* x.re (+ (* -1 (pow x.im 2)) (* x.re (+ x.im (+ x.re (* -1 x.im))))))))
#s(approx (+ x.im x.re) #s(hole binary64 x.im))
#s(approx (+ x.im x.re) #s(hole binary64 (+ x.im x.re)))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* -1 (* x.im x.re))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* x.re (+ x.re (* -1 x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (- x.re x.im) #s(hole binary64 (- x.re x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* x.re (- (+ (* -1 (pow x.im 2)) (pow x.re 2)) (* 2 (pow x.im 2))))))
#s(approx (* (* (* -3 x.re) x.im) x.im) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (* (* -3 x.re) x.im) #s(hole binary64 (* -3 (* x.im x.re))))
#s(approx (* -3 x.re) #s(hole binary64 (* -3 x.re)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (/ (* x.re (- (pow x.im 4) (* 4 (pow x.im 4)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.re (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* x.re (- (+ (* x.re (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* x.re (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (* x.re (- (+ (* -2 (/ x.im (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ x.im (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 3)))) (+ (* -2 (/ (pow x.im 3) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (+ (* 2 (/ (pow x.im 3) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))) (/ (* (+ x.im (* -1 x.im)) (- (+ (* -4 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (+ (* 2 (/ (pow x.im 2) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))))))))) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 2 (/ (pow x.im 3) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))) (/ (pow x.im 4) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2))))))) (/ (* (+ x.im (* -1 x.im)) (- (pow x.im 4) (* 4 (pow x.im 4)))) (pow (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) 2)))) (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))))) (* 4 (/ (pow x.im 4) (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2)))))))))
#s(approx (* (* (* x.im x.im) x.re) -3) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (* (* x.im x.im) x.re) #s(hole binary64 (* (pow x.im 2) x.re)))
#s(approx (* (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) x.re) #s(hole binary64 (* x.re (+ (* -2 (pow x.im 2)) (* -1 (pow x.im 2))))))
#s(approx (pow x.re 3) #s(hole binary64 (pow x.re 3)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (pow x.re 3)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -2 (/ (pow x.im 2) (pow x.re 2))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re))))))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (pow x.re 3)))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* (pow x.re 3) (+ 1 (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (/ x.im x.re)))))))
#s(approx (+ x.im x.re) #s(hole binary64 x.re))
#s(approx (+ x.im x.re) #s(hole binary64 (* x.re (+ 1 (/ x.im x.re)))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* (pow x.re 2) (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (- x.re x.im) #s(hole binary64 x.re))
#s(approx (- x.re x.im) #s(hole binary64 (* x.re (+ 1 (* -1 (/ x.im x.re))))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (pow x.re 3)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.re 3) (+ 1 (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) (pow x.re 2)))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (pow x.re 3)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re)))) (+ (* -1 (/ x.im x.re)) (/ x.im x.re))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (* 2 (/ x.im x.re))))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (/ x.im x.re) (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.re 3) (- (+ 1 (+ (* -4 (/ (pow x.im 2) (pow x.re 2))) (+ (* -2 (/ x.im x.re)) (+ (* -2 (/ (pow x.im 3) (pow x.re 3))) (+ (* 2 (/ x.im x.re)) (* 2 (/ (pow x.im 3) (pow x.re 3)))))))) (+ (* -1 (/ x.im x.re)) (+ (* -1 (/ (pow x.im 2) (pow x.re 2))) (+ (/ x.im x.re) (+ (/ (* (+ x.im (* -1 x.im)) (- (* -4 (pow x.im 2)) (+ (* -1 (pow x.im 2)) (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im))))))) (pow x.re 3)) (+ (/ (* (+ x.im (* -1 x.im)) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 2)) (/ (* (+ (* -1 (pow x.im 2)) (* 2 (pow x.im 2))) (- (+ (* -2 x.im) (* 2 x.im)) (+ x.im (* -1 x.im)))) (pow x.re 3)))))))))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (* -1 x.im)) x.re)) 1)))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (+ (* -1 x.im) (* -1 (/ (+ (* 2 (pow x.im 2)) (pow x.im 2)) x.re)))) x.re)) 1)))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (* -1 x.im)) x.re)) 1)))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (+ x.im (+ (* -1 x.im) (* -1 (/ (pow x.im 2) x.re)))) x.re)) 1)))))
#s(approx (+ x.im x.re) #s(hole binary64 (* -1 (* x.re (- (* -1 (/ x.im x.re)) 1)))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.re (- (/ x.im x.re) 1)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* -1 (* (pow x.re 3) (- (/ (pow x.im 2) (pow x.re 2)) (+ 1 (* -2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (+ (* -1 (+ (* -2 x.im) (* 2 x.im))) (* -1 (/ (- (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))) x.re))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* -1 (* (pow x.re 3) (- (* -1 (/ (- (+ (* -1 (+ (* -2 x.im) (* 2 x.im))) (* -1 (/ (- (+ (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (* -1 (/ (- (* -1 (+ (* -2 (pow x.im 3)) (* 2 (pow x.im 3)))) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -4 (pow x.im 2)) (* 2 (pow x.im 2)))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))))) (* -1 (* (+ (* -2 (pow x.im 2)) (pow x.im 2)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))))) x.re))) (+ (* -2 (pow x.im 2)) (+ (* -1 (* (+ x.im (* -1 x.im)) (- (* -1 (+ (* -2 x.im) (* 2 x.im))) (+ x.im (* -1 x.im))))) (pow x.im 2)))) x.re))) (+ x.im (* -1 x.im))) x.re)) 1)))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (+ (* x.im (* x.re (+ x.re (* -1 x.re)))) (pow x.re 3))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (+ (* x.im (+ (* x.im (+ (* -2 x.re) (* -1 x.re))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (+ (* x.im (* x.re (+ x.re (* -1 x.re)))) (pow x.re 3))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (+ (* x.im (+ (* -1 (* x.im x.re)) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (+ (* -1 (* x.im x.re)) (pow x.re 2))))
#s(approx (- x.re x.im) #s(hole binary64 (+ x.re (* -1 x.im))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (+ (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re))) (pow x.re 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (- (* -4 x.re) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (+ (* x.im (- (+ (* -2 (pow x.re 2)) (+ (* 2 (pow x.re 2)) (* x.im (- (+ (* -4 x.re) (* -1 (* x.im (+ (/ (* (+ x.re (* -1 x.re)) (- (* -4 x.re) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))) (pow x.re 2)) (/ (* (+ (* -1 x.re) (* 2 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3)))))) (+ (* -1 x.re) (/ (* (+ x.re (* -1 x.re)) (- (+ (* -2 (pow x.re 2)) (* 2 (pow x.re 2))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 2))))))) (* x.re (+ x.re (* -1 x.re))))) (pow x.re 3))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (* (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) x.re) #s(hole binary64 (* -3 (* (pow x.im 2) x.re))))
#s(approx (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) #s(hole binary64 (* -3 (pow x.im 2))))
#s(approx (neg x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (* (* x.im x.im) -2) #s(hole binary64 (* -2 (pow x.im 2))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (* -1 x.re)))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (/ (* x.re (+ x.re (* -1 x.re))) x.im))))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (+ (/ (* x.re (+ x.re (* -1 x.re))) x.im) (/ (pow x.re 3) (pow x.im 2))))))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (/ (* x.re (+ x.re (* -1 x.re))) x.im)))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (+ (/ (* x.re (+ x.re (* -1 x.re))) x.im) (/ (pow x.re 3) (pow x.im 2)))))))
#s(approx (+ x.im x.re) #s(hole binary64 (* x.im (+ 1 (/ x.re x.im)))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* x.im (+ (* -1 x.re) (/ (pow x.re 2) x.im)))))
#s(approx (- x.re x.im) #s(hole binary64 (* x.im (- (/ x.re x.im) 1))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (* -1 x.re) (* 2 x.re)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 x.re) (/ (pow x.re 3) (pow x.im 2))) (* 2 x.re)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (/ (* (pow x.im 2) (- (pow x.re 2) (* 4 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re)))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (* (pow x.im 2) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (* x.im (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))))) (+ (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (* (pow x.im 2) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (* x.im (pow (+ (* -1 x.re) (* 2 x.re)) 2))) (+ (/ (* (pow x.re 3) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) (* (pow x.im 3) (+ (* -1 x.re) (* 2 x.re)))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (* (pow x.im 2) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))))))))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (* x.re (+ x.re (* -1 x.re))) x.im)))))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) #s(hole binary64 (* (pow x.im 2) (+ (* -2 x.re) (+ (* -1 x.re) (* -1 (/ (+ (* -1 (/ (pow x.re 3) x.im)) (* x.re (+ x.re (* -1 x.re)))) x.im)))))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (* -1 (/ (* x.re (+ x.re (* -1 x.re))) x.im))))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) #s(hole binary64 (* (pow x.im 2) (+ (* -1 x.re) (* -1 (/ (+ (* -1 (/ (pow x.re 3) x.im)) (* x.re (+ x.re (* -1 x.re)))) x.im))))))
#s(approx (+ x.im x.re) #s(hole binary64 (* -1 (* x.im (- (* -1 (/ x.re x.im)) 1)))))
#s(approx (* (- x.re x.im) x.re) #s(hole binary64 (* -1 (* x.im (+ x.re (* -1 (/ (pow x.re 2) x.im)))))))
#s(approx (- x.re x.im) #s(hole binary64 (* -1 (* x.im (+ 1 (* -1 (/ x.re x.im)))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) x.im)) (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) #s(hole binary64 (* (pow x.im 2) (- (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (/ (* (pow x.re 2) (+ (* -2 (pow x.re 3)) (* 2 (pow x.re 3)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) (+ (* -1 x.re) (* 2 x.re))))) x.im)) (/ (* (pow x.re 2) (+ (* -4 (pow x.re 2)) (* 2 (pow x.re 2)))) (+ (* -1 x.re) (* 2 x.re)))) (+ (/ (* x.re (* (+ x.re (* -1 x.re)) (- (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))))) (+ (* -1 x.re) (* 2 x.re))) (/ (* (pow x.re 3) (- (pow x.re 2) (* 4 (pow x.re 2)))) (pow (+ (* -1 x.re) (* 2 x.re)) 2)))) x.im)) (/ (* (pow x.re 2) (+ (* -2 x.re) (* 2 x.re))) (+ (* -1 x.re) (* 2 x.re)))) (/ (* x.re (* (+ x.re (* -1 x.re)) (- (pow x.re 2) (* 4 (pow x.re 2))))) (pow (+ (* -1 x.re) (* 2 x.re)) 2))) x.im)) (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re)))) (* 4 (/ (pow x.re 2) (+ (* -1 x.re) (* 2 x.re))))))))
Outputs
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im))))))
(fma.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (-.f64 x.re x.im)) x.re (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im))
(fma.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im) (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im))
(fma.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)))
(fma.f64 (*.f64 x.im x.re) (*.f64 #s(literal -2 binary64) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)))
(fma.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im))
(fma.f64 x.im (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)))
(-.f64 (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im) (*.f64 (neg.f64 #s(approx (+ x.im x.re) x.im)) (*.f64 (-.f64 x.re x.im) x.re)))
(+.f64 (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im) (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)))
(+.f64 (*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im)) (*.f64 (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)) x.im))
(*.f64 (*.f64 #s(literal -2 binary64) x.im) x.re)
(*.f64 (*.f64 x.im x.re) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 x.im x.re))
(*.f64 x.re (*.f64 #s(literal -2 binary64) x.im))
(*.f64 x.im x.re)
(*.f64 x.re x.im)
x.re
x.im
#s(literal -2 binary64)
(*.f64 (*.f64 #s(approx (+ x.im x.re) x.im) (-.f64 x.re x.im)) x.re)
(*.f64 (*.f64 (-.f64 x.re x.im) x.re) #s(approx (+ x.im x.re) x.im))
(*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re))
#s(approx (+ x.im x.re) x.im)
(*.f64 (-.f64 x.re x.im) x.re)
(*.f64 x.re (-.f64 x.re x.im))
(/.f64 (-.f64 (pow.f64 x.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (fma.f64 x.re x.re (fma.f64 x.im x.im (*.f64 x.im x.re))))
(/.f64 (*.f64 (-.f64 x.re x.im) (+.f64 x.im x.re)) (+.f64 x.im x.re))
(-.f64 x.re x.im)
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (*.f64 #s(literal -3 binary64) x.re) (*.f64 x.im x.im))
(*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im)
(*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re)
(*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64))
(*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -3 binary64) x.re))
(*.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.im x.im) x.re))
(*.f64 x.im (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)))
(*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(fma.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im)) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(*.f64 (*.f64 #s(literal -3 binary64) x.im) x.re)
(*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im)
(*.f64 #s(literal -3 binary64) (*.f64 x.im x.re))
(*.f64 (*.f64 x.im x.re) #s(literal -3 binary64))
(*.f64 x.im (*.f64 #s(literal -3 binary64) x.re))
(fma.f64 (*.f64 #s(literal -2 binary64) x.re) x.im (*.f64 (neg.f64 x.re) x.im))
(fma.f64 x.im (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im (neg.f64 x.re)))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) x.re) x.im) (*.f64 (neg.f64 x.re) x.im))
(+.f64 (*.f64 x.im (*.f64 #s(literal -2 binary64) x.re)) (*.f64 x.im (neg.f64 x.re)))
(*.f64 #s(literal -3 binary64) x.re)
(*.f64 x.re #s(literal -3 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -2 binary64) x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (-.f64 (*.f64 #s(literal -2 binary64) x.re) (neg.f64 x.re)))
(/.f64 (-.f64 (*.f64 x.re x.re) (pow.f64 (*.f64 #s(literal 2 binary64) x.re) #s(literal 2 binary64))) (*.f64 x.re #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 x.re #s(literal 3 binary64)))) (fma.f64 x.re x.re (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) x.re) #s(literal 2 binary64)) (*.f64 (neg.f64 x.re) (*.f64 #s(literal 2 binary64) x.re)))))
(/.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 x.re #s(literal 3 binary64)) (pow.f64 (neg.f64 x.re) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) x.re) #s(literal 2 binary64)) (-.f64 (*.f64 x.re x.re) (*.f64 (*.f64 #s(literal -2 binary64) x.re) (neg.f64 x.re)))))
(fma.f64 #s(literal -1 binary64) x.re (*.f64 #s(literal -2 binary64) x.re))
(fma.f64 #s(literal -2 binary64) x.re (neg.f64 x.re))
(fma.f64 x.re #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) x.re))
(fma.f64 x.re #s(literal -2 binary64) (neg.f64 x.re))
(-.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 #s(literal 1 binary64) x.re))
(-.f64 (neg.f64 x.re) (*.f64 #s(literal 2 binary64) x.re))
(+.f64 (*.f64 #s(literal -2 binary64) x.re) (neg.f64 x.re))
(+.f64 (neg.f64 x.re) (*.f64 #s(literal -2 binary64) x.re))
#s(literal -3 binary64)
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (*.f64 #s(literal -3 binary64) x.re) (*.f64 x.im x.im))
(*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im)
(*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re)
(*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64))
(*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -3 binary64) x.re))
(*.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.im x.im) x.re))
(*.f64 x.im (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)))
(*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(fma.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im)) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(*.f64 (*.f64 x.im x.im) x.re)
(*.f64 x.im (*.f64 x.im x.re))
(*.f64 x.re (*.f64 x.im x.im))
(*.f64 (fabs.f64 (fabs.f64 x.im)) (fabs.f64 (fabs.f64 x.im)))
(*.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)))
(fabs.f64 (*.f64 x.im x.im))
(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))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
(*.f64 (*.f64 #s(literal -3 binary64) x.re) (*.f64 x.im x.im))
(*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im)
(*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re)
(*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64))
(*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -3 binary64) x.re))
(*.f64 #s(literal -3 binary64) (*.f64 (*.f64 x.im x.im) x.re))
(*.f64 x.im (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)))
(*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
(fma.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(fma.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(fma.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) x.re) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) x.re) (*.f64 x.im x.im)) (*.f64 (neg.f64 x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (*.f64 x.re (*.f64 (neg.f64 x.im) x.im)))
(+.f64 (*.f64 (*.f64 x.im x.im) (*.f64 #s(literal -2 binary64) x.re)) (*.f64 (*.f64 x.im x.im) (neg.f64 x.re)))
(*.f64 (*.f64 x.im x.im) #s(literal -3 binary64))
(*.f64 #s(literal -3 binary64) (*.f64 x.im x.im))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (neg.f64 x.im) x.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))
(/.f64 (-.f64 (neg.f64 (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 8 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (neg.f64 x.im) x.im)))))
(/.f64 (fma.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64) (*.f64 #s(literal -8 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))))))
(fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 (*.f64 x.im x.im) #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 #s(literal -2 binary64) (*.f64 x.im x.im) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.im (*.f64 #s(literal -2 binary64) x.im) (*.f64 (neg.f64 x.im) x.im))
(fma.f64 x.im (neg.f64 x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 (neg.f64 x.im) x.im) #s(literal -2 binary64)))
(-.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 x.im x.im)))
(+.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)) (*.f64 (neg.f64 x.im) x.im))
(*.f64 #s(literal -1 binary64) x.im)
(*.f64 x.im #s(literal -1 binary64))
(neg.f64 x.im)
(*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))
(*.f64 x.im (*.f64 #s(literal -2 binary64) x.im))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))
(fma.f64 #s(literal -4 binary64) (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(fma.f64 (*.f64 x.im x.im) #s(literal -4 binary64) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(fma.f64 (*.f64 x.im x.im) #s(literal 2 binary64) (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)))
(fma.f64 #s(literal 2 binary64) (*.f64 x.im x.im) (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)))
(-.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
(+.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
(*.f64 (fabs.f64 (pow.f64 x.re #s(literal 3/2 binary64))) (fabs.f64 (pow.f64 x.re #s(literal 3/2 binary64))))
(*.f64 (pow.f64 x.re #s(literal 3/2 binary64)) (pow.f64 x.re #s(literal 3/2 binary64)))
(*.f64 (*.f64 x.re x.re) x.re)
(*.f64 x.re (*.f64 x.re x.re))
(pow.f64 (exp.f64 (log.f64 x.re)) #s(literal 3 binary64))
(pow.f64 (pow.f64 x.re #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 x.re x.re) #s(literal 3/2 binary64))
(pow.f64 x.re #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 x.re) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(literal 3 binary64)
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) x.re))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)) x.re))
#s(approx (* (* x.re x.im) -2) (*.f64 (*.f64 x.im x.re) #s(literal -2 binary64)))
#s(approx (* x.re x.im) (*.f64 x.im x.re))
#s(approx x.re x.re)
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (*.f64 (neg.f64 x.im) x.im) x.re))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 #s(literal 0 binary64) x.im) x.re)) x.re))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (+.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.im) x.re)) x.re))
#s(approx (+ x.im x.re) x.im)
#s(approx (+ x.im x.re) (+.f64 x.im x.re))
#s(approx (* (- x.re x.im) x.re) (*.f64 (neg.f64 x.im) x.re))
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.re))
#s(approx (- x.re x.im) (neg.f64 x.im))
#s(approx (- x.re x.im) (-.f64 x.re x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 x.re x.im) (+.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) x.re))
#s(approx (* (* (* x.im x.im) x.re) -3) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (* (* -3 x.re) x.im) (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)))
#s(approx (* -3 x.re) (*.f64 #s(literal -3 binary64) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 x.re (/.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) x.re (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)))) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))))) x.re)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) x.re (-.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 (/.f64 x.im (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -2 binary64) (fma.f64 (/.f64 x.im (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 1 binary64))))) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal -2 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal -4 binary64) (fma.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 3 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))))) x.re (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 x.im #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) #s(literal 0 binary64)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64))))) x.re)) (/.f64 (*.f64 (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 1 binary64)))) x.re (-.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 4 binary64)) (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64))))) x.re))
#s(approx (* (* (* x.im x.im) x.re) -3) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (* (* x.im x.im) x.re) (*.f64 (*.f64 x.im x.im) x.re))
#s(approx (* (* (* x.im x.im) x.re) -3) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (pow x.re 3) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re)))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (fma.f64 #s(literal 0 binary64) (/.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ x.im x.re) x.re)
#s(approx (+ x.im x.re) (*.f64 (+.f64 (/.f64 x.im x.re) #s(literal 1 binary64)) x.re))
#s(approx (* (- x.re x.im) x.re) (*.f64 x.re x.re))
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (- x.re x.im) x.re)
#s(approx (- x.re x.im) (*.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) #s(literal 1 binary64)) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) (*.f64 x.re x.re)) #s(literal -1 binary64) #s(literal 1 binary64)) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (/.f64 x.im x.re) #s(literal 0 binary64) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (*.f64 (/.f64 x.im x.re) #s(literal 0 binary64))) #s(literal 1 binary64)) (+.f64 (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 x.im) x.im) (*.f64 x.re x.re))) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.re x.re)) (/.f64 x.im x.re)))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -4 binary64) (fma.f64 (/.f64 x.im x.re) #s(literal -2 binary64) (fma.f64 #s(literal 2 binary64) (+.f64 (/.f64 x.im x.re) (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 (/.f64 x.im x.re) #s(literal 3 binary64)) #s(literal -2 binary64))))) (fma.f64 (/.f64 x.im x.re) #s(literal -1 binary64) (+.f64 (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -1 binary64) (/.f64 x.im x.re)) (fma.f64 (*.f64 #s(literal 0 binary64) x.im) (/.f64 (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 x.im x.im)) (fma.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im) (*.f64 (neg.f64 x.im) x.im))) (pow.f64 x.re #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (pow.f64 x.re #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 x.im #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 x.re x.re)))))))) (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.im (neg.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 x.im x.im)) x.re))) x.re)) #s(literal 1 binary64))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (/.f64 x.im x.re))) #s(literal 1 binary64))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 0 binary64) x.im (/.f64 (*.f64 (neg.f64 x.im) x.im) x.re)) x.re)) #s(literal 1 binary64))))
#s(approx (+ x.im x.re) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 (neg.f64 x.im) x.re) #s(literal 1 binary64))))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.re) (-.f64 (/.f64 x.im x.re) #s(literal 1 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (fma.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) #s(literal -2 binary64) #s(literal 1 binary64)))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 x.im #s(literal 0 binary64) (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (fma.f64 x.im x.im (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im)))))) x.re))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 x.im #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) #s(literal 3 binary64)) (*.f64 #s(literal -1 binary64) (fma.f64 (-.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (fma.f64 x.im x.im (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im)))))) (*.f64 #s(literal 0 binary64) x.im) (*.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 (neg.f64 x.im) x.im))))) x.re))) (fma.f64 (*.f64 x.im x.im) #s(literal -2 binary64) (fma.f64 x.im x.im (neg.f64 (*.f64 (-.f64 (neg.f64 (*.f64 x.im #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) x.im)) (*.f64 #s(literal 0 binary64) x.im)))))) x.re))) (*.f64 #s(literal 0 binary64) x.im)) x.re)) #s(literal 1 binary64))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (fma.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re))) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx x.im x.im)
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (fma.f64 (fma.f64 (neg.f64 x.im) x.re (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 #s(literal -1 binary64) x.im x.re) x.re))
#s(approx (- x.re x.im) (fma.f64 #s(literal -1 binary64) x.im x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (fma.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (fma.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (fma.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 #s(literal -4 binary64) x.re) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (fma.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) #s(literal 0 binary64) (*.f64 (-.f64 (fma.f64 (neg.f64 x.im) (fma.f64 (*.f64 x.re #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (pow.f64 x.re #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -4 binary64) x.re) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re x.re))) (*.f64 #s(literal -4 binary64) x.re)) (fma.f64 (*.f64 #s(literal 0 binary64) x.re) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) (*.f64 x.re x.re)) (neg.f64 x.re))) x.im)) (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re)) x.im (pow.f64 x.re #s(literal 3 binary64))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (* (* (* x.im x.im) x.re) -3) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (+ (* (neg x.im) x.im) (* (* x.im x.im) -2)) (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)))
#s(approx (neg x.im) (neg.f64 x.im))
#s(approx (* (* x.im x.im) -2) (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im)) (*.f64 x.im x.im)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (fma.f64 x.re (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im) (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)))) (*.f64 x.im x.im)))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (fma.f64 x.re (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (+.f64 (fma.f64 x.re (/.f64 (*.f64 #s(literal 0 binary64) x.re) x.im) (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im))) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (+ x.im x.re) (*.f64 (+.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im))
#s(approx (* (- x.re x.im) x.re) (*.f64 (fma.f64 #s(literal -1 binary64) x.re (/.f64 (*.f64 x.re x.re) x.im)) x.im))
#s(approx (- x.re x.im) (*.f64 (-.f64 (/.f64 x.re x.im) #s(literal 1 binary64)) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 #s(literal -3 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (+.f64 (/.f64 (pow.f64 x.re #s(literal 3 binary64)) (*.f64 x.im x.im)) (neg.f64 x.re)) (*.f64 #s(literal 2 binary64) x.re)) (*.f64 x.im x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 x.im x.im)) (*.f64 x.re #s(literal 1 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)) x.im))))) (*.f64 x.im x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (fma.f64 (/.f64 x.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 x.re #s(literal 1 binary64)) x.im) #s(literal 2 binary64))))))) (*.f64 x.im x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64)))))) (fma.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) #s(literal 4 binary64) (fma.f64 (/.f64 x.re (pow.f64 x.im #s(literal 3 binary64))) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re (*.f64 x.im x.im)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (/.f64 x.re x.im) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 #s(literal 0 binary64) x.re)) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (fma.f64 (pow.f64 (/.f64 x.re x.im) #s(literal 3 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (pow.f64 x.re #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 x.re #s(literal 1 binary64)) x.im) #s(literal 2 binary64))))))))) (*.f64 x.im x.im)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im))) (*.f64 x.im x.im)))
#s(approx (+ (* (* (* x.re x.im) -2) x.im) (* (+ x.im x.re) (* (- x.re x.im) x.re))) (*.f64 (fma.f64 #s(literal -3 binary64) x.re (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (/.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) x.im)) x.im))) (*.f64 x.im x.im)))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) x.im) #s(literal -1 binary64) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (* (+ x.im x.re) (* (- x.re x.im) x.re)) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) x.re) x.re (/.f64 (pow.f64 (neg.f64 x.re) #s(literal 3 binary64)) x.im)) x.im) #s(literal -1 binary64) (neg.f64 x.re)) (*.f64 x.im x.im)))
#s(approx (+ x.im x.re) (*.f64 (neg.f64 x.im) (-.f64 (/.f64 (neg.f64 x.re) x.im) #s(literal 1 binary64))))
#s(approx (* (- x.re x.im) x.re) (*.f64 (neg.f64 x.im) (fma.f64 (/.f64 (*.f64 x.re x.re) x.im) #s(literal -1 binary64) x.re)))
#s(approx (- x.re x.im) (*.f64 (neg.f64 x.im) (fma.f64 (/.f64 x.re x.im) #s(literal -1 binary64) #s(literal 1 binary64))))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (fma.f64 (*.f64 x.re x.re) (/.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re #s(literal 1 binary64))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 x.re #s(literal 3 binary64)) #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 x.re x.re) #s(literal -2 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) (pow.f64 x.re #s(literal 3 binary64)))) (*.f64 x.re #s(literal 1 binary64)))) x.im))) (fma.f64 (pow.f64 x.re #s(literal 3 binary64)) (/.f64 (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (-.f64 (/.f64 (*.f64 (*.f64 x.re #s(literal 0 binary64)) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64))))) (*.f64 x.re #s(literal 1 binary64))))) x.im))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 0 binary64) x.re) x.re) (fma.f64 x.re x.re (*.f64 #s(literal -4 binary64) (*.f64 x.re x.re)))) (*.f64 (*.f64 x.re x.re) #s(literal 1 binary64)))) x.im) #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.re #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 x.re x.re)) (*.f64 x.re #s(literal 1 binary64))))) (*.f64 x.im x.im)))

eval59.0ms (2.2%)

Memory
-43.7MiB live, 62.1MiB allocated; 26ms collecting garbage
Compiler

Compiled 9 838 to 1 134 computations (88.5% saved)

prune11.0ms (0.4%)

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

8 alts after pruning (2 fresh and 6 done)

PrunedKeptTotal
New2292231
Fresh101
Picked235
Done033
Total2328240
Accuracy
100.0%
Counts
240 → 8
Alt Table
Click to see full alt table
StatusAccuracyProgram
58.6%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
86.9%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
55.1%
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 x.im (*.f64 x.im x.re)) #s(literal -3 binary64)))
50.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) x.re))
50.0%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re))
55.1%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im) x.im))
55.1%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.im) x.re) x.im))
58.5%
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
Compiler

Compiled 1 097 to 267 computations (75.7% saved)

regimes23.0ms (0.8%)

Memory
2.3MiB live, 46.2MiB allocated; 6ms collecting garbage
Counts
22 → 3
Calls
Call 1
Inputs
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 x.re #s(literal -3 binary64)) (*.f64 x.im x.im)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.im) x.re) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 #s(literal -3 binary64) x.re) x.im) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal -3 binary64)) x.re))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 x.im (*.f64 x.im x.re)) #s(literal -3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (*.f64 (*.f64 x.im x.im) x.re) #s(literal -3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (*.f64 (fma.f64 (*.f64 x.im x.im) #s(literal -3 binary64) (*.f64 x.re x.re)) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (neg.f64 x.im) x.im (*.f64 (*.f64 x.im x.im) #s(literal -2 binary64))) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 x.re x.im) (+.f64 x.im x.re) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) x.re))
(fma.f64 (*.f64 (*.f64 x.re x.im) #s(literal -2 binary64)) x.im (*.f64 #s(approx (+ x.im x.re) x.im) (*.f64 (-.f64 x.re x.im) x.re)))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (-.f64 (fma.f64 x.re x.re (neg.f64 (*.f64 x.im x.im))) (*.f64 (*.f64 x.im x.im) #s(literal 2 binary64))) x.re))
(-.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
(fma.f64 (*.f64 #s(approx (+ x.re x.im) x.im) (-.f64 x.re x.im)) x.re (*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im))
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
(-.f64 (*.f64 #s(approx (- (* x.re x.re) (* x.im x.im)) (neg.f64 (*.f64 x.im x.im))) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
(fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re))) x.im))
(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (pow.f64 x.re #s(literal 3 binary64)))
#s(approx (/ (- (* (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* (+ x.re x.im) (- x.re x.im)) x.re)) (* (* (* 2 (* x.im x.re)) x.im) (* (* 2 (* x.im x.re)) x.im))) (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im))) (pow.f64 x.re #s(literal 3 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) #s(approx (+ (* (* (+ x.re x.im) (- x.re x.im)) x.re) (* (* 2 (* x.im x.re)) x.im)) (*.f64 (*.f64 (*.f64 x.im x.im) #s(literal 1 binary64)) x.re)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re) (*.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im))) (fma.f64 (*.f64 (+.f64 x.re x.im) (-.f64 x.re x.im)) x.re (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 x.im x.re)) x.im)))
Outputs
(fma.f64 (+.f64 x.im x.re) (*.f64 (-.f64 x.re x.im) x.re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 x.im x.re)) x.im))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 (fma.f64 (-.f64 x.re x.im) (+.f64 x.im x.re) (*.f64 #s(literal -2 binary64) (*.f64 x.im x.im))) x.re))
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
Calls

3 calls:

10.0ms
x.im
6.0ms
x.re
5.0ms
(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
Results
AccuracySegmentsBranch
96.8%2(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
99.1%3x.re
95.1%2x.im
Compiler

Compiled 21 to 15 computations (28.6% saved)

regimes7.0ms (0.3%)

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

1 calls:

4.0ms
x.re
Results
AccuracySegmentsBranch
98.7%3x.re
Compiler

Compiled 1 to 2 computations (-100% saved)

regimes4.0ms (0.1%)

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

1 calls:

3.0ms
x.re
Results
AccuracySegmentsBranch
98.7%3x.re
Compiler

Compiled 1 to 2 computations (-100% saved)

regimes6.0ms (0.2%)

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

2 calls:

3.0ms
x.re
3.0ms
(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
Results
AccuracySegmentsBranch
96.7%2(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
96.3%3x.re
Compiler

Compiled 20 to 13 computations (35% saved)

regimes4.0ms (0.1%)

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

3 calls:

1.0ms
x.re
1.0ms
x.im
1.0ms
(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
Results
AccuracySegmentsBranch
77.6%2x.re
78.1%2x.im
91.6%2(-.f64 (*.f64 (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) x.re) (*.f64 (+.f64 (*.f64 x.re x.im) (*.f64 x.im x.re)) x.im))
Compiler

Compiled 21 to 15 computations (28.6% saved)

regimes6.0ms (0.2%)

Memory
-33.7MiB live, 12.1MiB allocated; 5ms 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.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
Outputs
#s(approx (- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)) (*.f64 #s(approx (- (+ (* x.re x.re) (neg (* x.im x.im))) (* (* x.im x.im) 2)) (*.f64 x.re x.re)) x.re))
Calls

3 calls:

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

Compiled 21 to 15 computations (28.6% saved)

bsearch5.0ms (0.2%)

Memory
15.6MiB live, 15.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
predicate-same
Steps
TimeLeftRight
1.0ms
9.79796348934795e+220
3.769068441501587e+222
3.0ms
4.2091997863684907e+58
4.6131205740218604e+58
Samples
2.0ms48×0valid
Compiler

Compiled 196 to 119 computations (39.3% saved)

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

bsearch18.0ms (0.7%)

Memory
-15.7MiB live, 36.9MiB allocated; 10ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
predicate-same
Steps
TimeLeftRight
0.0ms
9.79796348934795e+220
3.769068441501587e+222
16.0ms
9.113475451911625e-117
5.127458711363473e-110
Samples
11.0ms128×0valid
Compiler

Compiled 512 to 313 computations (38.9% saved)

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

bsearch3.0ms (0.1%)

Memory
10.7MiB live, 10.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
0.0ms
9.79796348934795e+220
3.769068441501587e+222
2.0ms
9.113475451911625e-117
5.127458711363473e-110
Samples
1.0ms16×0valid
Compiler

Compiled 645 to 390 computations (39.5% saved)

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

bsearch0.0ms (0%)

Memory
1.1MiB live, 1.1MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.0623104765015e-311
0.0
Compiler

Compiled 22 to 16 computations (27.3% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.0623104765015e-311
0.0
Compiler

Compiled 22 to 16 computations (27.3% saved)

derivations169.0ms (6.3%)

Memory
-19.2MiB live, 170.0MiB allocated; 16ms collecting garbage
Stop Event
fuel
Compiler

Compiled 525 to 68 computations (87% saved)

preprocess173.0ms (6.5%)

Memory
31.0MiB live, 362.4MiB allocated; 35ms collecting garbage
Remove

(negabs x.re)

(abs x.im)

Compiler

Compiled 3 996 to 1 322 computations (66.9% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...