(FPCore (x) :precision binary64 (- 1.0 (* x (+ 0.253 (* x 0.12)))))
(FPCore (x) :precision binary64 (- 1.0 (fma (* x x) 0.12 (* x 0.253))))
double code(double x) {
return 1.0 - (x * (0.253 + (x * 0.12)));
}
double code(double x) {
return 1.0 - fma((x * x), 0.12, (x * 0.253));
}
function code(x) return Float64(1.0 - Float64(x * Float64(0.253 + Float64(x * 0.12)))) end
function code(x) return Float64(1.0 - fma(Float64(x * x), 0.12, Float64(x * 0.253))) end
code[x_] := N[(1.0 - N[(x * N[(0.253 + N[(x * 0.12), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[x_] := N[(1.0 - N[(N[(x * x), $MachinePrecision] * 0.12 + N[(x * 0.253), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
1 - x \cdot \left(0.253 + x \cdot 0.12\right)
1 - \mathsf{fma}\left(x \cdot x, 0.12, x \cdot 0.253\right)



Bits error versus x
Initial program 0.1
Simplified0.1
Taylor expanded in x around 0 0.2
Applied egg-rr0.2
Final simplification0.2
herbie shell --seed 2022153
(FPCore (x)
:name "Numeric.SpecFunctions:invIncompleteGamma from math-functions-0.1.5.2, A"
:precision binary64
(- 1.0 (* x (+ 0.253 (* x 0.12)))))