
(FPCore (x y) :precision binary64 (- (/ 2.0 (+ 1.0 (exp (* -2.0 x)))) 1.0))
double code(double x, double y) {
return (2.0 / (1.0 + exp((-2.0 * x)))) - 1.0;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (2.0d0 / (1.0d0 + exp(((-2.0d0) * x)))) - 1.0d0
end function
public static double code(double x, double y) {
return (2.0 / (1.0 + Math.exp((-2.0 * x)))) - 1.0;
}
def code(x, y): return (2.0 / (1.0 + math.exp((-2.0 * x)))) - 1.0
function code(x, y) return Float64(Float64(2.0 / Float64(1.0 + exp(Float64(-2.0 * x)))) - 1.0) end
function tmp = code(x, y) tmp = (2.0 / (1.0 + exp((-2.0 * x)))) - 1.0; end
code[x_, y_] := N[(N[(2.0 / N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision]
\begin{array}{l}
\\
\frac{2}{1 + e^{-2 \cdot x}} - 1
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 13 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y) :precision binary64 (- (/ 2.0 (+ 1.0 (exp (* -2.0 x)))) 1.0))
double code(double x, double y) {
return (2.0 / (1.0 + exp((-2.0 * x)))) - 1.0;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (2.0d0 / (1.0d0 + exp(((-2.0d0) * x)))) - 1.0d0
end function
public static double code(double x, double y) {
return (2.0 / (1.0 + Math.exp((-2.0 * x)))) - 1.0;
}
def code(x, y): return (2.0 / (1.0 + math.exp((-2.0 * x)))) - 1.0
function code(x, y) return Float64(Float64(2.0 / Float64(1.0 + exp(Float64(-2.0 * x)))) - 1.0) end
function tmp = code(x, y) tmp = (2.0 / (1.0 + exp((-2.0 * x)))) - 1.0; end
code[x_, y_] := N[(N[(2.0 / N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision]
\begin{array}{l}
\\
\frac{2}{1 + e^{-2 \cdot x}} - 1
\end{array}
(FPCore (x y)
:precision binary64
(let* ((t_0 (+ 1.0 (exp (* -2.0 x)))) (t_1 (/ 2.0 t_0)))
(if (<= (* -2.0 x) -5.0)
(+ t_1 -1.0)
(if (<= (* -2.0 x) 1e-6)
(fma
(fma
(* x x)
(fma (* x x) -0.05396825396825397 0.13333333333333333)
-0.3333333333333333)
(* x (* x x))
x)
(fma (sqrt t_1) (* (sqrt 2.0) (sqrt (/ 1.0 t_0))) -1.0)))))
double code(double x, double y) {
double t_0 = 1.0 + exp((-2.0 * x));
double t_1 = 2.0 / t_0;
double tmp;
if ((-2.0 * x) <= -5.0) {
tmp = t_1 + -1.0;
} else if ((-2.0 * x) <= 1e-6) {
tmp = fma(fma((x * x), fma((x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), (x * (x * x)), x);
} else {
tmp = fma(sqrt(t_1), (sqrt(2.0) * sqrt((1.0 / t_0))), -1.0);
}
return tmp;
}
function code(x, y) t_0 = Float64(1.0 + exp(Float64(-2.0 * x))) t_1 = Float64(2.0 / t_0) tmp = 0.0 if (Float64(-2.0 * x) <= -5.0) tmp = Float64(t_1 + -1.0); elseif (Float64(-2.0 * x) <= 1e-6) tmp = fma(fma(Float64(x * x), fma(Float64(x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), Float64(x * Float64(x * x)), x); else tmp = fma(sqrt(t_1), Float64(sqrt(2.0) * sqrt(Float64(1.0 / t_0))), -1.0); end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(2.0 / t$95$0), $MachinePrecision]}, If[LessEqual[N[(-2.0 * x), $MachinePrecision], -5.0], N[(t$95$1 + -1.0), $MachinePrecision], If[LessEqual[N[(-2.0 * x), $MachinePrecision], 1e-6], N[(N[(N[(x * x), $MachinePrecision] * N[(N[(x * x), $MachinePrecision] * -0.05396825396825397 + 0.13333333333333333), $MachinePrecision] + -0.3333333333333333), $MachinePrecision] * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision], N[(N[Sqrt[t$95$1], $MachinePrecision] * N[(N[Sqrt[2.0], $MachinePrecision] * N[Sqrt[N[(1.0 / t$95$0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 1 + e^{-2 \cdot x}\\
t_1 := \frac{2}{t\_0}\\
\mathbf{if}\;-2 \cdot x \leq -5:\\
\;\;\;\;t\_1 + -1\\
\mathbf{elif}\;-2 \cdot x \leq 10^{-6}:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x \cdot x, \mathsf{fma}\left(x \cdot x, -0.05396825396825397, 0.13333333333333333\right), -0.3333333333333333\right), x \cdot \left(x \cdot x\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\sqrt{t\_1}, \sqrt{2} \cdot \sqrt{\frac{1}{t\_0}}, -1\right)\\
\end{array}
\end{array}
if (*.f64 #s(literal -2 binary64) x) < -5Initial program 100.0%
if -5 < (*.f64 #s(literal -2 binary64) x) < 9.99999999999999955e-7Initial program 8.3%
Taylor expanded in x around 0
+-commutativeN/A
distribute-rgt-inN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lft-identityN/A
lower-fma.f64N/A
Applied rewrites100.0%
if 9.99999999999999955e-7 < (*.f64 #s(literal -2 binary64) x) Initial program 100.0%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites100.0%
Taylor expanded in x around inf
lower-*.f64N/A
lower-sqrt.f64N/A
lower-sqrt.f64N/A
lower-/.f64N/A
lower-+.f64N/A
lower-exp.f64N/A
*-commutativeN/A
lower-*.f64100.0
Applied rewrites100.0%
lift-pow.f64N/A
lift-*.f64N/A
lift-+.f64N/A
lift-exp.f64N/A
lift-*.f64N/A
unpow1N/A
metadata-evalN/A
sqrt-pow1N/A
pow2N/A
lower-sqrt.f64N/A
pow2N/A
lift-*.f64N/A
lift-exp.f64N/A
lift-+.f64N/A
lift-*.f64N/A
Applied rewrites100.0%
Final simplification100.0%
(FPCore (x y) :precision binary64 (if (<= (+ 1.0 (exp (* -2.0 x))) 2.5) x (+ (/ 2.0 (fma x (fma x (fma x -1.3333333333333333 2.0) -2.0) 2.0)) -1.0)))
double code(double x, double y) {
double tmp;
if ((1.0 + exp((-2.0 * x))) <= 2.5) {
tmp = x;
} else {
tmp = (2.0 / fma(x, fma(x, fma(x, -1.3333333333333333, 2.0), -2.0), 2.0)) + -1.0;
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(1.0 + exp(Float64(-2.0 * x))) <= 2.5) tmp = x; else tmp = Float64(Float64(2.0 / fma(x, fma(x, fma(x, -1.3333333333333333, 2.0), -2.0), 2.0)) + -1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 2.5], x, N[(N[(2.0 / N[(x * N[(x * N[(x * -1.3333333333333333 + 2.0), $MachinePrecision] + -2.0), $MachinePrecision] + 2.0), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 + e^{-2 \cdot x} \leq 2.5:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\mathsf{fma}\left(x, \mathsf{fma}\left(x, \mathsf{fma}\left(x, -1.3333333333333333, 2\right), -2\right), 2\right)} + -1\\
\end{array}
\end{array}
if (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) < 2.5Initial program 44.2%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites43.6%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity62.5
Applied rewrites62.5%
if 2.5 < (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) Initial program 100.0%
Taylor expanded in x around 0
+-commutativeN/A
lower-fma.f64N/A
sub-negN/A
metadata-evalN/A
lower-fma.f64N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f6499.0
Applied rewrites99.0%
Final simplification72.0%
(FPCore (x y)
:precision binary64
(let* ((t_0 (+ (/ 2.0 (+ 1.0 (exp (* -2.0 x)))) -1.0)))
(if (<= (* -2.0 x) -5.0)
t_0
(if (<= (* -2.0 x) 1e-6)
(fma
(fma
(* x x)
(fma (* x x) -0.05396825396825397 0.13333333333333333)
-0.3333333333333333)
(* x (* x x))
x)
t_0))))
double code(double x, double y) {
double t_0 = (2.0 / (1.0 + exp((-2.0 * x)))) + -1.0;
double tmp;
if ((-2.0 * x) <= -5.0) {
tmp = t_0;
} else if ((-2.0 * x) <= 1e-6) {
tmp = fma(fma((x * x), fma((x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), (x * (x * x)), x);
} else {
tmp = t_0;
}
return tmp;
}
function code(x, y) t_0 = Float64(Float64(2.0 / Float64(1.0 + exp(Float64(-2.0 * x)))) + -1.0) tmp = 0.0 if (Float64(-2.0 * x) <= -5.0) tmp = t_0; elseif (Float64(-2.0 * x) <= 1e-6) tmp = fma(fma(Float64(x * x), fma(Float64(x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), Float64(x * Float64(x * x)), x); else tmp = t_0; end return tmp end
code[x_, y_] := Block[{t$95$0 = N[(N[(2.0 / N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]}, If[LessEqual[N[(-2.0 * x), $MachinePrecision], -5.0], t$95$0, If[LessEqual[N[(-2.0 * x), $MachinePrecision], 1e-6], N[(N[(N[(x * x), $MachinePrecision] * N[(N[(x * x), $MachinePrecision] * -0.05396825396825397 + 0.13333333333333333), $MachinePrecision] + -0.3333333333333333), $MachinePrecision] * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision], t$95$0]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{2}{1 + e^{-2 \cdot x}} + -1\\
\mathbf{if}\;-2 \cdot x \leq -5:\\
\;\;\;\;t\_0\\
\mathbf{elif}\;-2 \cdot x \leq 10^{-6}:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x \cdot x, \mathsf{fma}\left(x \cdot x, -0.05396825396825397, 0.13333333333333333\right), -0.3333333333333333\right), x \cdot \left(x \cdot x\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;t\_0\\
\end{array}
\end{array}
if (*.f64 #s(literal -2 binary64) x) < -5 or 9.99999999999999955e-7 < (*.f64 #s(literal -2 binary64) x) Initial program 100.0%
if -5 < (*.f64 #s(literal -2 binary64) x) < 9.99999999999999955e-7Initial program 8.3%
Taylor expanded in x around 0
+-commutativeN/A
distribute-rgt-inN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lft-identityN/A
lower-fma.f64N/A
Applied rewrites100.0%
Final simplification100.0%
(FPCore (x y) :precision binary64 (if (<= (+ 1.0 (exp (* -2.0 x))) 5.0) x (+ (/ 2.0 (fma (* x (+ x x)) x 2.0)) -1.0)))
double code(double x, double y) {
double tmp;
if ((1.0 + exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / fma((x * (x + x)), x, 2.0)) + -1.0;
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(1.0 + exp(Float64(-2.0 * x))) <= 5.0) tmp = x; else tmp = Float64(Float64(2.0 / fma(Float64(x * Float64(x + x)), x, 2.0)) + -1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 5.0], x, N[(N[(2.0 / N[(N[(x * N[(x + x), $MachinePrecision]), $MachinePrecision] * x + 2.0), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 + e^{-2 \cdot x} \leq 5:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\mathsf{fma}\left(x \cdot \left(x + x\right), x, 2\right)} + -1\\
\end{array}
\end{array}
if (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) < 5Initial program 44.5%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites43.9%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity62.3
Applied rewrites62.3%
if 5 < (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.7%
Applied rewrites100.0%
Final simplification72.0%
(FPCore (x y) :precision binary64 (if (<= (+ 1.0 (exp (* -2.0 x))) 5.0) x (+ (/ 2.0 (- 2.0 (* (* x x) 4.0))) -1.0)))
double code(double x, double y) {
double tmp;
if ((1.0 + exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / (2.0 - ((x * x) * 4.0))) + -1.0;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((1.0d0 + exp(((-2.0d0) * x))) <= 5.0d0) then
tmp = x
else
tmp = (2.0d0 / (2.0d0 - ((x * x) * 4.0d0))) + (-1.0d0)
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((1.0 + Math.exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / (2.0 - ((x * x) * 4.0))) + -1.0;
}
return tmp;
}
def code(x, y): tmp = 0 if (1.0 + math.exp((-2.0 * x))) <= 5.0: tmp = x else: tmp = (2.0 / (2.0 - ((x * x) * 4.0))) + -1.0 return tmp
function code(x, y) tmp = 0.0 if (Float64(1.0 + exp(Float64(-2.0 * x))) <= 5.0) tmp = x; else tmp = Float64(Float64(2.0 / Float64(2.0 - Float64(Float64(x * x) * 4.0))) + -1.0); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((1.0 + exp((-2.0 * x))) <= 5.0) tmp = x; else tmp = (2.0 / (2.0 - ((x * x) * 4.0))) + -1.0; end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 5.0], x, N[(N[(2.0 / N[(2.0 - N[(N[(x * x), $MachinePrecision] * 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 + e^{-2 \cdot x} \leq 5:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{2 - \left(x \cdot x\right) \cdot 4} + -1\\
\end{array}
\end{array}
if (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) < 5Initial program 44.5%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites43.9%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity62.3
Applied rewrites62.3%
if 5 < (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.8%
Final simplification72.0%
(FPCore (x y) :precision binary64 (if (<= (+ 1.0 (exp (* -2.0 x))) 5.0) x (+ (/ 2.0 (* x (* x -4.0))) -1.0)))
double code(double x, double y) {
double tmp;
if ((1.0 + exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / (x * (x * -4.0))) + -1.0;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((1.0d0 + exp(((-2.0d0) * x))) <= 5.0d0) then
tmp = x
else
tmp = (2.0d0 / (x * (x * (-4.0d0)))) + (-1.0d0)
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((1.0 + Math.exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / (x * (x * -4.0))) + -1.0;
}
return tmp;
}
def code(x, y): tmp = 0 if (1.0 + math.exp((-2.0 * x))) <= 5.0: tmp = x else: tmp = (2.0 / (x * (x * -4.0))) + -1.0 return tmp
function code(x, y) tmp = 0.0 if (Float64(1.0 + exp(Float64(-2.0 * x))) <= 5.0) tmp = x; else tmp = Float64(Float64(2.0 / Float64(x * Float64(x * -4.0))) + -1.0); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((1.0 + exp((-2.0 * x))) <= 5.0) tmp = x; else tmp = (2.0 / (x * (x * -4.0))) + -1.0; end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 5.0], x, N[(N[(2.0 / N[(x * N[(x * -4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 + e^{-2 \cdot x} \leq 5:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{x \cdot \left(x \cdot -4\right)} + -1\\
\end{array}
\end{array}
if (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) < 5Initial program 44.5%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites43.9%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity62.3
Applied rewrites62.3%
if 5 < (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.8%
Taylor expanded in x around inf
Applied rewrites99.8%
Final simplification72.0%
(FPCore (x y) :precision binary64 (if (<= (+ 1.0 (exp (* -2.0 x))) 5.0) x (+ (/ 2.0 (fma (+ x x) x 2.0)) -1.0)))
double code(double x, double y) {
double tmp;
if ((1.0 + exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / fma((x + x), x, 2.0)) + -1.0;
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(1.0 + exp(Float64(-2.0 * x))) <= 5.0) tmp = x; else tmp = Float64(Float64(2.0 / fma(Float64(x + x), x, 2.0)) + -1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 5.0], x, N[(N[(2.0 / N[(N[(x + x), $MachinePrecision] * x + 2.0), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 + e^{-2 \cdot x} \leq 5:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\mathsf{fma}\left(x + x, x, 2\right)} + -1\\
\end{array}
\end{array}
if (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) < 5Initial program 44.5%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites43.9%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity62.3
Applied rewrites62.3%
if 5 < (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.7%
Final simplification71.9%
(FPCore (x y) :precision binary64 (if (<= (+ 1.0 (exp (* -2.0 x))) 5.0) x (+ (/ 2.0 (fma 4.0 x 2.0)) -1.0)))
double code(double x, double y) {
double tmp;
if ((1.0 + exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / fma(4.0, x, 2.0)) + -1.0;
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(1.0 + exp(Float64(-2.0 * x))) <= 5.0) tmp = x; else tmp = Float64(Float64(2.0 / fma(4.0, x, 2.0)) + -1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 5.0], x, N[(N[(2.0 / N[(4.0 * x + 2.0), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 + e^{-2 \cdot x} \leq 5:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\mathsf{fma}\left(4, x, 2\right)} + -1\\
\end{array}
\end{array}
if (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) < 5Initial program 44.5%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites43.9%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity62.3
Applied rewrites62.3%
if 5 < (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.3%
Final simplification71.8%
(FPCore (x y) :precision binary64 (if (<= (+ 1.0 (exp (* -2.0 x))) 5.0) x (+ (/ 2.0 (+ x x)) -1.0)))
double code(double x, double y) {
double tmp;
if ((1.0 + exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / (x + x)) + -1.0;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((1.0d0 + exp(((-2.0d0) * x))) <= 5.0d0) then
tmp = x
else
tmp = (2.0d0 / (x + x)) + (-1.0d0)
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((1.0 + Math.exp((-2.0 * x))) <= 5.0) {
tmp = x;
} else {
tmp = (2.0 / (x + x)) + -1.0;
}
return tmp;
}
def code(x, y): tmp = 0 if (1.0 + math.exp((-2.0 * x))) <= 5.0: tmp = x else: tmp = (2.0 / (x + x)) + -1.0 return tmp
function code(x, y) tmp = 0.0 if (Float64(1.0 + exp(Float64(-2.0 * x))) <= 5.0) tmp = x; else tmp = Float64(Float64(2.0 / Float64(x + x)) + -1.0); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((1.0 + exp((-2.0 * x))) <= 5.0) tmp = x; else tmp = (2.0 / (x + x)) + -1.0; end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], 5.0], x, N[(N[(2.0 / N[(x + x), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 + e^{-2 \cdot x} \leq 5:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{x + x} + -1\\
\end{array}
\end{array}
if (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) < 5Initial program 44.5%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites43.9%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity62.3
Applied rewrites62.3%
if 5 < (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) x))) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Taylor expanded in x around inf
Applied rewrites99.2%
Applied rewrites99.3%
Final simplification71.8%
(FPCore (x y)
:precision binary64
(if (<= (* -2.0 x) -5.0)
(+ (/ 2.0 (+ 2.0 (/ (+ x x) (- (- (+ x x) (+ x x)) (+ x x))))) -1.0)
(if (<= (* -2.0 x) 1.0)
(fma
(fma
(* x x)
(fma (* x x) -0.05396825396825397 0.13333333333333333)
-0.3333333333333333)
(* x (* x x))
x)
(+ (/ 2.0 (fma (* x (+ x x)) x 2.0)) -1.0))))
double code(double x, double y) {
double tmp;
if ((-2.0 * x) <= -5.0) {
tmp = (2.0 / (2.0 + ((x + x) / (((x + x) - (x + x)) - (x + x))))) + -1.0;
} else if ((-2.0 * x) <= 1.0) {
tmp = fma(fma((x * x), fma((x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), (x * (x * x)), x);
} else {
tmp = (2.0 / fma((x * (x + x)), x, 2.0)) + -1.0;
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(-2.0 * x) <= -5.0) tmp = Float64(Float64(2.0 / Float64(2.0 + Float64(Float64(x + x) / Float64(Float64(Float64(x + x) - Float64(x + x)) - Float64(x + x))))) + -1.0); elseif (Float64(-2.0 * x) <= 1.0) tmp = fma(fma(Float64(x * x), fma(Float64(x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), Float64(x * Float64(x * x)), x); else tmp = Float64(Float64(2.0 / fma(Float64(x * Float64(x + x)), x, 2.0)) + -1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(-2.0 * x), $MachinePrecision], -5.0], N[(N[(2.0 / N[(2.0 + N[(N[(x + x), $MachinePrecision] / N[(N[(N[(x + x), $MachinePrecision] - N[(x + x), $MachinePrecision]), $MachinePrecision] - N[(x + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision], If[LessEqual[N[(-2.0 * x), $MachinePrecision], 1.0], N[(N[(N[(x * x), $MachinePrecision] * N[(N[(x * x), $MachinePrecision] * -0.05396825396825397 + 0.13333333333333333), $MachinePrecision] + -0.3333333333333333), $MachinePrecision] * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision], N[(N[(2.0 / N[(N[(x * N[(x + x), $MachinePrecision]), $MachinePrecision] * x + 2.0), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-2 \cdot x \leq -5:\\
\;\;\;\;\frac{2}{2 + \frac{x + x}{\left(\left(x + x\right) - \left(x + x\right)\right) - \left(x + x\right)}} + -1\\
\mathbf{elif}\;-2 \cdot x \leq 1:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x \cdot x, \mathsf{fma}\left(x \cdot x, -0.05396825396825397, 0.13333333333333333\right), -0.3333333333333333\right), x \cdot \left(x \cdot x\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\mathsf{fma}\left(x \cdot \left(x + x\right), x, 2\right)} + -1\\
\end{array}
\end{array}
if (*.f64 #s(literal -2 binary64) x) < -5Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f641.6
Applied rewrites1.6%
Applied rewrites99.1%
if -5 < (*.f64 #s(literal -2 binary64) x) < 1Initial program 9.1%
Taylor expanded in x around 0
+-commutativeN/A
distribute-rgt-inN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lft-identityN/A
lower-fma.f64N/A
Applied rewrites99.6%
if 1 < (*.f64 #s(literal -2 binary64) x) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.7%
Applied rewrites100.0%
Final simplification99.5%
(FPCore (x y)
:precision binary64
(if (<= (* -2.0 x) -5.0)
(+ (/ 2.0 (/ (fma 2.0 x -4.0) (+ -2.0 (+ x x)))) -1.0)
(if (<= (* -2.0 x) 1.0)
(fma
(fma
(* x x)
(fma (* x x) -0.05396825396825397 0.13333333333333333)
-0.3333333333333333)
(* x (* x x))
x)
(+ (/ 2.0 (fma (* x (+ x x)) x 2.0)) -1.0))))
double code(double x, double y) {
double tmp;
if ((-2.0 * x) <= -5.0) {
tmp = (2.0 / (fma(2.0, x, -4.0) / (-2.0 + (x + x)))) + -1.0;
} else if ((-2.0 * x) <= 1.0) {
tmp = fma(fma((x * x), fma((x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), (x * (x * x)), x);
} else {
tmp = (2.0 / fma((x * (x + x)), x, 2.0)) + -1.0;
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(-2.0 * x) <= -5.0) tmp = Float64(Float64(2.0 / Float64(fma(2.0, x, -4.0) / Float64(-2.0 + Float64(x + x)))) + -1.0); elseif (Float64(-2.0 * x) <= 1.0) tmp = fma(fma(Float64(x * x), fma(Float64(x * x), -0.05396825396825397, 0.13333333333333333), -0.3333333333333333), Float64(x * Float64(x * x)), x); else tmp = Float64(Float64(2.0 / fma(Float64(x * Float64(x + x)), x, 2.0)) + -1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(-2.0 * x), $MachinePrecision], -5.0], N[(N[(2.0 / N[(N[(2.0 * x + -4.0), $MachinePrecision] / N[(-2.0 + N[(x + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision], If[LessEqual[N[(-2.0 * x), $MachinePrecision], 1.0], N[(N[(N[(x * x), $MachinePrecision] * N[(N[(x * x), $MachinePrecision] * -0.05396825396825397 + 0.13333333333333333), $MachinePrecision] + -0.3333333333333333), $MachinePrecision] * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision], N[(N[(2.0 / N[(N[(x * N[(x + x), $MachinePrecision]), $MachinePrecision] * x + 2.0), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-2 \cdot x \leq -5:\\
\;\;\;\;\frac{2}{\frac{\mathsf{fma}\left(2, x, -4\right)}{-2 + \left(x + x\right)}} + -1\\
\mathbf{elif}\;-2 \cdot x \leq 1:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x \cdot x, \mathsf{fma}\left(x \cdot x, -0.05396825396825397, 0.13333333333333333\right), -0.3333333333333333\right), x \cdot \left(x \cdot x\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\mathsf{fma}\left(x \cdot \left(x + x\right), x, 2\right)} + -1\\
\end{array}
\end{array}
if (*.f64 #s(literal -2 binary64) x) < -5Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f641.6
Applied rewrites1.6%
Applied rewrites1.6%
Applied rewrites1.6%
Applied rewrites96.7%
if -5 < (*.f64 #s(literal -2 binary64) x) < 1Initial program 9.1%
Taylor expanded in x around 0
+-commutativeN/A
distribute-rgt-inN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-lft-identityN/A
lower-fma.f64N/A
Applied rewrites99.6%
if 1 < (*.f64 #s(literal -2 binary64) x) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.7%
Applied rewrites100.0%
Final simplification98.8%
(FPCore (x y)
:precision binary64
(if (<= (* -2.0 x) -5.0)
(+ (/ 2.0 (/ (fma 2.0 x -4.0) (+ -2.0 (+ x x)))) -1.0)
(if (<= (* -2.0 x) 1.0)
(fma
(fma (* x x) 0.13333333333333333 -0.3333333333333333)
(* x (* x x))
x)
(+ (/ 2.0 (fma (* x (+ x x)) x 2.0)) -1.0))))
double code(double x, double y) {
double tmp;
if ((-2.0 * x) <= -5.0) {
tmp = (2.0 / (fma(2.0, x, -4.0) / (-2.0 + (x + x)))) + -1.0;
} else if ((-2.0 * x) <= 1.0) {
tmp = fma(fma((x * x), 0.13333333333333333, -0.3333333333333333), (x * (x * x)), x);
} else {
tmp = (2.0 / fma((x * (x + x)), x, 2.0)) + -1.0;
}
return tmp;
}
function code(x, y) tmp = 0.0 if (Float64(-2.0 * x) <= -5.0) tmp = Float64(Float64(2.0 / Float64(fma(2.0, x, -4.0) / Float64(-2.0 + Float64(x + x)))) + -1.0); elseif (Float64(-2.0 * x) <= 1.0) tmp = fma(fma(Float64(x * x), 0.13333333333333333, -0.3333333333333333), Float64(x * Float64(x * x)), x); else tmp = Float64(Float64(2.0 / fma(Float64(x * Float64(x + x)), x, 2.0)) + -1.0); end return tmp end
code[x_, y_] := If[LessEqual[N[(-2.0 * x), $MachinePrecision], -5.0], N[(N[(2.0 / N[(N[(2.0 * x + -4.0), $MachinePrecision] / N[(-2.0 + N[(x + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision], If[LessEqual[N[(-2.0 * x), $MachinePrecision], 1.0], N[(N[(N[(x * x), $MachinePrecision] * 0.13333333333333333 + -0.3333333333333333), $MachinePrecision] * N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision], N[(N[(2.0 / N[(N[(x * N[(x + x), $MachinePrecision]), $MachinePrecision] * x + 2.0), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;-2 \cdot x \leq -5:\\
\;\;\;\;\frac{2}{\frac{\mathsf{fma}\left(2, x, -4\right)}{-2 + \left(x + x\right)}} + -1\\
\mathbf{elif}\;-2 \cdot x \leq 1:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(x \cdot x, 0.13333333333333333, -0.3333333333333333\right), x \cdot \left(x \cdot x\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\mathsf{fma}\left(x \cdot \left(x + x\right), x, 2\right)} + -1\\
\end{array}
\end{array}
if (*.f64 #s(literal -2 binary64) x) < -5Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f641.6
Applied rewrites1.6%
Applied rewrites1.6%
Applied rewrites1.6%
Applied rewrites96.7%
if -5 < (*.f64 #s(literal -2 binary64) x) < 1Initial program 9.1%
Taylor expanded in x around 0
distribute-rgt-inN/A
*-lft-identityN/A
+-commutativeN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lower-fma.f64N/A
sub-negN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f64N/A
unpow2N/A
lower-*.f64N/A
lower-*.f64N/A
unpow2N/A
lower-*.f6499.4
Applied rewrites99.4%
if 1 < (*.f64 #s(literal -2 binary64) x) Initial program 100.0%
Taylor expanded in x around 0
metadata-evalN/A
cancel-sign-sub-invN/A
lower--.f64N/A
count-2N/A
lower-+.f6499.2
Applied rewrites99.2%
Applied rewrites99.7%
Applied rewrites100.0%
Final simplification98.8%
(FPCore (x y) :precision binary64 x)
double code(double x, double y) {
return x;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = x
end function
public static double code(double x, double y) {
return x;
}
def code(x, y): return x
function code(x, y) return x end
function tmp = code(x, y) tmp = x; end
code[x_, y_] := x
\begin{array}{l}
\\
x
\end{array}
Initial program 58.8%
lift--.f64N/A
sub-negN/A
lift-/.f64N/A
clear-numN/A
inv-powN/A
metadata-evalN/A
sqr-powN/A
lower-fma.f64N/A
Applied rewrites58.4%
Taylor expanded in x around 0
+-commutativeN/A
associate--l+N/A
unpow2N/A
rem-square-sqrtN/A
metadata-evalN/A
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identityN/A
sub-negN/A
metadata-evalN/A
+-commutativeN/A
associate-+r+N/A
metadata-evalN/A
+-lft-identity47.5
Applied rewrites47.5%
herbie shell --seed 2024227
(FPCore (x y)
:name "Logistic function from Lakshay Garg"
:precision binary64
(- (/ 2.0 (+ 1.0 (exp (* -2.0 x)))) 1.0))