(FPCore (x y) :precision binary64 (- (/ 2.0 (+ 1.0 (exp (* -2.0 x)))) 1.0))
(FPCore (x y) :precision binary64 (let* ((t_0 (expm1 (- (log 2.0) (log1p (pow (exp x) -2.0)))))) (if (<= (* -2.0 x) -40000000.0) t_0 (if (<= (* -2.0 x) 1e-14) x t_0))))
double code(double x, double y) {
return (2.0 / (1.0 + exp((-2.0 * x)))) - 1.0;
}
double code(double x, double y) {
double t_0 = expm1((log(2.0) - log1p(pow(exp(x), -2.0))));
double tmp;
if ((-2.0 * x) <= -40000000.0) {
tmp = t_0;
} else if ((-2.0 * x) <= 1e-14) {
tmp = x;
} else {
tmp = t_0;
}
return tmp;
}
public static double code(double x, double y) {
return (2.0 / (1.0 + Math.exp((-2.0 * x)))) - 1.0;
}
public static double code(double x, double y) {
double t_0 = Math.expm1((Math.log(2.0) - Math.log1p(Math.pow(Math.exp(x), -2.0))));
double tmp;
if ((-2.0 * x) <= -40000000.0) {
tmp = t_0;
} else if ((-2.0 * x) <= 1e-14) {
tmp = x;
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y): return (2.0 / (1.0 + math.exp((-2.0 * x)))) - 1.0
def code(x, y): t_0 = math.expm1((math.log(2.0) - math.log1p(math.pow(math.exp(x), -2.0)))) tmp = 0 if (-2.0 * x) <= -40000000.0: tmp = t_0 elif (-2.0 * x) <= 1e-14: tmp = x else: tmp = t_0 return tmp
function code(x, y) return Float64(Float64(2.0 / Float64(1.0 + exp(Float64(-2.0 * x)))) - 1.0) end
function code(x, y) t_0 = expm1(Float64(log(2.0) - log1p((exp(x) ^ -2.0)))) tmp = 0.0 if (Float64(-2.0 * x) <= -40000000.0) tmp = t_0; elseif (Float64(-2.0 * x) <= 1e-14) tmp = x; else tmp = t_0; end return tmp end
code[x_, y_] := N[(N[(2.0 / N[(1.0 + N[Exp[N[(-2.0 * x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision]
code[x_, y_] := Block[{t$95$0 = N[(Exp[N[(N[Log[2.0], $MachinePrecision] - N[Log[1 + N[Power[N[Exp[x], $MachinePrecision], -2.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]] - 1), $MachinePrecision]}, If[LessEqual[N[(-2.0 * x), $MachinePrecision], -40000000.0], t$95$0, If[LessEqual[N[(-2.0 * x), $MachinePrecision], 1e-14], x, t$95$0]]]
\frac{2}{1 + e^{-2 \cdot x}} - 1
\begin{array}{l}
t_0 := \mathsf{expm1}\left(\log 2 - \mathsf{log1p}\left({\left(e^{x}\right)}^{-2}\right)\right)\\
\mathbf{if}\;-2 \cdot x \leq -40000000:\\
\;\;\;\;t_0\\
\mathbf{elif}\;-2 \cdot x \leq 10^{-14}:\\
\;\;\;\;x\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}



Bits error versus x



Bits error versus y
Results
if (*.f64 -2 x) < -4e7 or 9.99999999999999999e-15 < (*.f64 -2 x) Initial program 0.5
Applied egg-rr0.5
if -4e7 < (*.f64 -2 x) < 9.99999999999999999e-15Initial program 58.9
Taylor expanded in x around 0 0.9
Final simplification0.7
herbie shell --seed 2022160
(FPCore (x y)
:name "Logistic function from Lakshay Garg"
:precision binary64
(- (/ 2.0 (+ 1.0 (exp (* -2.0 x)))) 1.0))