Average Error: 0.1 → 0.1
Time: 10.3s
Precision: 64
\[1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)\]
\[1 - \left(0.1199999999999999955591079014993738383055 \cdot x + 0.2530000000000000026645352591003756970167\right) \cdot x\]
1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)
1 - \left(0.1199999999999999955591079014993738383055 \cdot x + 0.2530000000000000026645352591003756970167\right) \cdot x
double f(double x) {
        double r61676 = 1.0;
        double r61677 = x;
        double r61678 = 0.253;
        double r61679 = 0.12;
        double r61680 = r61677 * r61679;
        double r61681 = r61678 + r61680;
        double r61682 = r61677 * r61681;
        double r61683 = r61676 - r61682;
        return r61683;
}

double f(double x) {
        double r61684 = 1.0;
        double r61685 = 0.12;
        double r61686 = x;
        double r61687 = r61685 * r61686;
        double r61688 = 0.253;
        double r61689 = r61687 + r61688;
        double r61690 = r61689 * r61686;
        double r61691 = r61684 - r61690;
        return r61691;
}

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(0.1199999999999999955591079014993738383055 \cdot x + 0.2530000000000000026645352591003756970167\right)}\]
  3. Final simplification0.1

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

Reproduce

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