Asymptote A

Percentage Accurate: 78.0% → 99.9%
Time: 5.5s
Alternatives: 4
Speedup: 1.2×

Specification

?
\[\begin{array}{l} \\ \frac{1}{x + 1} - \frac{1}{x - 1} \end{array} \]
(FPCore (x) :precision binary64 (- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))
double code(double x) {
	return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
}
real(8) function code(x)
    real(8), intent (in) :: x
    code = (1.0d0 / (x + 1.0d0)) - (1.0d0 / (x - 1.0d0))
end function
public static double code(double x) {
	return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
}
def code(x):
	return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0))
function code(x)
	return Float64(Float64(1.0 / Float64(x + 1.0)) - Float64(1.0 / Float64(x - 1.0)))
end
function tmp = code(x)
	tmp = (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
end
code[x_] := N[(N[(1.0 / N[(x + 1.0), $MachinePrecision]), $MachinePrecision] - N[(1.0 / N[(x - 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{1}{x + 1} - \frac{1}{x - 1}
\end{array}

Sampling outcomes in binary64 precision:

Local Percentage Accuracy vs ?

The average percentage accuracy by input value. Horizontal axis shows value of an input variable; the variable is choosen in the title. Vertical axis is accuracy; higher is better. Red represent the original program, while blue represents Herbie's suggestion. These can be toggled with buttons below the plot. The line is an average while dots represent individual samples.

Accuracy vs Speed?

Herbie found 4 alternatives:

AlternativeAccuracySpeedup
The accuracy (vertical axis) and speed (horizontal axis) of each alternatives. Up and to the right is better. The red square shows the initial program, and each blue circle shows an alternative.The line shows the best available speed-accuracy tradeoffs.

Initial Program: 78.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{1}{x + 1} - \frac{1}{x - 1} \end{array} \]
(FPCore (x) :precision binary64 (- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))
double code(double x) {
	return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
}
real(8) function code(x)
    real(8), intent (in) :: x
    code = (1.0d0 / (x + 1.0d0)) - (1.0d0 / (x - 1.0d0))
end function
public static double code(double x) {
	return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
}
def code(x):
	return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0))
function code(x)
	return Float64(Float64(1.0 / Float64(x + 1.0)) - Float64(1.0 / Float64(x - 1.0)))
end
function tmp = code(x)
	tmp = (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
end
code[x_] := N[(N[(1.0 / N[(x + 1.0), $MachinePrecision]), $MachinePrecision] - N[(1.0 / N[(x - 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{1}{x + 1} - \frac{1}{x - 1}
\end{array}

Alternative 1: 99.9% accurate, 1.2× speedup?

\[\begin{array}{l} \\ \frac{\frac{-2}{-1 - x}}{1 - x} \end{array} \]
(FPCore (x) :precision binary64 (/ (/ -2.0 (- -1.0 x)) (- 1.0 x)))
double code(double x) {
	return (-2.0 / (-1.0 - x)) / (1.0 - x);
}
real(8) function code(x)
    real(8), intent (in) :: x
    code = ((-2.0d0) / ((-1.0d0) - x)) / (1.0d0 - x)
end function
public static double code(double x) {
	return (-2.0 / (-1.0 - x)) / (1.0 - x);
}
def code(x):
	return (-2.0 / (-1.0 - x)) / (1.0 - x)
function code(x)
	return Float64(Float64(-2.0 / Float64(-1.0 - x)) / Float64(1.0 - x))
end
function tmp = code(x)
	tmp = (-2.0 / (-1.0 - x)) / (1.0 - x);
end
code[x_] := N[(N[(-2.0 / N[(-1.0 - x), $MachinePrecision]), $MachinePrecision] / N[(1.0 - x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\frac{-2}{-1 - x}}{1 - x}
\end{array}
Derivation
  1. Initial program 76.0%

    \[\frac{1}{x + 1} - \frac{1}{x - 1} \]
  2. Step-by-step derivation
    1. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{x + 1} + \left(-\frac{1}{x - 1}\right)} \]
    2. +-commutative76.0%

      \[\leadsto \color{blue}{\left(-\frac{1}{x - 1}\right) + \frac{1}{x + 1}} \]
    3. distribute-neg-frac276.0%

      \[\leadsto \color{blue}{\frac{1}{-\left(x - 1\right)}} + \frac{1}{x + 1} \]
    4. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{0 - \left(x - 1\right)}} + \frac{1}{x + 1} \]
    5. associate-+l-76.0%

      \[\leadsto \frac{1}{\color{blue}{\left(0 - x\right) + 1}} + \frac{1}{x + 1} \]
    6. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{\left(-x\right)} + 1} + \frac{1}{x + 1} \]
    7. remove-double-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{\color{blue}{-\left(-\left(x + 1\right)\right)}} \]
    8. distribute-neg-in76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) + \left(-1\right)\right)}} \]
    9. sub-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) - 1\right)}} \]
    10. distribute-neg-frac276.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \color{blue}{\left(-\frac{1}{\left(-x\right) - 1}\right)} \]
    11. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{\left(-x\right) + 1} - \frac{1}{\left(-x\right) - 1}} \]
    12. +-commutative76.0%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(-x\right)}} - \frac{1}{\left(-x\right) - 1} \]
    13. unsub-neg76.0%

      \[\leadsto \frac{1}{\color{blue}{1 - x}} - \frac{1}{\left(-x\right) - 1} \]
    14. sub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-x\right) + \left(-1\right)}} \]
    15. +-commutative76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) + \left(-x\right)}} \]
    16. unsub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) - x}} \]
    17. metadata-eval76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{-1} - x} \]
  3. Simplified76.0%

    \[\leadsto \color{blue}{\frac{1}{1 - x} - \frac{1}{-1 - x}} \]
  4. Add Preprocessing
  5. Step-by-step derivation
    1. frac-sub77.3%

      \[\leadsto \color{blue}{\frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\left(1 - x\right) \cdot \left(-1 - x\right)}} \]
    2. *-rgt-identity77.3%

      \[\leadsto \frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\color{blue}{\left(\left(1 - x\right) \cdot 1\right)} \cdot \left(-1 - x\right)} \]
    3. metadata-eval77.3%

      \[\leadsto \frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\left(\left(1 - x\right) \cdot \color{blue}{\frac{1}{1}}\right) \cdot \left(-1 - x\right)} \]
    4. div-inv77.3%

      \[\leadsto \frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\color{blue}{\frac{1 - x}{1}} \cdot \left(-1 - x\right)} \]
    5. associate-/r*77.3%

      \[\leadsto \color{blue}{\frac{\frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\frac{1 - x}{1}}}{-1 - x}} \]
    6. metadata-eval77.3%

      \[\leadsto \frac{\frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot \color{blue}{\frac{1}{1}}}{\frac{1 - x}{1}}}{-1 - x} \]
    7. div-inv77.3%

      \[\leadsto \frac{\frac{1 \cdot \left(-1 - x\right) - \color{blue}{\frac{1 - x}{1}}}{\frac{1 - x}{1}}}{-1 - x} \]
    8. *-un-lft-identity77.3%

      \[\leadsto \frac{\frac{\color{blue}{\left(-1 - x\right)} - \frac{1 - x}{1}}{\frac{1 - x}{1}}}{-1 - x} \]
    9. associate--l-80.4%

      \[\leadsto \frac{\frac{\color{blue}{-1 - \left(x + \frac{1 - x}{1}\right)}}{\frac{1 - x}{1}}}{-1 - x} \]
    10. div-inv80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \color{blue}{\left(1 - x\right) \cdot \frac{1}{1}}\right)}{\frac{1 - x}{1}}}{-1 - x} \]
    11. metadata-eval80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right) \cdot \color{blue}{1}\right)}{\frac{1 - x}{1}}}{-1 - x} \]
    12. *-rgt-identity80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \color{blue}{\left(1 - x\right)}\right)}{\frac{1 - x}{1}}}{-1 - x} \]
    13. div-inv80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{\color{blue}{\left(1 - x\right) \cdot \frac{1}{1}}}}{-1 - x} \]
    14. metadata-eval80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{\left(1 - x\right) \cdot \color{blue}{1}}}{-1 - x} \]
    15. *-rgt-identity80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{\color{blue}{1 - x}}}{-1 - x} \]
  6. Applied egg-rr80.4%

    \[\leadsto \color{blue}{\frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{1 - x}}{-1 - x}} \]
  7. Step-by-step derivation
    1. flip3--57.3%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{1 - x}}{\color{blue}{\frac{{-1}^{3} - {x}^{3}}{-1 \cdot -1 + \left(x \cdot x + -1 \cdot x\right)}}} \]
    2. associate-/r/56.9%

      \[\leadsto \color{blue}{\frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{1 - x}}{{-1}^{3} - {x}^{3}} \cdot \left(-1 \cdot -1 + \left(x \cdot x + -1 \cdot x\right)\right)} \]
    3. +-commutative56.9%

      \[\leadsto \frac{\frac{-1 - \color{blue}{\left(\left(1 - x\right) + x\right)}}{1 - x}}{{-1}^{3} - {x}^{3}} \cdot \left(-1 \cdot -1 + \left(x \cdot x + -1 \cdot x\right)\right) \]
    4. associate-+l-65.8%

      \[\leadsto \frac{\frac{-1 - \color{blue}{\left(1 - \left(x - x\right)\right)}}{1 - x}}{{-1}^{3} - {x}^{3}} \cdot \left(-1 \cdot -1 + \left(x \cdot x + -1 \cdot x\right)\right) \]
    5. metadata-eval65.8%

      \[\leadsto \frac{\frac{-1 - \left(1 - \left(x - x\right)\right)}{1 - x}}{\color{blue}{-1} - {x}^{3}} \cdot \left(-1 \cdot -1 + \left(x \cdot x + -1 \cdot x\right)\right) \]
    6. metadata-eval65.8%

      \[\leadsto \frac{\frac{-1 - \left(1 - \left(x - x\right)\right)}{1 - x}}{-1 - {x}^{3}} \cdot \left(\color{blue}{1} + \left(x \cdot x + -1 \cdot x\right)\right) \]
    7. distribute-rgt-out65.8%

      \[\leadsto \frac{\frac{-1 - \left(1 - \left(x - x\right)\right)}{1 - x}}{-1 - {x}^{3}} \cdot \left(1 + \color{blue}{x \cdot \left(x + -1\right)}\right) \]
    8. +-commutative65.8%

      \[\leadsto \frac{\frac{-1 - \left(1 - \left(x - x\right)\right)}{1 - x}}{-1 - {x}^{3}} \cdot \left(1 + x \cdot \color{blue}{\left(-1 + x\right)}\right) \]
  8. Applied egg-rr65.8%

    \[\leadsto \color{blue}{\frac{\frac{-1 - \left(1 - \left(x - x\right)\right)}{1 - x}}{-1 - {x}^{3}} \cdot \left(1 + x \cdot \left(-1 + x\right)\right)} \]
  9. Step-by-step derivation
    1. associate-/l/65.2%

      \[\leadsto \color{blue}{\frac{-1 - \left(1 - \left(x - x\right)\right)}{\left(-1 - {x}^{3}\right) \cdot \left(1 - x\right)}} \cdot \left(1 + x \cdot \left(-1 + x\right)\right) \]
    2. +-inverses65.2%

      \[\leadsto \frac{-1 - \left(1 - \color{blue}{0}\right)}{\left(-1 - {x}^{3}\right) \cdot \left(1 - x\right)} \cdot \left(1 + x \cdot \left(-1 + x\right)\right) \]
    3. metadata-eval65.2%

      \[\leadsto \frac{-1 - \color{blue}{1}}{\left(-1 - {x}^{3}\right) \cdot \left(1 - x\right)} \cdot \left(1 + x \cdot \left(-1 + x\right)\right) \]
    4. metadata-eval65.2%

      \[\leadsto \frac{\color{blue}{-2}}{\left(-1 - {x}^{3}\right) \cdot \left(1 - x\right)} \cdot \left(1 + x \cdot \left(-1 + x\right)\right) \]
    5. +-commutative65.2%

      \[\leadsto \frac{-2}{\left(-1 - {x}^{3}\right) \cdot \left(1 - x\right)} \cdot \left(1 + x \cdot \color{blue}{\left(x + -1\right)}\right) \]
  10. Simplified65.2%

    \[\leadsto \color{blue}{\frac{-2}{\left(-1 - {x}^{3}\right) \cdot \left(1 - x\right)} \cdot \left(1 + x \cdot \left(x + -1\right)\right)} \]
  11. Step-by-step derivation
    1. *-commutative65.2%

      \[\leadsto \frac{-2}{\color{blue}{\left(1 - x\right) \cdot \left(-1 - {x}^{3}\right)}} \cdot \left(1 + x \cdot \left(x + -1\right)\right) \]
    2. associate-/r*65.8%

      \[\leadsto \color{blue}{\frac{\frac{-2}{1 - x}}{-1 - {x}^{3}}} \cdot \left(1 + x \cdot \left(x + -1\right)\right) \]
    3. metadata-eval65.8%

      \[\leadsto \frac{\frac{\color{blue}{-1 - 1}}{1 - x}}{-1 - {x}^{3}} \cdot \left(1 + x \cdot \left(x + -1\right)\right) \]
    4. associate-/r/68.9%

      \[\leadsto \color{blue}{\frac{\frac{-1 - 1}{1 - x}}{\frac{-1 - {x}^{3}}{1 + x \cdot \left(x + -1\right)}}} \]
    5. metadata-eval68.9%

      \[\leadsto \frac{\frac{-1 - 1}{1 - x}}{\frac{\color{blue}{{-1}^{3}} - {x}^{3}}{1 + x \cdot \left(x + -1\right)}} \]
    6. metadata-eval68.9%

      \[\leadsto \frac{\frac{-1 - 1}{1 - x}}{\frac{{-1}^{3} - {x}^{3}}{\color{blue}{-1 \cdot -1} + x \cdot \left(x + -1\right)}} \]
    7. distribute-rgt-in68.9%

      \[\leadsto \frac{\frac{-1 - 1}{1 - x}}{\frac{{-1}^{3} - {x}^{3}}{-1 \cdot -1 + \color{blue}{\left(x \cdot x + -1 \cdot x\right)}}} \]
    8. flip3--99.9%

      \[\leadsto \frac{\frac{-1 - 1}{1 - x}}{\color{blue}{-1 - x}} \]
    9. metadata-eval99.9%

      \[\leadsto \frac{\frac{\color{blue}{-2}}{1 - x}}{-1 - x} \]
    10. associate-/l/99.0%

      \[\leadsto \color{blue}{\frac{-2}{\left(-1 - x\right) \cdot \left(1 - x\right)}} \]
    11. *-commutative99.0%

      \[\leadsto \frac{-2}{\color{blue}{\left(1 - x\right) \cdot \left(-1 - x\right)}} \]
  12. Applied egg-rr99.0%

    \[\leadsto \color{blue}{\frac{-2}{\left(1 - x\right) \cdot \left(-1 - x\right)}} \]
  13. Step-by-step derivation
    1. associate-/l/99.9%

      \[\leadsto \color{blue}{\frac{\frac{-2}{-1 - x}}{1 - x}} \]
  14. Simplified99.9%

    \[\leadsto \color{blue}{\frac{\frac{-2}{-1 - x}}{1 - x}} \]
  15. Final simplification99.9%

    \[\leadsto \frac{\frac{-2}{-1 - x}}{1 - x} \]
  16. Add Preprocessing

