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

Average Error: 0.1 → 0.1

Time: 9.4s

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 r11456784 = x;
        double r11456785 = y;
        double r11456786 = 4.0;
        double r11456787 = r11456785 * r11456786;
        double r11456788 = z;
        double r11456789 = r11456787 * r11456788;
        double r11456790 = r11456784 - r11456789;
        return r11456790;
}

↓

double f(double x, double y, double z) {
        double r11456791 = x;
        double r11456792 = 4.0;
        double r11456793 = y;
        double r11456794 = r11456792 * r11456793;
        double r11456795 = z;
        double r11456796 = r11456794 * r11456795;
        double r11456797 = r11456791 - r11456796;
        return r11456797;
}

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 2019170 +o rules:numerics
(FPCore (x y z)
  :name "Diagrams.Solve.Polynomial:quadForm from diagrams-solve-0.1, A"
  (- x (* (* y 4.0) z)))