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

Average Error: 0.1 → 0.1

Time: 21.6s

Precision: 64

Math

\[x - \frac{3.0}{8.0} \cdot y\]

↓

\[x - \frac{3.0}{8.0} \cdot y\]

C

double f(double x, double y) {
        double r23058239 = x;
        double r23058240 = 3.0;
        double r23058241 = 8.0;
        double r23058242 = r23058240 / r23058241;
        double r23058243 = y;
        double r23058244 = r23058242 * r23058243;
        double r23058245 = r23058239 - r23058244;
        return r23058245;
}

↓

double f(double x, double y) {
        double r23058246 = x;
        double r23058247 = 3.0;
        double r23058248 = 8.0;
        double r23058249 = r23058247 / r23058248;
        double r23058250 = y;
        double r23058251 = r23058249 * r23058250;
        double r23058252 = r23058246 - r23058251;
        return r23058252;
}

Error

Bits error versus x

Bits error versus y

Derivation

1. Initial program 0.1

   \[x - \frac{3.0}{8.0} \cdot y\]

2. Final simplification 0.1

   \[\leadsto x - \frac{3.0}{8.0} \cdot y\]

Reproduce

herbie shell --seed 2019158 
(FPCore (x y)
  :name "Diagrams.Solve.Polynomial:quartForm  from diagrams-solve-0.1, A"
  (- x (* (/ 3.0 8.0) y)))