Average Error: 0.1 → 0.1
Time: 16.3s
Precision: 64
\[1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)\]
\[1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)\]
1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)
1 - x \cdot \left(0.2530000000000000026645352591003756970167 + x \cdot 0.1199999999999999955591079014993738383055\right)
double f(double x) {
        double r73972 = 1.0;
        double r73973 = x;
        double r73974 = 0.253;
        double r73975 = 0.12;
        double r73976 = r73973 * r73975;
        double r73977 = r73974 + r73976;
        double r73978 = r73973 * r73977;
        double r73979 = r73972 - r73978;
        return r73979;
}

double f(double x) {
        double r73980 = 1.0;
        double r73981 = x;
        double r73982 = 0.253;
        double r73983 = 0.12;
        double r73984 = r73981 * r73983;
        double r73985 = r73982 + r73984;
        double r73986 = r73981 * r73985;
        double r73987 = r73980 - r73986;
        return r73987;
}

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. Final simplification0.1

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

Reproduce

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