\frac{\tan \left(\frac{x}{y \cdot 2}\right)}{\sin \left(\frac{x}{y \cdot 2}\right)}\begin{array}{l}
\mathbf{if}\;\frac{\tan \left(\frac{x}{y \cdot 2}\right)}{\sin \left(\frac{x}{y \cdot 2}\right)} \le 1.770366858518491293139618392160627990961:\\
\;\;\;\;\frac{\sin \left(\frac{x}{y \cdot 2}\right)}{\sin \left(\frac{x}{y \cdot 2}\right) \cdot \log \left(e^{\cos \left(\frac{x}{y \cdot 2}\right)}\right)}\\
\mathbf{else}:\\
\;\;\;\;1\\
\end{array}double f(double x, double y) {
double r456591 = x;
double r456592 = y;
double r456593 = 2.0;
double r456594 = r456592 * r456593;
double r456595 = r456591 / r456594;
double r456596 = tan(r456595);
double r456597 = sin(r456595);
double r456598 = r456596 / r456597;
return r456598;
}
double f(double x, double y) {
double r456599 = x;
double r456600 = y;
double r456601 = 2.0;
double r456602 = r456600 * r456601;
double r456603 = r456599 / r456602;
double r456604 = tan(r456603);
double r456605 = sin(r456603);
double r456606 = r456604 / r456605;
double r456607 = 1.7703668585184913;
bool r456608 = r456606 <= r456607;
double r456609 = cos(r456603);
double r456610 = exp(r456609);
double r456611 = log(r456610);
double r456612 = r456605 * r456611;
double r456613 = r456605 / r456612;
double r456614 = 1.0;
double r456615 = r456608 ? r456613 : r456614;
return r456615;
}




Bits error versus x




Bits error versus y
Results
| Original | 35.6 |
|---|---|
| Target | 29.0 |
| Herbie | 27.6 |
if (/ (tan (/ x (* y 2.0))) (sin (/ x (* y 2.0)))) < 1.7703668585184913Initial program 23.9
rmApplied tan-quot23.9
Applied associate-/l/23.9
rmApplied add-log-exp23.9
if 1.7703668585184913 < (/ (tan (/ x (* y 2.0))) (sin (/ x (* y 2.0)))) Initial program 61.9
Taylor expanded around 0 35.8
Final simplification27.6
herbie shell --seed 2019323 +o rules:numerics
(FPCore (x y)
:name "Diagrams.TwoD.Layout.CirclePacking:approxRadius from diagrams-contrib-1.3.0.5"
:precision binary64
:herbie-target
(if (< y -1.2303690911306994e+114) 1 (if (< y -9.102852406811914e-222) (/ (sin (/ x (* y 2))) (* (sin (/ x (* y 2))) (log (exp (cos (/ x (* y 2))))))) 1))
(/ (tan (/ x (* y 2))) (sin (/ x (* y 2)))))