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

Average Error: 0.0 → 0.0

Time: 4.2s

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 r714472 = 1.0;
        double r714473 = 8.0;
        double r714474 = r714472 / r714473;
        double r714475 = x;
        double r714476 = r714474 * r714475;
        double r714477 = y;
        double r714478 = z;
        double r714479 = r714477 * r714478;
        double r714480 = 2.0;
        double r714481 = r714479 / r714480;
        double r714482 = r714476 - r714481;
        double r714483 = t;
        double r714484 = r714482 + r714483;
        return r714484;
}

↓

double f(double x, double y, double z, double t) {
        double r714485 = 1.0;
        double r714486 = 8.0;
        double r714487 = r714485 / r714486;
        double r714488 = x;
        double r714489 = r714487 * r714488;
        double r714490 = y;
        double r714491 = z;
        double r714492 = r714490 * r714491;
        double r714493 = 2.0;
        double r714494 = r714492 / r714493;
        double r714495 = r714489 - r714494;
        double r714496 = t;
        double r714497 = r714495 + r714496;
        return r714497;
}

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