Graphics.Rendering.Chart.Backend.Diagrams:calcFontMetrics from Chart-diagrams-1.5.1, B

Average Error: 14.8 → 1.8

Time: 14.1s

Precision: 64

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

Math

\[x \cdot \frac{\frac{y}{z} \cdot t}{t}\]

↓

\[\begin{array}{l} \mathbf{if}\;\frac{y}{z} \le -7.7151331283821803 \cdot 10^{306} \lor \neg \left(\frac{y}{z} \le -6.11823401185594017 \cdot 10^{-307}\right) \land \frac{y}{z} \le 1.1616010043381929 \cdot 10^{-258}:\\ \;\;\;\;\left(x \cdot y\right) \cdot \frac{1}{z}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \frac{y}{z}\\ \end{array}\]

C

double f(double x, double y, double z, double t) {
        double r675838 = x;
        double r675839 = y;
        double r675840 = z;
        double r675841 = r675839 / r675840;
        double r675842 = t;
        double r675843 = r675841 * r675842;
        double r675844 = r675843 / r675842;
        double r675845 = r675838 * r675844;
        return r675845;
}

↓

double f(double x, double y, double z, double __attribute__((unused)) t) {
        double r675846 = y;
        double r675847 = z;
        double r675848 = r675846 / r675847;
        double r675849 = -7.71513312838218e+306;
        bool r675850 = r675848 <= r675849;
        double r675851 = -6.11823401185594e-307;
        bool r675852 = r675848 <= r675851;
        double r675853 = !r675852;
        double r675854 = 1.161601004338193e-258;
        bool r675855 = r675848 <= r675854;
        bool r675856 = r675853 && r675855;
        bool r675857 = r675850 || r675856;
        double r675858 = x;
        double r675859 = r675858 * r675846;
        double r675860 = 1.0;
        double r675861 = r675860 / r675847;
        double r675862 = r675859 * r675861;
        double r675863 = r675858 * r675848;
        double r675864 = r675857 ? r675862 : r675863;
        return r675864;
}

Error

Bits error versus x

Bits error versus y

Bits error versus z

Bits error versus t

Target

Original	14.8
Target	1.6
Herbie	1.8

\[\begin{array}{l} \mathbf{if}\;\frac{\frac{y}{z} \cdot t}{t} \lt -1.20672205123045005 \cdot 10^{245}:\\ \;\;\;\;\frac{y}{\frac{z}{x}}\\ \mathbf{elif}\;\frac{\frac{y}{z} \cdot t}{t} \lt -5.90752223693390633 \cdot 10^{-275}:\\ \;\;\;\;x \cdot \frac{y}{z}\\ \mathbf{elif}\;\frac{\frac{y}{z} \cdot t}{t} \lt 5.65895442315341522 \cdot 10^{-65}:\\ \;\;\;\;\frac{y}{\frac{z}{x}}\\ \mathbf{elif}\;\frac{\frac{y}{z} \cdot t}{t} \lt 2.0087180502407133 \cdot 10^{217}:\\ \;\;\;\;x \cdot \frac{y}{z}\\ \mathbf{else}:\\ \;\;\;\;\frac{y \cdot x}{z}\\ \end{array}\]

Derivation

1. Split input into 2 regimes

2. if (/ y z) < -7.71513312838218e+306 or -6.11823401185594e-307 < (/ y z) < 1.161601004338193e-258

   1. Initial program 24.4

      \[x \cdot \frac{\frac{y}{z} \cdot t}{t}\]

   2. Simplified 21.7

      \[\leadsto \color{blue}{x \cdot \frac{y}{z}}\]
   3. Using strategy rm

   4. Applied div-inv 21.7

      \[\leadsto x \cdot \color{blue}{\left(y \cdot \frac{1}{z}\right)}\]

   5. Applied associate-*r* 0.2

      \[\leadsto \color{blue}{\left(x \cdot y\right) \cdot \frac{1}{z}}\]

   if -7.71513312838218e+306 < (/ y z) < -6.11823401185594e-307 or 1.161601004338193e-258 < (/ y z)

   1. Initial program 12.2

      \[x \cdot \frac{\frac{y}{z} \cdot t}{t}\]

   2. Simplified 2.2

      \[\leadsto \color{blue}{x \cdot \frac{y}{z}}\]
3. Recombined 2 regimes into one program.

4. Final simplification 1.8

   \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{y}{z} \le -7.7151331283821803 \cdot 10^{306} \lor \neg \left(\frac{y}{z} \le -6.11823401185594017 \cdot 10^{-307}\right) \land \frac{y}{z} \le 1.1616010043381929 \cdot 10^{-258}:\\ \;\;\;\;\left(x \cdot y\right) \cdot \frac{1}{z}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \frac{y}{z}\\ \end{array}\]

Reproduce

herbie shell --seed 2020047 +o rules:numerics
(FPCore (x y z t)
  :name "Graphics.Rendering.Chart.Backend.Diagrams:calcFontMetrics from Chart-diagrams-1.5.1, B"
  :precision binary64

  :herbie-target
  (if (< (/ (* (/ y z) t) t) -1.20672205123045e+245) (/ y (/ z x)) (if (< (/ (* (/ y z) t) t) -5.907522236933906e-275) (* x (/ y z)) (if (< (/ (* (/ y z) t) t) 5.658954423153415e-65) (/ y (/ z x)) (if (< (/ (* (/ y z) t) t) 2.0087180502407133e+217) (* x (/ y z)) (/ (* y x) z)))))

  (* x (/ (* (/ y z) t) t)))