Alternative 2: 99.4% accurate, 1.2× speedup?

\[\begin{array}{l} \\ \frac{2}{\left(-1 - x\right) \cdot \left(-1 + x\right)} \end{array} \]
(FPCore (x) :precision binary64 (/ 2.0 (* (- -1.0 x) (+ -1.0 x))))
double code(double x) {
	return 2.0 / ((-1.0 - x) * (-1.0 + x));
}
real(8) function code(x)
    real(8), intent (in) :: x
    code = 2.0d0 / (((-1.0d0) - x) * ((-1.0d0) + x))
end function
public static double code(double x) {
	return 2.0 / ((-1.0 - x) * (-1.0 + x));
}
def code(x):
	return 2.0 / ((-1.0 - x) * (-1.0 + x))
function code(x)
	return Float64(2.0 / Float64(Float64(-1.0 - x) * Float64(-1.0 + x)))
end
function tmp = code(x)
	tmp = 2.0 / ((-1.0 - x) * (-1.0 + x));
end
code[x_] := N[(2.0 / N[(N[(-1.0 - x), $MachinePrecision] * N[(-1.0 + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{2}{\left(-1 - x\right) \cdot \left(-1 + x\right)}
\end{array}
Derivation
  1. Initial program 76.0%

    \[\frac{1}{x + 1} - \frac{1}{x - 1} \]
  2. Step-by-step derivation
    1. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{x + 1} + \left(-\frac{1}{x - 1}\right)} \]
    2. +-commutative76.0%

      \[\leadsto \color{blue}{\left(-\frac{1}{x - 1}\right) + \frac{1}{x + 1}} \]
    3. distribute-neg-frac276.0%

      \[\leadsto \color{blue}{\frac{1}{-\left(x - 1\right)}} + \frac{1}{x + 1} \]
    4. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{0 - \left(x - 1\right)}} + \frac{1}{x + 1} \]
    5. associate-+l-76.0%

      \[\leadsto \frac{1}{\color{blue}{\left(0 - x\right) + 1}} + \frac{1}{x + 1} \]
    6. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{\left(-x\right)} + 1} + \frac{1}{x + 1} \]
    7. remove-double-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{\color{blue}{-\left(-\left(x + 1\right)\right)}} \]
    8. distribute-neg-in76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) + \left(-1\right)\right)}} \]
    9. sub-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) - 1\right)}} \]
    10. distribute-neg-frac276.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \color{blue}{\left(-\frac{1}{\left(-x\right) - 1}\right)} \]
    11. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{\left(-x\right) + 1} - \frac{1}{\left(-x\right) - 1}} \]
    12. +-commutative76.0%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(-x\right)}} - \frac{1}{\left(-x\right) - 1} \]
    13. unsub-neg76.0%

      \[\leadsto \frac{1}{\color{blue}{1 - x}} - \frac{1}{\left(-x\right) - 1} \]
    14. sub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-x\right) + \left(-1\right)}} \]
    15. +-commutative76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) + \left(-x\right)}} \]
    16. unsub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) - x}} \]
    17. metadata-eval76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{-1} - x} \]
  3. Simplified76.0%

    \[\leadsto \color{blue}{\frac{1}{1 - x} - \frac{1}{-1 - x}} \]
  4. Add Preprocessing
  5. Step-by-step derivation
    1. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{1 - x} + \left(-\frac{1}{-1 - x}\right)} \]
    2. distribute-neg-frac76.0%

      \[\leadsto \frac{1}{1 - x} + \color{blue}{\frac{-1}{-1 - x}} \]
    3. metadata-eval76.0%

      \[\leadsto \frac{1}{1 - x} + \frac{\color{blue}{-1}}{-1 - x} \]
  6. Applied egg-rr76.0%

    \[\leadsto \color{blue}{\frac{1}{1 - x} + \frac{-1}{-1 - x}} \]
  7. Simplified99.0%

    \[\leadsto \color{blue}{\frac{2}{\left(-1 - x\right) \cdot \left(x + -1\right)}} \]
  8. Final simplification99.0%

    \[\leadsto \frac{2}{\left(-1 - x\right) \cdot \left(-1 + x\right)} \]
  9. Add Preprocessing

