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

Average Error: 0.0 → 0.0

Time: 3.8s

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 r865249 = 1.0;
        double r865250 = 8.0;
        double r865251 = r865249 / r865250;
        double r865252 = x;
        double r865253 = r865251 * r865252;
        double r865254 = y;
        double r865255 = z;
        double r865256 = r865254 * r865255;
        double r865257 = 2.0;
        double r865258 = r865256 / r865257;
        double r865259 = r865253 - r865258;
        double r865260 = t;
        double r865261 = r865259 + r865260;
        return r865261;
}

↓

double f(double x, double y, double z, double t) {
        double r865262 = 1.0;
        double r865263 = 8.0;
        double r865264 = r865262 / r865263;
        double r865265 = x;
        double r865266 = r865264 * r865265;
        double r865267 = y;
        double r865268 = z;
        double r865269 = r865267 * r865268;
        double r865270 = 2.0;
        double r865271 = r865269 / r865270;
        double r865272 = r865266 - r865271;
        double r865273 = t;
        double r865274 = r865272 + r865273;
        return r865274;
}

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