\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 r443383 = x;
double r443384 = y;
double r443385 = 2.0;
double r443386 = r443384 * r443385;
double r443387 = r443383 / r443386;
double r443388 = tan(r443387);
double r443389 = sin(r443387);
double r443390 = r443388 / r443389;
return r443390;
}
double f(double x, double y) {
double r443391 = x;
double r443392 = y;
double r443393 = 2.0;
double r443394 = r443392 * r443393;
double r443395 = r443391 / r443394;
double r443396 = tan(r443395);
double r443397 = sin(r443395);
double r443398 = r443396 / r443397;
double r443399 = 1.7703668585184913;
bool r443400 = r443398 <= r443399;
double r443401 = cos(r443395);
double r443402 = exp(r443401);
double r443403 = log(r443402);
double r443404 = r443397 * r443403;
double r443405 = r443397 / r443404;
double r443406 = 1.0;
double r443407 = r443400 ? r443405 : r443406;
return r443407;
}




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