ln(1 + x)

Percentage Accurate: 39.5% → 100.0%
Time: 8.2s
Alternatives: 7
Speedup: 17.3×

Specification

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

\\
\log \left(1 + x\right)
\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 7 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: 39.5% accurate, 1.0× speedup?

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

\\
\log \left(1 + x\right)
\end{array}

Alternative 1: 100.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \mathsf{log1p}\left(x\right) \end{array} \]
(FPCore (x) :precision binary64 (log1p x))
double code(double x) {
	return log1p(x);
}
public static double code(double x) {
	return Math.log1p(x);
}
def code(x):
	return math.log1p(x)
function code(x)
	return log1p(x)
end
code[x_] := N[Log[1 + x], $MachinePrecision]
\begin{array}{l}

\\
\mathsf{log1p}\left(x\right)
\end{array}
Derivation
  1. Initial program 39.0%

    \[\log \left(1 + x\right) \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-log.f64N/A

      \[\leadsto \color{blue}{\log \left(1 + x\right)} \]
    2. lift-+.f64N/A

      \[\leadsto \log \color{blue}{\left(1 + x\right)} \]
    3. lower-log1p.f64100.0

      \[\leadsto \color{blue}{\mathsf{log1p}\left(x\right)} \]
  4. Applied rewrites100.0%

    \[\leadsto \color{blue}{\mathsf{log1p}\left(x\right)} \]
  5. Add Preprocessing

Alternative 2: 99.0% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)\\ \mathbf{else}:\\ \;\;\;\;\log x\\ \end{array} \end{array} \]
(FPCore (x)
 :precision binary64
 (if (<= (+ x 1.0) 2.0)
   (fma (fma x (fma x -0.25 0.3333333333333333) -0.5) (* x x) x)
   (log x)))
double code(double x) {
	double tmp;
	if ((x + 1.0) <= 2.0) {
		tmp = fma(fma(x, fma(x, -0.25, 0.3333333333333333), -0.5), (x * x), x);
	} else {
		tmp = log(x);
	}
	return tmp;
}
function code(x)
	tmp = 0.0
	if (Float64(x + 1.0) <= 2.0)
		tmp = fma(fma(x, fma(x, -0.25, 0.3333333333333333), -0.5), Float64(x * x), x);
	else
		tmp = log(x);
	end
	return tmp
end
code[x_] := If[LessEqual[N[(x + 1.0), $MachinePrecision], 2.0], N[(N[(x * N[(x * -0.25 + 0.3333333333333333), $MachinePrecision] + -0.5), $MachinePrecision] * N[(x * x), $MachinePrecision] + x), $MachinePrecision], N[Log[x], $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x + 1 \leq 2:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)\\

\mathbf{else}:\\
\;\;\;\;\log x\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (+.f64 #s(literal 1 binary64) x) < 2

    1. Initial program 8.7%

      \[\log \left(1 + x\right) \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{x \cdot \left(1 + x \cdot \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right)\right)} \]
    4. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto x \cdot \color{blue}{\left(x \cdot \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) + 1\right)} \]
      2. distribute-rgt-inN/A

        \[\leadsto \color{blue}{\left(x \cdot \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right)\right) \cdot x + 1 \cdot x} \]
      3. *-commutativeN/A

        \[\leadsto \color{blue}{\left(\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot x\right)} \cdot x + 1 \cdot x \]
      4. associate-*l*N/A

        \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot \left(x \cdot x\right)} + 1 \cdot x \]
      5. unpow2N/A

        \[\leadsto \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot \color{blue}{{x}^{2}} + 1 \cdot x \]
      6. *-lft-identityN/A

        \[\leadsto \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot {x}^{2} + \color{blue}{x} \]
      7. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}, {x}^{2}, x\right)} \]
      8. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right)}, {x}^{2}, x\right) \]
      9. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) + \color{blue}{\frac{-1}{2}}, {x}^{2}, x\right) \]
      10. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(x, \frac{1}{3} + \frac{-1}{4} \cdot x, \frac{-1}{2}\right)}, {x}^{2}, x\right) \]
      11. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \color{blue}{\frac{-1}{4} \cdot x + \frac{1}{3}}, \frac{-1}{2}\right), {x}^{2}, x\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \color{blue}{x \cdot \frac{-1}{4}} + \frac{1}{3}, \frac{-1}{2}\right), {x}^{2}, x\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \color{blue}{\mathsf{fma}\left(x, \frac{-1}{4}, \frac{1}{3}\right)}, \frac{-1}{2}\right), {x}^{2}, x\right) \]
      14. unpow2N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, \frac{-1}{4}, \frac{1}{3}\right), \frac{-1}{2}\right), \color{blue}{x \cdot x}, x\right) \]
      15. lower-*.f6499.4

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), \color{blue}{x \cdot x}, x\right) \]
    5. Applied rewrites99.4%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)} \]

    if 2 < (+.f64 #s(literal 1 binary64) x)

    1. Initial program 100.0%

      \[\log \left(1 + x\right) \]
    2. Add Preprocessing
    3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{-1 \cdot \log \left(\frac{1}{x}\right)} \]
    4. Step-by-step derivation
      1. mul-1-negN/A

        \[\leadsto \color{blue}{\mathsf{neg}\left(\log \left(\frac{1}{x}\right)\right)} \]
      2. log-recN/A

        \[\leadsto \mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(\log x\right)\right)}\right) \]
      3. remove-double-negN/A

        \[\leadsto \color{blue}{\log x} \]
      4. lower-log.f6498.0

        \[\leadsto \color{blue}{\log x} \]
    5. Applied rewrites98.0%

      \[\leadsto \color{blue}{\log x} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification98.9%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)\\ \mathbf{else}:\\ \;\;\;\;\log x\\ \end{array} \]
  5. Add Preprocessing

