x \cdot x - 1
\mathsf{fma}\left(x, x, -1\right)double f(double x) {
double r980 = x;
double r981 = r980 * r980;
double r982 = 1.0;
double r983 = r981 - r982;
return r983;
}
double f(double x) {
double r984 = x;
double r985 = 1.0;
double r986 = -r985;
double r987 = fma(r984, r984, r986);
return r987;
}



Bits error versus x
Initial program 0.0
rmApplied fma-neg0
Final simplification0
herbie shell --seed 2020025 +o rules:numerics
(FPCore (x)
:name "Data.Random.Dice:roll from dice-0.1"
:precision binary64
(- (* x x) 1))