Average Error: 0.0 → 0.0
Time: 637.0ms
Precision: 64
\[x \cdot x - 1\]
↓
\[\left(x + \sqrt{1}\right) \cdot \left(x - \sqrt{1}\right)\]
x \cdot x - 1
↓
\left(x + \sqrt{1}\right) \cdot \left(x - \sqrt{1}\right)
double f(double x) {
        double r228895 = x;
        double r228896 = r228895 * r228895;
        double r228897 = 1.0;
        double r228898 = r228896 - r228897;
        return r228898;
}
↓
double f(double x) {
        double r228899 = x;
        double r228900 = 1.0;
        double r228901 = sqrt(r228900);
        double r228902 = r228899 + r228901;
        double r228903 = r228899 - r228901;
        double r228904 = r228902 * r228903;
        return r228904;
}

Error

Bits error versus x

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 0.0

    \[x \cdot x - 1\]
  2. Using strategy rm

  3. Applied add-sqr-sqrt0.0

    \[\leadsto x \cdot x - \color{blue}{\sqrt{1} \cdot \sqrt{1}}\]

  4. Applied difference-of-squares0.0

    \[\leadsto \color{blue}{\left(x + \sqrt{1}\right) \cdot \left(x - \sqrt{1}\right)}\]

  5. Final simplification0.0

    \[\leadsto \left(x + \sqrt{1}\right) \cdot \left(x - \sqrt{1}\right)\]

Reproduce

herbie shell --seed 2019322 
(FPCore (x)
  :name "Data.Random.Dice:roll from dice-0.1"
  :precision binary64
  (- (* x x) 1))