
(FPCore (x) :precision binary64 (atanh x))
double code(double x) {
return atanh(x);
}
def code(x): return math.atanh(x)
function code(x) return atanh(x) end
function tmp = code(x) tmp = atanh(x); end
code[x_] := N[ArcTanh[x], $MachinePrecision]
\begin{array}{l}
\\
\tanh^{-1} x
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 6 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (* 0.5 (log1p (/ (* 2.0 x) (- 1.0 x)))))
double code(double x) {
return 0.5 * log1p(((2.0 * x) / (1.0 - x)));
}
public static double code(double x) {
return 0.5 * Math.log1p(((2.0 * x) / (1.0 - x)));
}
def code(x): return 0.5 * math.log1p(((2.0 * x) / (1.0 - x)))
function code(x) return Float64(0.5 * log1p(Float64(Float64(2.0 * x) / Float64(1.0 - x)))) end
code[x_] := N[(0.5 * N[Log[1 + N[(N[(2.0 * x), $MachinePrecision] / N[(1.0 - x), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \mathsf{log1p}\left(\frac{2 \cdot x}{1 - x}\right)
\end{array}
(FPCore (x) :precision binary64 (* 0.5 (log1p (/ (* 2.0 x) (- 1.0 x)))))
double code(double x) {
return 0.5 * log1p(((2.0 * x) / (1.0 - x)));
}
public static double code(double x) {
return 0.5 * Math.log1p(((2.0 * x) / (1.0 - x)));
}
def code(x): return 0.5 * math.log1p(((2.0 * x) / (1.0 - x)))
function code(x) return Float64(0.5 * log1p(Float64(Float64(2.0 * x) / Float64(1.0 - x)))) end
code[x_] := N[(0.5 * N[Log[1 + N[(N[(2.0 * x), $MachinePrecision] / N[(1.0 - x), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
0.5 \cdot \mathsf{log1p}\left(\frac{2 \cdot x}{1 - x}\right)
\end{array}
Initial program 100.0%
(FPCore (x) :precision binary64 (fma x (* (* x x) (fma (* x x) (fma (* x x) 0.14285714285714285 0.2) 0.3333333333333333)) x))
double code(double x) {
return fma(x, ((x * x) * fma((x * x), fma((x * x), 0.14285714285714285, 0.2), 0.3333333333333333)), x);
}
function code(x) return fma(x, Float64(Float64(x * x) * fma(Float64(x * x), fma(Float64(x * x), 0.14285714285714285, 0.2), 0.3333333333333333)), x) end
code[x_] := N[(x * N[(N[(x * x), $MachinePrecision] * N[(N[(x * x), $MachinePrecision] * N[(N[(x * x), $MachinePrecision] * 0.14285714285714285 + 0.2), $MachinePrecision] + 0.3333333333333333), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(x, \left(x \cdot x\right) \cdot \mathsf{fma}\left(x \cdot x, \mathsf{fma}\left(x \cdot x, 0.14285714285714285, 0.2\right), 0.3333333333333333\right), x\right)
\end{array}
Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f64N/A
lower-*.f64N/A
unpow2N/A
lower-*.f64N/A
+-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f64N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f6499.6
Simplified99.6%
(FPCore (x) :precision binary64 (fma (* x (* x x)) (fma x (* x 0.2) 0.3333333333333333) x))
double code(double x) {
return fma((x * (x * x)), fma(x, (x * 0.2), 0.3333333333333333), x);
}
function code(x) return fma(Float64(x * Float64(x * x)), fma(x, Float64(x * 0.2), 0.3333333333333333), x) end
code[x_] := N[(N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision] * N[(x * N[(x * 0.2), $MachinePrecision] + 0.3333333333333333), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(x \cdot \left(x \cdot x\right), \mathsf{fma}\left(x, x \cdot 0.2, 0.3333333333333333\right), x\right)
\end{array}
Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f64N/A
unpow2N/A
associate-*l*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f6499.6
Simplified99.6%
lift-*.f64N/A
lift-fma.f64N/A
lift-*.f64N/A
lift-*.f64N/A
lift-*.f64N/A
lift-*.f64N/A
associate-*r*N/A
lift-*.f64N/A
associate-*r*N/A
lift-*.f64N/A
lower-fma.f6499.6
Applied egg-rr99.6%
(FPCore (x) :precision binary64 (fma x (* x (* x (fma (* x x) 0.2 0.3333333333333333))) x))
double code(double x) {
return fma(x, (x * (x * fma((x * x), 0.2, 0.3333333333333333))), x);
}
function code(x) return fma(x, Float64(x * Float64(x * fma(Float64(x * x), 0.2, 0.3333333333333333))), x) end
code[x_] := N[(x * N[(x * N[(x * N[(N[(x * x), $MachinePrecision] * 0.2 + 0.3333333333333333), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(x, x \cdot \left(x \cdot \mathsf{fma}\left(x \cdot x, 0.2, 0.3333333333333333\right)\right), x\right)
\end{array}
Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f64N/A
unpow2N/A
associate-*l*N/A
*-commutativeN/A
lower-*.f64N/A
*-commutativeN/A
lower-*.f64N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f6499.6
Simplified99.6%
(FPCore (x) :precision binary64 (fma (* x x) (* x 0.3333333333333333) x))
double code(double x) {
return fma((x * x), (x * 0.3333333333333333), x);
}
function code(x) return fma(Float64(x * x), Float64(x * 0.3333333333333333), x) end
code[x_] := N[(N[(x * x), $MachinePrecision] * N[(x * 0.3333333333333333), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}
\\
\mathsf{fma}\left(x \cdot x, x \cdot 0.3333333333333333, x\right)
\end{array}
Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
distribute-lft-inN/A
associate-*r*N/A
*-commutativeN/A
*-rgt-identityN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f64N/A
lower-*.f6499.4
Simplified99.4%
(FPCore (x) :precision binary64 x)
double code(double x) {
return x;
}
real(8) function code(x)
real(8), intent (in) :: x
code = x
end function
public static double code(double x) {
return x;
}
def code(x): return x
function code(x) return x end
function tmp = code(x) tmp = x; end
code[x_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 100.0%
Taylor expanded in x around 0
*-commutativeN/A
lower-*.f6499.0
Simplified99.0%
*-commutativeN/A
associate-*r*N/A
metadata-evalN/A
*-commutativeN/A
*-rgt-identity99.0
Applied egg-rr99.0%
herbie shell --seed 2024207
(FPCore (x)
:name "Rust f64::atanh"
:precision binary64
(* 0.5 (log1p (/ (* 2.0 x) (- 1.0 x)))))