x \cdot x - 1
\mathsf{fma}\left(x, x, -1\right)double f(double x) {
double r243654 = x;
double r243655 = r243654 * r243654;
double r243656 = 1.0;
double r243657 = r243655 - r243656;
return r243657;
}
double f(double x) {
double r243658 = x;
double r243659 = 1.0;
double r243660 = -r243659;
double r243661 = fma(r243658, r243658, r243660);
return r243661;
}



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