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

Average Error: 0.0 → 0.0

Time: 4.9s

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 r672534 = 1.0;
        double r672535 = 8.0;
        double r672536 = r672534 / r672535;
        double r672537 = x;
        double r672538 = r672536 * r672537;
        double r672539 = y;
        double r672540 = z;
        double r672541 = r672539 * r672540;
        double r672542 = 2.0;
        double r672543 = r672541 / r672542;
        double r672544 = r672538 - r672543;
        double r672545 = t;
        double r672546 = r672544 + r672545;
        return r672546;
}

↓

double f(double x, double y, double z, double t) {
        double r672547 = 1.0;
        double r672548 = 8.0;
        double r672549 = r672547 / r672548;
        double r672550 = x;
        double r672551 = r672549 * r672550;
        double r672552 = y;
        double r672553 = z;
        double r672554 = r672552 * r672553;
        double r672555 = 2.0;
        double r672556 = r672554 / r672555;
        double r672557 = r672551 - r672556;
        double r672558 = t;
        double r672559 = r672557 + r672558;
        return r672559;
}

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 2020045 
(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))