Diagrams.Solve.Polynomial:quartForm from diagrams-solve-0.1, B

Average Error: 0.0 → 0.0

Time: 9.3s

Precision: 64

• Falling back on racket egraph because egg-herbie package not installed

Math

\[\left(\frac{1}{8} \cdot x - \frac{y \cdot z}{2}\right) + t\]

↓

\[\left(\frac{1}{8} \cdot x - \frac{y \cdot z}{2}\right) + t\]

C

double f(double x, double y, double z, double t) {
        double r908557 = 1.0;
        double r908558 = 8.0;
        double r908559 = r908557 / r908558;
        double r908560 = x;
        double r908561 = r908559 * r908560;
        double r908562 = y;
        double r908563 = z;
        double r908564 = r908562 * r908563;
        double r908565 = 2.0;
        double r908566 = r908564 / r908565;
        double r908567 = r908561 - r908566;
        double r908568 = t;
        double r908569 = r908567 + r908568;
        return r908569;
}

↓

double f(double x, double y, double z, double t) {
        double r908570 = 1.0;
        double r908571 = 8.0;
        double r908572 = r908570 / r908571;
        double r908573 = x;
        double r908574 = r908572 * r908573;
        double r908575 = y;
        double r908576 = z;
        double r908577 = r908575 * r908576;
        double r908578 = 2.0;
        double r908579 = r908577 / r908578;
        double r908580 = r908574 - r908579;
        double r908581 = t;
        double r908582 = r908580 + r908581;
        return r908582;
}

Error

Bits error versus x

Bits error versus y

Bits error versus z

Bits error versus t

Target

Original	0.0
Target	0.0
Herbie	0.0

\[\left(\frac{x}{8} + t\right) - \frac{z}{2} \cdot y\]

Derivation

1. Initial program 0.0

   \[\left(\frac{1}{8} \cdot x - \frac{y \cdot z}{2}\right) + t\]

2. Final simplification 0.0

   \[\leadsto \left(\frac{1}{8} \cdot x - \frac{y \cdot z}{2}\right) + t\]

Reproduce

herbie shell --seed 2020046 
(FPCore (x y z t)
  :name "Diagrams.Solve.Polynomial:quartForm  from diagrams-solve-0.1, B"
  :precision binary64

  :herbie-target
  (- (+ (/ x 8) t) (* (/ z 2) y))

  (+ (- (* (/ 1 8) x) (/ (* y z) 2)) t))