Average Error: 0.1 → 0.1
Time: 23.8s
Precision: 64
\[1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)\]
\[1 - x \cdot \left(x \cdot 0.1199999999999999955591079014993738383055 + 0.2530000000000000026645352591003756970167\right)\]
1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)
1 - x \cdot \left(x \cdot 0.1199999999999999955591079014993738383055 + 0.2530000000000000026645352591003756970167\right)
double f(double x) {
        double r61773 = 1.0;
        double r61774 = x;
        double r61775 = 0.253;
        double r61776 = 0.12;
        double r61777 = r61774 * r61776;
        double r61778 = r61775 + r61777;
        double r61779 = r61774 * r61778;
        double r61780 = r61773 - r61779;
        return r61780;
}

double f(double x) {
        double r61781 = 1.0;
        double r61782 = x;
        double r61783 = 0.12;
        double r61784 = r61782 * r61783;
        double r61785 = 0.253;
        double r61786 = r61784 + r61785;
        double r61787 = r61782 * r61786;
        double r61788 = r61781 - r61787;
        return r61788;
}

Error

Bits error versus x

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 0.1

    \[1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)\]
  2. Simplified0.1

    \[\leadsto \color{blue}{1 - x \cdot \left(x \cdot 0.1199999999999999955591079014993738383055 + 0.2530000000000000026645352591003756970167\right)}\]
  3. Final simplification0.1

    \[\leadsto 1 - x \cdot \left(x \cdot 0.1199999999999999955591079014993738383055 + 0.2530000000000000026645352591003756970167\right)\]

Reproduce

herbie shell --seed 2019208 
(FPCore (x)
  :name "Numeric.SpecFunctions:invIncompleteGamma from math-functions-0.1.5.2, A"
  :precision binary64
  (- 1 (* x (+ 0.253 (* x 0.12)))))