x \cdot \left(1 - x \cdot y\right)
x \cdot \left(1 - x \cdot y\right) + x \cdot \mathsf{fma}\left(-y, x, y \cdot x\right)double f(double x, double y) {
double r37040 = x;
double r37041 = 1.0;
double r37042 = y;
double r37043 = r37040 * r37042;
double r37044 = r37041 - r37043;
double r37045 = r37040 * r37044;
return r37045;
}
double f(double x, double y) {
double r37046 = x;
double r37047 = 1.0;
double r37048 = y;
double r37049 = r37046 * r37048;
double r37050 = r37047 - r37049;
double r37051 = r37046 * r37050;
double r37052 = -r37048;
double r37053 = r37048 * r37046;
double r37054 = fma(r37052, r37046, r37053);
double r37055 = r37046 * r37054;
double r37056 = r37051 + r37055;
return r37056;
}



Bits error versus x



Bits error versus y
Initial program 0.1
rmApplied add-cube-cbrt0.1
Applied prod-diff0.1
Applied distribute-lft-in0.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2019362 +o rules:numerics
(FPCore (x y)
:name "Numeric.SpecFunctions:log1p from math-functions-0.1.5.2, A"
:precision binary64
(* x (- 1 (* x y))))