Alternative 3: 70.6% accurate, 3.2× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{0.5}\\ \end{array} \end{array} \]
(FPCore (x)
 :precision binary64
 (if (<= (+ x 1.0) 2.0)
   (fma (fma x (fma x -0.25 0.3333333333333333) -0.5) (* x x) x)
   (/ 1.0 0.5)))
double code(double x) {
	double tmp;
	if ((x + 1.0) <= 2.0) {
		tmp = fma(fma(x, fma(x, -0.25, 0.3333333333333333), -0.5), (x * x), x);
	} else {
		tmp = 1.0 / 0.5;
	}
	return tmp;
}
function code(x)
	tmp = 0.0
	if (Float64(x + 1.0) <= 2.0)
		tmp = fma(fma(x, fma(x, -0.25, 0.3333333333333333), -0.5), Float64(x * x), x);
	else
		tmp = Float64(1.0 / 0.5);
	end
	return tmp
end
code[x_] := If[LessEqual[N[(x + 1.0), $MachinePrecision], 2.0], N[(N[(x * N[(x * -0.25 + 0.3333333333333333), $MachinePrecision] + -0.5), $MachinePrecision] * N[(x * x), $MachinePrecision] + x), $MachinePrecision], N[(1.0 / 0.5), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x + 1 \leq 2:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{1}{0.5}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (+.f64 #s(literal 1 binary64) x) < 2

    1. Initial program 8.7%

      \[\log \left(1 + x\right) \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{x \cdot \left(1 + x \cdot \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right)\right)} \]
    4. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto x \cdot \color{blue}{\left(x \cdot \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) + 1\right)} \]
      2. distribute-rgt-inN/A

        \[\leadsto \color{blue}{\left(x \cdot \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right)\right) \cdot x + 1 \cdot x} \]
      3. *-commutativeN/A

        \[\leadsto \color{blue}{\left(\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot x\right)} \cdot x + 1 \cdot x \]
      4. associate-*l*N/A

        \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot \left(x \cdot x\right)} + 1 \cdot x \]
      5. unpow2N/A

        \[\leadsto \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot \color{blue}{{x}^{2}} + 1 \cdot x \]
      6. *-lft-identityN/A

        \[\leadsto \left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}\right) \cdot {x}^{2} + \color{blue}{x} \]
      7. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) - \frac{1}{2}, {x}^{2}, x\right)} \]
      8. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right)}, {x}^{2}, x\right) \]
      9. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(x \cdot \left(\frac{1}{3} + \frac{-1}{4} \cdot x\right) + \color{blue}{\frac{-1}{2}}, {x}^{2}, x\right) \]
      10. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(x, \frac{1}{3} + \frac{-1}{4} \cdot x, \frac{-1}{2}\right)}, {x}^{2}, x\right) \]
      11. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \color{blue}{\frac{-1}{4} \cdot x + \frac{1}{3}}, \frac{-1}{2}\right), {x}^{2}, x\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \color{blue}{x \cdot \frac{-1}{4}} + \frac{1}{3}, \frac{-1}{2}\right), {x}^{2}, x\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \color{blue}{\mathsf{fma}\left(x, \frac{-1}{4}, \frac{1}{3}\right)}, \frac{-1}{2}\right), {x}^{2}, x\right) \]
      14. unpow2N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, \frac{-1}{4}, \frac{1}{3}\right), \frac{-1}{2}\right), \color{blue}{x \cdot x}, x\right) \]
      15. lower-*.f6499.4

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), \color{blue}{x \cdot x}, x\right) \]
    5. Applied rewrites99.4%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)} \]

    if 2 < (+.f64 #s(literal 1 binary64) x)

    1. Initial program 100.0%

      \[\log \left(1 + x\right) \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{x \cdot \left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right)} \]
    4. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \color{blue}{\left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) + 1\right)} \cdot x \]
      3. distribute-lft1-inN/A

        \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x + x} \]
      4. *-commutativeN/A

        \[\leadsto \color{blue}{\left(\left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot x\right)} \cdot x + x \]
      5. associate-*l*N/A

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

        \[\leadsto \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot \color{blue}{{x}^{2}} + x \]
      7. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{1}{3} \cdot x - \frac{1}{2}, {x}^{2}, x\right)} \]
      8. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{1}{3} \cdot x + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right)}, {x}^{2}, x\right) \]
      9. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{x \cdot \frac{1}{3}} + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right), {x}^{2}, x\right) \]
      10. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(x \cdot \frac{1}{3} + \color{blue}{\frac{-1}{2}}, {x}^{2}, x\right) \]
      11. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right)}, {x}^{2}, x\right) \]
      12. unpow2N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right), \color{blue}{x \cdot x}, x\right) \]
      13. lower-*.f644.0

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), \color{blue}{x \cdot x}, x\right) \]
    5. Applied rewrites4.0%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)} \]
    6. Step-by-step derivation
      1. Applied rewrites4.0%

        \[\leadsto \frac{1}{\color{blue}{\frac{1}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)}}} \]
      2. Taylor expanded in x around 0

        \[\leadsto \frac{1}{\frac{1 + \frac{1}{2} \cdot x}{\color{blue}{x}}} \]
      3. Step-by-step derivation
        1. Applied rewrites14.5%

          \[\leadsto \frac{1}{\frac{\mathsf{fma}\left(x, 0.5, 1\right)}{\color{blue}{x}}} \]
        2. Taylor expanded in x around inf

          \[\leadsto \frac{1}{\frac{1}{2}} \]
        3. Step-by-step derivation
          1. Applied rewrites14.5%

            \[\leadsto \frac{1}{0.5} \]
        4. Recombined 2 regimes into one program.
        5. Final simplification71.2%

          \[\leadsto \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, \mathsf{fma}\left(x, -0.25, 0.3333333333333333\right), -0.5\right), x \cdot x, x\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{0.5}\\ \end{array} \]
        6. Add Preprocessing

        Alternative 4: 70.1% accurate, 3.6× speedup?

        \[\begin{array}{l} \\ \frac{1}{\frac{\mathsf{fma}\left(x, 0.5, 1\right)}{x}} \end{array} \]
        (FPCore (x) :precision binary64 (/ 1.0 (/ (fma x 0.5 1.0) x)))
        double code(double x) {
        	return 1.0 / (fma(x, 0.5, 1.0) / x);
        }
        
        function code(x)
        	return Float64(1.0 / Float64(fma(x, 0.5, 1.0) / x))
        end
        
        code[x_] := N[(1.0 / N[(N[(x * 0.5 + 1.0), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision]
        
        \begin{array}{l}
        
        \\
        \frac{1}{\frac{\mathsf{fma}\left(x, 0.5, 1\right)}{x}}
        \end{array}
        
        Derivation
        1. Initial program 39.0%

          \[\log \left(1 + x\right) \]
        2. Add Preprocessing
        3. Taylor expanded in x around 0

          \[\leadsto \color{blue}{x \cdot \left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right)} \]
        4. Step-by-step derivation
          1. *-commutativeN/A

            \[\leadsto \color{blue}{\left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x} \]
          2. +-commutativeN/A

            \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) + 1\right)} \cdot x \]
          3. distribute-lft1-inN/A

            \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x + x} \]
          4. *-commutativeN/A

            \[\leadsto \color{blue}{\left(\left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot x\right)} \cdot x + x \]
          5. associate-*l*N/A

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

            \[\leadsto \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot \color{blue}{{x}^{2}} + x \]
          7. lower-fma.f64N/A

            \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{1}{3} \cdot x - \frac{1}{2}, {x}^{2}, x\right)} \]
          8. sub-negN/A

            \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{1}{3} \cdot x + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right)}, {x}^{2}, x\right) \]
          9. *-commutativeN/A

            \[\leadsto \mathsf{fma}\left(\color{blue}{x \cdot \frac{1}{3}} + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right), {x}^{2}, x\right) \]
          10. metadata-evalN/A

            \[\leadsto \mathsf{fma}\left(x \cdot \frac{1}{3} + \color{blue}{\frac{-1}{2}}, {x}^{2}, x\right) \]
          11. lower-fma.f64N/A

            \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right)}, {x}^{2}, x\right) \]
          12. unpow2N/A

            \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right), \color{blue}{x \cdot x}, x\right) \]
          13. lower-*.f6467.6

            \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), \color{blue}{x \cdot x}, x\right) \]
        5. Applied rewrites67.6%

          \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)} \]
        6. Step-by-step derivation
          1. Applied rewrites67.4%

            \[\leadsto \frac{1}{\color{blue}{\frac{1}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)}}} \]
          2. Taylor expanded in x around 0

            \[\leadsto \frac{1}{\frac{1 + \frac{1}{2} \cdot x}{\color{blue}{x}}} \]
          3. Step-by-step derivation
            1. Applied rewrites70.6%

              \[\leadsto \frac{1}{\frac{\mathsf{fma}\left(x, 0.5, 1\right)}{\color{blue}{x}}} \]
            2. Add Preprocessing

            Alternative 5: 70.4% accurate, 3.8× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{0.5}\\ \end{array} \end{array} \]
            (FPCore (x)
             :precision binary64
             (if (<= (+ x 1.0) 2.0)
               (fma (fma x 0.3333333333333333 -0.5) (* x x) x)
               (/ 1.0 0.5)))
            double code(double x) {
            	double tmp;
            	if ((x + 1.0) <= 2.0) {
            		tmp = fma(fma(x, 0.3333333333333333, -0.5), (x * x), x);
            	} else {
            		tmp = 1.0 / 0.5;
            	}
            	return tmp;
            }
            
            function code(x)
            	tmp = 0.0
            	if (Float64(x + 1.0) <= 2.0)
            		tmp = fma(fma(x, 0.3333333333333333, -0.5), Float64(x * x), x);
            	else
            		tmp = Float64(1.0 / 0.5);
            	end
            	return tmp
            end
            
            code[x_] := If[LessEqual[N[(x + 1.0), $MachinePrecision], 2.0], N[(N[(x * 0.3333333333333333 + -0.5), $MachinePrecision] * N[(x * x), $MachinePrecision] + x), $MachinePrecision], N[(1.0 / 0.5), $MachinePrecision]]
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            \mathbf{if}\;x + 1 \leq 2:\\
            \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)\\
            
            \mathbf{else}:\\
            \;\;\;\;\frac{1}{0.5}\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 2 regimes
            2. if (+.f64 #s(literal 1 binary64) x) < 2

              1. Initial program 8.7%

                \[\log \left(1 + x\right) \]
              2. Add Preprocessing
              3. Taylor expanded in x around 0

                \[\leadsto \color{blue}{x \cdot \left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right)} \]
              4. Step-by-step derivation
                1. *-commutativeN/A

                  \[\leadsto \color{blue}{\left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x} \]
                2. +-commutativeN/A

                  \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) + 1\right)} \cdot x \]
                3. distribute-lft1-inN/A

                  \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x + x} \]
                4. *-commutativeN/A

                  \[\leadsto \color{blue}{\left(\left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot x\right)} \cdot x + x \]
                5. associate-*l*N/A

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

                  \[\leadsto \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot \color{blue}{{x}^{2}} + x \]
                7. lower-fma.f64N/A

                  \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{1}{3} \cdot x - \frac{1}{2}, {x}^{2}, x\right)} \]
                8. sub-negN/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{1}{3} \cdot x + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right)}, {x}^{2}, x\right) \]
                9. *-commutativeN/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{x \cdot \frac{1}{3}} + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right), {x}^{2}, x\right) \]
                10. metadata-evalN/A

                  \[\leadsto \mathsf{fma}\left(x \cdot \frac{1}{3} + \color{blue}{\frac{-1}{2}}, {x}^{2}, x\right) \]
                11. lower-fma.f64N/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right)}, {x}^{2}, x\right) \]
                12. unpow2N/A

                  \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right), \color{blue}{x \cdot x}, x\right) \]
                13. lower-*.f6499.2

                  \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), \color{blue}{x \cdot x}, x\right) \]
              5. Applied rewrites99.2%

                \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)} \]

              if 2 < (+.f64 #s(literal 1 binary64) x)

              1. Initial program 100.0%

                \[\log \left(1 + x\right) \]
              2. Add Preprocessing
              3. Taylor expanded in x around 0

                \[\leadsto \color{blue}{x \cdot \left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right)} \]
              4. Step-by-step derivation
                1. *-commutativeN/A

                  \[\leadsto \color{blue}{\left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x} \]
                2. +-commutativeN/A

                  \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) + 1\right)} \cdot x \]
                3. distribute-lft1-inN/A

                  \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x + x} \]
                4. *-commutativeN/A

                  \[\leadsto \color{blue}{\left(\left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot x\right)} \cdot x + x \]
                5. associate-*l*N/A

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

                  \[\leadsto \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot \color{blue}{{x}^{2}} + x \]
                7. lower-fma.f64N/A

                  \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{1}{3} \cdot x - \frac{1}{2}, {x}^{2}, x\right)} \]
                8. sub-negN/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{1}{3} \cdot x + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right)}, {x}^{2}, x\right) \]
                9. *-commutativeN/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{x \cdot \frac{1}{3}} + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right), {x}^{2}, x\right) \]
                10. metadata-evalN/A

                  \[\leadsto \mathsf{fma}\left(x \cdot \frac{1}{3} + \color{blue}{\frac{-1}{2}}, {x}^{2}, x\right) \]
                11. lower-fma.f64N/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right)}, {x}^{2}, x\right) \]
                12. unpow2N/A

                  \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right), \color{blue}{x \cdot x}, x\right) \]
                13. lower-*.f644.0

                  \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), \color{blue}{x \cdot x}, x\right) \]
              5. Applied rewrites4.0%

                \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)} \]
              6. Step-by-step derivation
                1. Applied rewrites4.0%

                  \[\leadsto \frac{1}{\color{blue}{\frac{1}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)}}} \]
                2. Taylor expanded in x around 0

                  \[\leadsto \frac{1}{\frac{1 + \frac{1}{2} \cdot x}{\color{blue}{x}}} \]
                3. Step-by-step derivation
                  1. Applied rewrites14.5%

                    \[\leadsto \frac{1}{\frac{\mathsf{fma}\left(x, 0.5, 1\right)}{\color{blue}{x}}} \]
                  2. Taylor expanded in x around inf

                    \[\leadsto \frac{1}{\frac{1}{2}} \]
                  3. Step-by-step derivation
                    1. Applied rewrites14.5%

                      \[\leadsto \frac{1}{0.5} \]
                  4. Recombined 2 regimes into one program.
                  5. Final simplification71.1%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{0.5}\\ \end{array} \]
                  6. Add Preprocessing

                  Alternative 6: 70.2% accurate, 4.9× speedup?

                  \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;x \cdot \mathsf{fma}\left(x, -0.5, 1\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{0.5}\\ \end{array} \end{array} \]
                  (FPCore (x)
                   :precision binary64
                   (if (<= (+ x 1.0) 2.0) (* x (fma x -0.5 1.0)) (/ 1.0 0.5)))
                  double code(double x) {
                  	double tmp;
                  	if ((x + 1.0) <= 2.0) {
                  		tmp = x * fma(x, -0.5, 1.0);
                  	} else {
                  		tmp = 1.0 / 0.5;
                  	}
                  	return tmp;
                  }
                  
                  function code(x)
                  	tmp = 0.0
                  	if (Float64(x + 1.0) <= 2.0)
                  		tmp = Float64(x * fma(x, -0.5, 1.0));
                  	else
                  		tmp = Float64(1.0 / 0.5);
                  	end
                  	return tmp
                  end
                  
                  code[x_] := If[LessEqual[N[(x + 1.0), $MachinePrecision], 2.0], N[(x * N[(x * -0.5 + 1.0), $MachinePrecision]), $MachinePrecision], N[(1.0 / 0.5), $MachinePrecision]]
                  
                  \begin{array}{l}
                  
                  \\
                  \begin{array}{l}
                  \mathbf{if}\;x + 1 \leq 2:\\
                  \;\;\;\;x \cdot \mathsf{fma}\left(x, -0.5, 1\right)\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;\frac{1}{0.5}\\
                  
                  
                  \end{array}
                  \end{array}
                  
                  Derivation
                  1. Split input into 2 regimes
                  2. if (+.f64 #s(literal 1 binary64) x) < 2

                    1. Initial program 8.7%

                      \[\log \left(1 + x\right) \]
                    2. Add Preprocessing
                    3. Taylor expanded in x around 0

                      \[\leadsto \color{blue}{x \cdot \left(1 + \frac{-1}{2} \cdot x\right)} \]
                    4. Step-by-step derivation
                      1. +-commutativeN/A

                        \[\leadsto x \cdot \color{blue}{\left(\frac{-1}{2} \cdot x + 1\right)} \]
                      2. distribute-lft-inN/A

                        \[\leadsto \color{blue}{x \cdot \left(\frac{-1}{2} \cdot x\right) + x \cdot 1} \]
                      3. *-rgt-identityN/A

                        \[\leadsto x \cdot \left(\frac{-1}{2} \cdot x\right) + \color{blue}{x} \]
                      4. lower-fma.f64N/A

                        \[\leadsto \color{blue}{\mathsf{fma}\left(x, \frac{-1}{2} \cdot x, x\right)} \]
                      5. *-commutativeN/A

                        \[\leadsto \mathsf{fma}\left(x, \color{blue}{x \cdot \frac{-1}{2}}, x\right) \]
                      6. lower-*.f6498.8

                        \[\leadsto \mathsf{fma}\left(x, \color{blue}{x \cdot -0.5}, x\right) \]
                    5. Applied rewrites98.8%

                      \[\leadsto \color{blue}{\mathsf{fma}\left(x, x \cdot -0.5, x\right)} \]
                    6. Step-by-step derivation
                      1. Applied rewrites98.8%

                        \[\leadsto \mathsf{fma}\left(x, -0.5, 1\right) \cdot \color{blue}{x} \]

                      if 2 < (+.f64 #s(literal 1 binary64) x)

                      1. Initial program 100.0%

                        \[\log \left(1 + x\right) \]
                      2. Add Preprocessing
                      3. Taylor expanded in x around 0

                        \[\leadsto \color{blue}{x \cdot \left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right)} \]
                      4. Step-by-step derivation
                        1. *-commutativeN/A

                          \[\leadsto \color{blue}{\left(1 + x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x} \]
                        2. +-commutativeN/A

                          \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) + 1\right)} \cdot x \]
                        3. distribute-lft1-inN/A

                          \[\leadsto \color{blue}{\left(x \cdot \left(\frac{1}{3} \cdot x - \frac{1}{2}\right)\right) \cdot x + x} \]
                        4. *-commutativeN/A

                          \[\leadsto \color{blue}{\left(\left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot x\right)} \cdot x + x \]
                        5. associate-*l*N/A

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

                          \[\leadsto \left(\frac{1}{3} \cdot x - \frac{1}{2}\right) \cdot \color{blue}{{x}^{2}} + x \]
                        7. lower-fma.f64N/A

                          \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{1}{3} \cdot x - \frac{1}{2}, {x}^{2}, x\right)} \]
                        8. sub-negN/A

                          \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{1}{3} \cdot x + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right)}, {x}^{2}, x\right) \]
                        9. *-commutativeN/A

                          \[\leadsto \mathsf{fma}\left(\color{blue}{x \cdot \frac{1}{3}} + \left(\mathsf{neg}\left(\frac{1}{2}\right)\right), {x}^{2}, x\right) \]
                        10. metadata-evalN/A

                          \[\leadsto \mathsf{fma}\left(x \cdot \frac{1}{3} + \color{blue}{\frac{-1}{2}}, {x}^{2}, x\right) \]
                        11. lower-fma.f64N/A

                          \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right)}, {x}^{2}, x\right) \]
                        12. unpow2N/A

                          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, \frac{1}{3}, \frac{-1}{2}\right), \color{blue}{x \cdot x}, x\right) \]
                        13. lower-*.f644.0

                          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), \color{blue}{x \cdot x}, x\right) \]
                      5. Applied rewrites4.0%

                        \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)} \]
                      6. Step-by-step derivation
                        1. Applied rewrites4.0%

                          \[\leadsto \frac{1}{\color{blue}{\frac{1}{\mathsf{fma}\left(\mathsf{fma}\left(x, 0.3333333333333333, -0.5\right), x \cdot x, x\right)}}} \]
                        2. Taylor expanded in x around 0

                          \[\leadsto \frac{1}{\frac{1 + \frac{1}{2} \cdot x}{\color{blue}{x}}} \]
                        3. Step-by-step derivation
                          1. Applied rewrites14.5%

                            \[\leadsto \frac{1}{\frac{\mathsf{fma}\left(x, 0.5, 1\right)}{\color{blue}{x}}} \]
                          2. Taylor expanded in x around inf

                            \[\leadsto \frac{1}{\frac{1}{2}} \]
                          3. Step-by-step derivation
                            1. Applied rewrites14.5%

                              \[\leadsto \frac{1}{0.5} \]
                          4. Recombined 2 regimes into one program.
                          5. Final simplification70.8%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;x + 1 \leq 2:\\ \;\;\;\;x \cdot \mathsf{fma}\left(x, -0.5, 1\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{1}{0.5}\\ \end{array} \]
                          6. Add Preprocessing

                          Alternative 7: 66.5% accurate, 17.3× speedup?

                          \[\begin{array}{l} \\ x \cdot 1 \end{array} \]
                          (FPCore (x) :precision binary64 (* x 1.0))
                          double code(double x) {
                          	return x * 1.0;
                          }
                          
                          real(8) function code(x)
                              real(8), intent (in) :: x
                              code = x * 1.0d0
                          end function
                          
                          public static double code(double x) {
                          	return x * 1.0;
                          }
                          
                          def code(x):
                          	return x * 1.0
                          
                          function code(x)
                          	return Float64(x * 1.0)
                          end
                          
                          function tmp = code(x)
                          	tmp = x * 1.0;
                          end
                          
                          code[x_] := N[(x * 1.0), $MachinePrecision]
                          
                          \begin{array}{l}
                          
                          \\
                          x \cdot 1
                          \end{array}
                          
                          Derivation
                          1. Initial program 39.0%

                            \[\log \left(1 + x\right) \]
                          2. Add Preprocessing
                          3. Taylor expanded in x around 0

                            \[\leadsto \color{blue}{x \cdot \left(1 + \frac{-1}{2} \cdot x\right)} \]
                          4. Step-by-step derivation
                            1. +-commutativeN/A

                              \[\leadsto x \cdot \color{blue}{\left(\frac{-1}{2} \cdot x + 1\right)} \]
                            2. distribute-lft-inN/A

                              \[\leadsto \color{blue}{x \cdot \left(\frac{-1}{2} \cdot x\right) + x \cdot 1} \]
                            3. *-rgt-identityN/A

                              \[\leadsto x \cdot \left(\frac{-1}{2} \cdot x\right) + \color{blue}{x} \]
                            4. lower-fma.f64N/A

                              \[\leadsto \color{blue}{\mathsf{fma}\left(x, \frac{-1}{2} \cdot x, x\right)} \]
                            5. *-commutativeN/A

                              \[\leadsto \mathsf{fma}\left(x, \color{blue}{x \cdot \frac{-1}{2}}, x\right) \]
                            6. lower-*.f6466.3

                              \[\leadsto \mathsf{fma}\left(x, \color{blue}{x \cdot -0.5}, x\right) \]
                          5. Applied rewrites66.3%

                            \[\leadsto \color{blue}{\mathsf{fma}\left(x, x \cdot -0.5, x\right)} \]
                          6. Step-by-step derivation
                            1. Applied rewrites66.3%

                              \[\leadsto \mathsf{fma}\left(x, -0.5, 1\right) \cdot \color{blue}{x} \]
                            2. Taylor expanded in x around 0

                              \[\leadsto 1 \cdot x \]
                            3. Step-by-step derivation
                              1. Applied rewrites67.2%

                                \[\leadsto 1 \cdot x \]
                              2. Final simplification67.2%

                                \[\leadsto x \cdot 1 \]
                              3. Add Preprocessing

                              Developer Target 1: 99.6% accurate, 0.8× speedup?

                              \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;1 + x = 1:\\ \;\;\;\;x\\ \mathbf{else}:\\ \;\;\;\;\frac{x \cdot \log \left(1 + x\right)}{\left(1 + x\right) - 1}\\ \end{array} \end{array} \]
                              (FPCore (x)
                               :precision binary64
                               (if (== (+ 1.0 x) 1.0) x (/ (* x (log (+ 1.0 x))) (- (+ 1.0 x) 1.0))))
                              double code(double x) {
                              	double tmp;
                              	if ((1.0 + x) == 1.0) {
                              		tmp = x;
                              	} else {
                              		tmp = (x * log((1.0 + x))) / ((1.0 + x) - 1.0);
                              	}
                              	return tmp;
                              }
                              
                              real(8) function code(x)
                                  real(8), intent (in) :: x
                                  real(8) :: tmp
                                  if ((1.0d0 + x) == 1.0d0) then
                                      tmp = x
                                  else
                                      tmp = (x * log((1.0d0 + x))) / ((1.0d0 + x) - 1.0d0)
                                  end if
                                  code = tmp
                              end function
                              
                              public static double code(double x) {
                              	double tmp;
                              	if ((1.0 + x) == 1.0) {
                              		tmp = x;
                              	} else {
                              		tmp = (x * Math.log((1.0 + x))) / ((1.0 + x) - 1.0);
                              	}
                              	return tmp;
                              }
                              
                              def code(x):
                              	tmp = 0
                              	if (1.0 + x) == 1.0:
                              		tmp = x
                              	else:
                              		tmp = (x * math.log((1.0 + x))) / ((1.0 + x) - 1.0)
                              	return tmp
                              
                              function code(x)
                              	tmp = 0.0
                              	if (Float64(1.0 + x) == 1.0)
                              		tmp = x;
                              	else
                              		tmp = Float64(Float64(x * log(Float64(1.0 + x))) / Float64(Float64(1.0 + x) - 1.0));
                              	end
                              	return tmp
                              end
                              
                              function tmp_2 = code(x)
                              	tmp = 0.0;
                              	if ((1.0 + x) == 1.0)
                              		tmp = x;
                              	else
                              		tmp = (x * log((1.0 + x))) / ((1.0 + x) - 1.0);
                              	end
                              	tmp_2 = tmp;
                              end
                              
                              code[x_] := If[Equal[N[(1.0 + x), $MachinePrecision], 1.0], x, N[(N[(x * N[Log[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(N[(1.0 + x), $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]]
                              
                              \begin{array}{l}
                              
                              \\
                              \begin{array}{l}
                              \mathbf{if}\;1 + x = 1:\\
                              \;\;\;\;x\\
                              
                              \mathbf{else}:\\
                              \;\;\;\;\frac{x \cdot \log \left(1 + x\right)}{\left(1 + x\right) - 1}\\
                              
                              
                              \end{array}
                              \end{array}
                              

                              Reproduce

                              ?
                              herbie shell --seed 2024223 
                              (FPCore (x)
                                :name "ln(1 + x)"
                                :precision binary64
                              
                                :alt
                                (! :herbie-platform default (if (== (+ 1 x) 1) x (/ (* x (log (+ 1 x))) (- (+ 1 x) 1))))
                              
                                (log (+ 1.0 x)))