Diagrams.Solve.Polynomial:quadForm from diagrams-solve-0.1, A

Average Error: 0.1 → 0.1

Time: 3.7s

Precision: 64

Math

\[x - \left(y \cdot 4\right) \cdot z\]

↓

\[x - \left(4 \cdot y\right) \cdot z\]

C

double f(double x, double y, double z) {
        double r10535210 = x;
        double r10535211 = y;
        double r10535212 = 4.0;
        double r10535213 = r10535211 * r10535212;
        double r10535214 = z;
        double r10535215 = r10535213 * r10535214;
        double r10535216 = r10535210 - r10535215;
        return r10535216;
}

↓

double f(double x, double y, double z) {
        double r10535217 = x;
        double r10535218 = 4.0;
        double r10535219 = y;
        double r10535220 = r10535218 * r10535219;
        double r10535221 = z;
        double r10535222 = r10535220 * r10535221;
        double r10535223 = r10535217 - r10535222;
        return r10535223;
}

Error

Bits error versus x

Bits error versus y

Bits error versus z

Derivation

1. Initial program 0.1

   \[x - \left(y \cdot 4\right) \cdot z\]

2. Final simplification 0.1

   \[\leadsto x - \left(4 \cdot y\right) \cdot z\]

Reproduce

herbie shell --seed 2019192 
(FPCore (x y z)
  :name "Diagrams.Solve.Polynomial:quadForm from diagrams-solve-0.1, A"
  (- x (* (* y 4.0) z)))