Alternative 3: 50.9% accurate, 2.2× speedup?

\[\begin{array}{l} \\ -2 \cdot \left(-1 + x\right) \end{array} \]
(FPCore (x) :precision binary64 (* -2.0 (+ -1.0 x)))
double code(double x) {
	return -2.0 * (-1.0 + x);
}
real(8) function code(x)
    real(8), intent (in) :: x
    code = (-2.0d0) * ((-1.0d0) + x)
end function
public static double code(double x) {
	return -2.0 * (-1.0 + x);
}
def code(x):
	return -2.0 * (-1.0 + x)
function code(x)
	return Float64(-2.0 * Float64(-1.0 + x))
end
function tmp = code(x)
	tmp = -2.0 * (-1.0 + x);
end
code[x_] := N[(-2.0 * N[(-1.0 + x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
-2 \cdot \left(-1 + x\right)
\end{array}
Derivation
  1. Initial program 76.0%

    \[\frac{1}{x + 1} - \frac{1}{x - 1} \]
  2. Step-by-step derivation
    1. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{x + 1} + \left(-\frac{1}{x - 1}\right)} \]
    2. +-commutative76.0%

      \[\leadsto \color{blue}{\left(-\frac{1}{x - 1}\right) + \frac{1}{x + 1}} \]
    3. distribute-neg-frac276.0%

      \[\leadsto \color{blue}{\frac{1}{-\left(x - 1\right)}} + \frac{1}{x + 1} \]
    4. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{0 - \left(x - 1\right)}} + \frac{1}{x + 1} \]
    5. associate-+l-76.0%

      \[\leadsto \frac{1}{\color{blue}{\left(0 - x\right) + 1}} + \frac{1}{x + 1} \]
    6. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{\left(-x\right)} + 1} + \frac{1}{x + 1} \]
    7. remove-double-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{\color{blue}{-\left(-\left(x + 1\right)\right)}} \]
    8. distribute-neg-in76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) + \left(-1\right)\right)}} \]
    9. sub-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) - 1\right)}} \]
    10. distribute-neg-frac276.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \color{blue}{\left(-\frac{1}{\left(-x\right) - 1}\right)} \]
    11. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{\left(-x\right) + 1} - \frac{1}{\left(-x\right) - 1}} \]
    12. +-commutative76.0%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(-x\right)}} - \frac{1}{\left(-x\right) - 1} \]
    13. unsub-neg76.0%

      \[\leadsto \frac{1}{\color{blue}{1 - x}} - \frac{1}{\left(-x\right) - 1} \]
    14. sub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-x\right) + \left(-1\right)}} \]
    15. +-commutative76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) + \left(-x\right)}} \]
    16. unsub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) - x}} \]
    17. metadata-eval76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{-1} - x} \]
  3. Simplified76.0%

    \[\leadsto \color{blue}{\frac{1}{1 - x} - \frac{1}{-1 - x}} \]
  4. Add Preprocessing
  5. Step-by-step derivation
    1. frac-sub77.3%

      \[\leadsto \color{blue}{\frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\left(1 - x\right) \cdot \left(-1 - x\right)}} \]
    2. *-rgt-identity77.3%

      \[\leadsto \frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\color{blue}{\left(\left(1 - x\right) \cdot 1\right)} \cdot \left(-1 - x\right)} \]
    3. metadata-eval77.3%

      \[\leadsto \frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\left(\left(1 - x\right) \cdot \color{blue}{\frac{1}{1}}\right) \cdot \left(-1 - x\right)} \]
    4. div-inv77.3%

      \[\leadsto \frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\color{blue}{\frac{1 - x}{1}} \cdot \left(-1 - x\right)} \]
    5. associate-/r*77.3%

      \[\leadsto \color{blue}{\frac{\frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot 1}{\frac{1 - x}{1}}}{-1 - x}} \]
    6. metadata-eval77.3%

      \[\leadsto \frac{\frac{1 \cdot \left(-1 - x\right) - \left(1 - x\right) \cdot \color{blue}{\frac{1}{1}}}{\frac{1 - x}{1}}}{-1 - x} \]
    7. div-inv77.3%

      \[\leadsto \frac{\frac{1 \cdot \left(-1 - x\right) - \color{blue}{\frac{1 - x}{1}}}{\frac{1 - x}{1}}}{-1 - x} \]
    8. *-un-lft-identity77.3%

      \[\leadsto \frac{\frac{\color{blue}{\left(-1 - x\right)} - \frac{1 - x}{1}}{\frac{1 - x}{1}}}{-1 - x} \]
    9. associate--l-80.4%

      \[\leadsto \frac{\frac{\color{blue}{-1 - \left(x + \frac{1 - x}{1}\right)}}{\frac{1 - x}{1}}}{-1 - x} \]
    10. div-inv80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \color{blue}{\left(1 - x\right) \cdot \frac{1}{1}}\right)}{\frac{1 - x}{1}}}{-1 - x} \]
    11. metadata-eval80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right) \cdot \color{blue}{1}\right)}{\frac{1 - x}{1}}}{-1 - x} \]
    12. *-rgt-identity80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \color{blue}{\left(1 - x\right)}\right)}{\frac{1 - x}{1}}}{-1 - x} \]
    13. div-inv80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{\color{blue}{\left(1 - x\right) \cdot \frac{1}{1}}}}{-1 - x} \]
    14. metadata-eval80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{\left(1 - x\right) \cdot \color{blue}{1}}}{-1 - x} \]
    15. *-rgt-identity80.4%

      \[\leadsto \frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{\color{blue}{1 - x}}}{-1 - x} \]
  6. Applied egg-rr80.4%

    \[\leadsto \color{blue}{\frac{\frac{-1 - \left(x + \left(1 - x\right)\right)}{1 - x}}{-1 - x}} \]
  7. Taylor expanded in x around 0 99.9%

    \[\leadsto \frac{\frac{-1 - \color{blue}{1}}{1 - x}}{-1 - x} \]
  8. Step-by-step derivation
    1. flip--98.9%

      \[\leadsto \frac{\frac{-1 - 1}{1 - x}}{\color{blue}{\frac{-1 \cdot -1 - x \cdot x}{-1 + x}}} \]
    2. +-commutative98.9%

      \[\leadsto \frac{\frac{-1 - 1}{1 - x}}{\frac{-1 \cdot -1 - x \cdot x}{\color{blue}{x + -1}}} \]
    3. associate-/r/91.3%

      \[\leadsto \color{blue}{\frac{\frac{-1 - 1}{1 - x}}{-1 \cdot -1 - x \cdot x} \cdot \left(x + -1\right)} \]
    4. metadata-eval91.3%

      \[\leadsto \frac{\frac{\color{blue}{-2}}{1 - x}}{-1 \cdot -1 - x \cdot x} \cdot \left(x + -1\right) \]
    5. metadata-eval91.3%

      \[\leadsto \frac{\frac{-2}{1 - x}}{\color{blue}{1} - x \cdot x} \cdot \left(x + -1\right) \]
    6. pow291.3%

      \[\leadsto \frac{\frac{-2}{1 - x}}{1 - \color{blue}{{x}^{2}}} \cdot \left(x + -1\right) \]
    7. +-commutative91.3%

      \[\leadsto \frac{\frac{-2}{1 - x}}{1 - {x}^{2}} \cdot \color{blue}{\left(-1 + x\right)} \]
  9. Applied egg-rr91.3%

    \[\leadsto \color{blue}{\frac{\frac{-2}{1 - x}}{1 - {x}^{2}} \cdot \left(-1 + x\right)} \]
  10. Step-by-step derivation
    1. *-commutative91.3%

      \[\leadsto \color{blue}{\left(-1 + x\right) \cdot \frac{\frac{-2}{1 - x}}{1 - {x}^{2}}} \]
    2. +-commutative91.3%

      \[\leadsto \color{blue}{\left(x + -1\right)} \cdot \frac{\frac{-2}{1 - x}}{1 - {x}^{2}} \]
    3. associate-/l/91.1%

      \[\leadsto \left(x + -1\right) \cdot \color{blue}{\frac{-2}{\left(1 - {x}^{2}\right) \cdot \left(1 - x\right)}} \]
  11. Simplified91.1%

    \[\leadsto \color{blue}{\left(x + -1\right) \cdot \frac{-2}{\left(1 - {x}^{2}\right) \cdot \left(1 - x\right)}} \]
  12. Taylor expanded in x around 0 52.3%

    \[\leadsto \left(x + -1\right) \cdot \color{blue}{-2} \]
  13. Final simplification52.3%

    \[\leadsto -2 \cdot \left(-1 + x\right) \]
  14. Add Preprocessing

