\frac{x}{x} - \frac{1}{x} \cdot \sqrt{x \cdot x}\mathsf{fma}\left(1, -\frac{\left|x\right|}{x}, 1\right)double f(double x) {
double r70676 = x;
double r70677 = r70676 / r70676;
double r70678 = 1.0;
double r70679 = r70678 / r70676;
double r70680 = r70676 * r70676;
double r70681 = sqrt(r70680);
double r70682 = r70679 * r70681;
double r70683 = r70677 - r70682;
return r70683;
}
double f(double x) {
double r70684 = 1.0;
double r70685 = x;
double r70686 = fabs(r70685);
double r70687 = r70686 / r70685;
double r70688 = -r70687;
double r70689 = 1.0;
double r70690 = fma(r70684, r70688, r70689);
return r70690;
}




Bits error versus x
| Original | 32.6 |
|---|---|
| Target | 0 |
| Herbie | 0 |
Initial program 32.6
Simplified4.7
rmApplied add-cube-cbrt4.7
Applied prod-diff31.4
Simplified31.4
Simplified0
Final simplification0
herbie shell --seed 2019326 +o rules:numerics
(FPCore (x)
:name "sqrt sqr"
:precision binary64
:herbie-target
(if (< x 0.0) 2 0.0)
(- (/ x x) (* (/ 1 x) (sqrt (* x x)))))