\sqrt{0.5 \cdot \left(1 + \frac{x}{\sqrt{\left(4 \cdot p\right) \cdot p + x \cdot x}}\right)}\sqrt{0.5 \cdot \left(1 + \frac{x}{\sqrt{\left(4 \cdot p\right) \cdot p + x \cdot x}}\right)}double f(double p, double x) {
double r254292 = 0.5;
double r254293 = 1.0;
double r254294 = x;
double r254295 = 4.0;
double r254296 = p;
double r254297 = r254295 * r254296;
double r254298 = r254297 * r254296;
double r254299 = r254294 * r254294;
double r254300 = r254298 + r254299;
double r254301 = sqrt(r254300);
double r254302 = r254294 / r254301;
double r254303 = r254293 + r254302;
double r254304 = r254292 * r254303;
double r254305 = sqrt(r254304);
return r254305;
}
double f(double p, double x) {
double r254306 = 0.5;
double r254307 = 1.0;
double r254308 = x;
double r254309 = 4.0;
double r254310 = p;
double r254311 = r254309 * r254310;
double r254312 = r254311 * r254310;
double r254313 = r254308 * r254308;
double r254314 = r254312 + r254313;
double r254315 = sqrt(r254314);
double r254316 = r254308 / r254315;
double r254317 = r254307 + r254316;
double r254318 = r254306 * r254317;
double r254319 = sqrt(r254318);
return r254319;
}




Bits error versus p




Bits error versus x
Results
| Original | 13.4 |
|---|---|
| Target | 13.4 |
| Herbie | 13.4 |
Initial program 13.4
rmApplied div-inv13.6
rmApplied add-sqr-sqrt14.5
Applied associate-*r*14.5
rmApplied sqrt-div14.1
Applied sqrt-div14.6
Applied associate-*r/14.4
Applied frac-times14.4
Simplified14.4
Simplified13.4
Final simplification13.4
herbie shell --seed 2019356 +o rules:numerics
(FPCore (p x)
:name "Given's Rotation SVD example"
:precision binary64
:pre (< 1e-150 (fabs x) 1e+150)
:herbie-target
(sqrt (+ 0.5 (/ (copysign 0.5 x) (hypot 1 (/ (* 2 p) x)))))
(sqrt (* 0.5 (+ 1 (/ x (sqrt (+ (* (* 4 p) p) (* x x))))))))