Alternative 4: 51.5% accurate, 11.0× speedup?

\[\begin{array}{l} \\ 2 \end{array} \]
(FPCore (x) :precision binary64 2.0)
double code(double x) {
	return 2.0;
}
real(8) function code(x)
    real(8), intent (in) :: x
    code = 2.0d0
end function
public static double code(double x) {
	return 2.0;
}
def code(x):
	return 2.0
function code(x)
	return 2.0
end
function tmp = code(x)
	tmp = 2.0;
end
code[x_] := 2.0
\begin{array}{l}

\\
2
\end{array}
Derivation
  1. Initial program 76.0%

    \[\frac{1}{x + 1} - \frac{1}{x - 1} \]
  2. Step-by-step derivation
    1. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{x + 1} + \left(-\frac{1}{x - 1}\right)} \]
    2. +-commutative76.0%

      \[\leadsto \color{blue}{\left(-\frac{1}{x - 1}\right) + \frac{1}{x + 1}} \]
    3. distribute-neg-frac276.0%

      \[\leadsto \color{blue}{\frac{1}{-\left(x - 1\right)}} + \frac{1}{x + 1} \]
    4. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{0 - \left(x - 1\right)}} + \frac{1}{x + 1} \]
    5. associate-+l-76.0%

      \[\leadsto \frac{1}{\color{blue}{\left(0 - x\right) + 1}} + \frac{1}{x + 1} \]
    6. neg-sub076.0%

      \[\leadsto \frac{1}{\color{blue}{\left(-x\right)} + 1} + \frac{1}{x + 1} \]
    7. remove-double-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{\color{blue}{-\left(-\left(x + 1\right)\right)}} \]
    8. distribute-neg-in76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) + \left(-1\right)\right)}} \]
    9. sub-neg76.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \frac{1}{-\color{blue}{\left(\left(-x\right) - 1\right)}} \]
    10. distribute-neg-frac276.0%

      \[\leadsto \frac{1}{\left(-x\right) + 1} + \color{blue}{\left(-\frac{1}{\left(-x\right) - 1}\right)} \]
    11. sub-neg76.0%

      \[\leadsto \color{blue}{\frac{1}{\left(-x\right) + 1} - \frac{1}{\left(-x\right) - 1}} \]
    12. +-commutative76.0%

      \[\leadsto \frac{1}{\color{blue}{1 + \left(-x\right)}} - \frac{1}{\left(-x\right) - 1} \]
    13. unsub-neg76.0%

      \[\leadsto \frac{1}{\color{blue}{1 - x}} - \frac{1}{\left(-x\right) - 1} \]
    14. sub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-x\right) + \left(-1\right)}} \]
    15. +-commutative76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) + \left(-x\right)}} \]
    16. unsub-neg76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{\left(-1\right) - x}} \]
    17. metadata-eval76.0%

      \[\leadsto \frac{1}{1 - x} - \frac{1}{\color{blue}{-1} - x} \]
  3. Simplified76.0%

    \[\leadsto \color{blue}{\frac{1}{1 - x} - \frac{1}{-1 - x}} \]
  4. Add Preprocessing
  5. Taylor expanded in x around 0 52.5%

    \[\leadsto \color{blue}{2} \]
  6. Final simplification52.5%

    \[\leadsto 2 \]
  7. Add Preprocessing

Reproduce

?
herbie shell --seed 2024067 
(FPCore (x)
  :name "Asymptote A"
  :precision binary64
  (- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))