(FPCore (x y)
:precision binary64
(+
(+
(+
(* 333.75 (pow y 6.0))
(*
(* x x)
(-
(- (- (* (* (* (* 11.0 x) x) y) y) (pow y 6.0)) (* 121.0 (pow y 4.0)))
2.0)))
(* 5.5 (pow y 8.0)))
(/ x (* 2.0 y))))(FPCore (x y) :precision binary64 (fma 333.75 (pow y 6.0) (fma x (* x (- (fma 121.0 (pow y 4.0) (pow y 6.0)))) (fma 5.5 (pow y 8.0) (/ x (* y 2.0))))))
double code(double x, double y) {
return (((333.75 * pow(y, 6.0)) + ((x * x) * (((((((11.0 * x) * x) * y) * y) - pow(y, 6.0)) - (121.0 * pow(y, 4.0))) - 2.0))) + (5.5 * pow(y, 8.0))) + (x / (2.0 * y));
}
double code(double x, double y) {
return fma(333.75, pow(y, 6.0), fma(x, (x * -fma(121.0, pow(y, 4.0), pow(y, 6.0))), fma(5.5, pow(y, 8.0), (x / (y * 2.0)))));
}
function code(x, y) return Float64(Float64(Float64(Float64(333.75 * (y ^ 6.0)) + Float64(Float64(x * x) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(11.0 * x) * x) * y) * y) - (y ^ 6.0)) - Float64(121.0 * (y ^ 4.0))) - 2.0))) + Float64(5.5 * (y ^ 8.0))) + Float64(x / Float64(2.0 * y))) end
function code(x, y) return fma(333.75, (y ^ 6.0), fma(x, Float64(x * Float64(-fma(121.0, (y ^ 4.0), (y ^ 6.0)))), fma(5.5, (y ^ 8.0), Float64(x / Float64(y * 2.0))))) end
code[x_, y_] := N[(N[(N[(N[(333.75 * N[Power[y, 6.0], $MachinePrecision]), $MachinePrecision] + N[(N[(x * x), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(11.0 * x), $MachinePrecision] * x), $MachinePrecision] * y), $MachinePrecision] * y), $MachinePrecision] - N[Power[y, 6.0], $MachinePrecision]), $MachinePrecision] - N[(121.0 * N[Power[y, 4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(5.5 * N[Power[y, 8.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(x / N[(2.0 * y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[x_, y_] := N[(333.75 * N[Power[y, 6.0], $MachinePrecision] + N[(x * N[(x * (-N[(121.0 * N[Power[y, 4.0], $MachinePrecision] + N[Power[y, 6.0], $MachinePrecision]), $MachinePrecision])), $MachinePrecision] + N[(5.5 * N[Power[y, 8.0], $MachinePrecision] + N[(x / N[(y * 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\left(\left(333.75 \cdot {y}^{6} + \left(x \cdot x\right) \cdot \left(\left(\left(\left(\left(\left(11 \cdot x\right) \cdot x\right) \cdot y\right) \cdot y - {y}^{6}\right) - 121 \cdot {y}^{4}\right) - 2\right)\right) + 5.5 \cdot {y}^{8}\right) + \frac{x}{2 \cdot y}
\mathsf{fma}\left(333.75, {y}^{6}, \mathsf{fma}\left(x, x \cdot \left(-\mathsf{fma}\left(121, {y}^{4}, {y}^{6}\right)\right), \mathsf{fma}\left(5.5, {y}^{8}, \frac{x}{y \cdot 2}\right)\right)\right)
Initial program 58.1
Simplified63.0
Taylor expanded in y around inf 58.6
Simplified58.6
Final simplification58.6
herbie shell --seed 2022150
(FPCore (x y)
:name "Rump's expression from Stadtherr's award speech"
:precision binary64
:pre (and (== x 77617.0) (== y 33096.0))
(+ (+ (+ (* 333.75 (pow y 6.0)) (* (* x x) (- (- (- (* (* (* (* 11.0 x) x) y) y) (pow y 6.0)) (* 121.0 (pow y 4.0))) 2.0))) (* 5.5 (pow y 8.0))) (/ x (* 2.0 y))))