\frac{\frac{1}{x}}{y \cdot \left(1 + z \cdot z\right)}\frac{\frac{\frac{\frac{1}{x}}{\sqrt{\mathsf{fma}\left(z, z, 1\right)}}}{y}}{\sqrt{\mathsf{fma}\left(z, z, 1\right)}}double f(double x, double y, double z) {
double r200316 = 1.0;
double r200317 = x;
double r200318 = r200316 / r200317;
double r200319 = y;
double r200320 = z;
double r200321 = r200320 * r200320;
double r200322 = r200316 + r200321;
double r200323 = r200319 * r200322;
double r200324 = r200318 / r200323;
return r200324;
}
double f(double x, double y, double z) {
double r200325 = 1.0;
double r200326 = x;
double r200327 = r200325 / r200326;
double r200328 = z;
double r200329 = fma(r200328, r200328, r200325);
double r200330 = sqrt(r200329);
double r200331 = r200327 / r200330;
double r200332 = y;
double r200333 = r200331 / r200332;
double r200334 = r200333 / r200330;
return r200334;
}




Bits error versus x




Bits error versus y




Bits error versus z
| Original | 6.2 |
|---|---|
| Target | 5.5 |
| Herbie | 5.8 |
Initial program 6.2
Simplified6.5
rmApplied add-sqr-sqrt6.5
Applied div-inv6.5
Applied times-frac5.8
rmApplied associate-*r/5.9
Simplified5.8
Final simplification5.8
herbie shell --seed 2019325 +o rules:numerics
(FPCore (x y z)
:name "Statistics.Distribution.CauchyLorentz:$cdensity from math-functions-0.1.5.2"
:precision binary64
:herbie-target
(if (< (* y (+ 1 (* z z))) #f) (/ (/ 1 y) (* (+ 1 (* z z)) x)) (if (< (* y (+ 1 (* z z))) 8.680743250567252e+305) (/ (/ 1 x) (* (+ 1 (* z z)) y)) (/ (/ 1 y) (* (+ 1 (* z z)) x))))
(/ (/ 1 x) (* y (+ 1 (* z z)))))