
(FPCore (x) :precision binary64 (/ (- (exp x) (exp (- x))) 2.0))
double code(double x) {
return (exp(x) - exp(-x)) / 2.0;
}
real(8) function code(x)
real(8), intent (in) :: x
code = (exp(x) - exp(-x)) / 2.0d0
end function
public static double code(double x) {
return (Math.exp(x) - Math.exp(-x)) / 2.0;
}
def code(x): return (math.exp(x) - math.exp(-x)) / 2.0
function code(x) return Float64(Float64(exp(x) - exp(Float64(-x))) / 2.0) end
function tmp = code(x) tmp = (exp(x) - exp(-x)) / 2.0; end
code[x_] := N[(N[(N[Exp[x], $MachinePrecision] - N[Exp[(-x)], $MachinePrecision]), $MachinePrecision] / 2.0), $MachinePrecision]
\begin{array}{l}
\\
\frac{e^{x} - e^{-x}}{2}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 7 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (/ (- (exp x) (exp (- x))) 2.0))
double code(double x) {
return (exp(x) - exp(-x)) / 2.0;
}
real(8) function code(x)
real(8), intent (in) :: x
code = (exp(x) - exp(-x)) / 2.0d0
end function
public static double code(double x) {
return (Math.exp(x) - Math.exp(-x)) / 2.0;
}
def code(x): return (math.exp(x) - math.exp(-x)) / 2.0
function code(x) return Float64(Float64(exp(x) - exp(Float64(-x))) / 2.0) end
function tmp = code(x) tmp = (exp(x) - exp(-x)) / 2.0; end
code[x_] := N[(N[(N[Exp[x], $MachinePrecision] - N[Exp[(-x)], $MachinePrecision]), $MachinePrecision] / 2.0), $MachinePrecision]
\begin{array}{l}
\\
\frac{e^{x} - e^{-x}}{2}
\end{array}
x_m = (fabs.f64 x)
x_s = (copysign.f64 1 x)
(FPCore (x_s x_m)
:precision binary64
(let* ((t_0 (- (exp x_m) (exp (- x_m)))))
(*
x_s
(if (<= t_0 0.002)
(/
(+
(* x_m -2.0)
(+
(* -0.3333333333333333 (pow x_m 3.0))
(* -0.016666666666666666 (pow x_m 5.0))))
-2.0)
(/ t_0 2.0)))))x_m = fabs(x);
x_s = copysign(1.0, x);
double code(double x_s, double x_m) {
double t_0 = exp(x_m) - exp(-x_m);
double tmp;
if (t_0 <= 0.002) {
tmp = ((x_m * -2.0) + ((-0.3333333333333333 * pow(x_m, 3.0)) + (-0.016666666666666666 * pow(x_m, 5.0)))) / -2.0;
} else {
tmp = t_0 / 2.0;
}
return x_s * tmp;
}
x_m = abs(x)
x_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m)
real(8), intent (in) :: x_s
real(8), intent (in) :: x_m
real(8) :: t_0
real(8) :: tmp
t_0 = exp(x_m) - exp(-x_m)
if (t_0 <= 0.002d0) then
tmp = ((x_m * (-2.0d0)) + (((-0.3333333333333333d0) * (x_m ** 3.0d0)) + ((-0.016666666666666666d0) * (x_m ** 5.0d0)))) / (-2.0d0)
else
tmp = t_0 / 2.0d0
end if
code = x_s * tmp
end function
x_m = Math.abs(x);
x_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m) {
double t_0 = Math.exp(x_m) - Math.exp(-x_m);
double tmp;
if (t_0 <= 0.002) {
tmp = ((x_m * -2.0) + ((-0.3333333333333333 * Math.pow(x_m, 3.0)) + (-0.016666666666666666 * Math.pow(x_m, 5.0)))) / -2.0;
} else {
tmp = t_0 / 2.0;
}
return x_s * tmp;
}
x_m = math.fabs(x) x_s = math.copysign(1.0, x) def code(x_s, x_m): t_0 = math.exp(x_m) - math.exp(-x_m) tmp = 0 if t_0 <= 0.002: tmp = ((x_m * -2.0) + ((-0.3333333333333333 * math.pow(x_m, 3.0)) + (-0.016666666666666666 * math.pow(x_m, 5.0)))) / -2.0 else: tmp = t_0 / 2.0 return x_s * tmp
x_m = abs(x) x_s = copysign(1.0, x) function code(x_s, x_m) t_0 = Float64(exp(x_m) - exp(Float64(-x_m))) tmp = 0.0 if (t_0 <= 0.002) tmp = Float64(Float64(Float64(x_m * -2.0) + Float64(Float64(-0.3333333333333333 * (x_m ^ 3.0)) + Float64(-0.016666666666666666 * (x_m ^ 5.0)))) / -2.0); else tmp = Float64(t_0 / 2.0); end return Float64(x_s * tmp) end
x_m = abs(x); x_s = sign(x) * abs(1.0); function tmp_2 = code(x_s, x_m) t_0 = exp(x_m) - exp(-x_m); tmp = 0.0; if (t_0 <= 0.002) tmp = ((x_m * -2.0) + ((-0.3333333333333333 * (x_m ^ 3.0)) + (-0.016666666666666666 * (x_m ^ 5.0)))) / -2.0; else tmp = t_0 / 2.0; end tmp_2 = x_s * tmp; end
x_m = N[Abs[x], $MachinePrecision]
x_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_] := Block[{t$95$0 = N[(N[Exp[x$95$m], $MachinePrecision] - N[Exp[(-x$95$m)], $MachinePrecision]), $MachinePrecision]}, N[(x$95$s * If[LessEqual[t$95$0, 0.002], N[(N[(N[(x$95$m * -2.0), $MachinePrecision] + N[(N[(-0.3333333333333333 * N[Power[x$95$m, 3.0], $MachinePrecision]), $MachinePrecision] + N[(-0.016666666666666666 * N[Power[x$95$m, 5.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / -2.0), $MachinePrecision], N[(t$95$0 / 2.0), $MachinePrecision]]), $MachinePrecision]]
\begin{array}{l}
x_m = \left|x\right|
\\
x_s = \mathsf{copysign}\left(1, x\right)
\\
\begin{array}{l}
t_0 := e^{x\_m} - e^{-x\_m}\\
x\_s \cdot \begin{array}{l}
\mathbf{if}\;t\_0 \leq 0.002:\\
\;\;\;\;\frac{x\_m \cdot -2 + \left(-0.3333333333333333 \cdot {x\_m}^{3} + -0.016666666666666666 \cdot {x\_m}^{5}\right)}{-2}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_0}{2}\\
\end{array}
\end{array}
\end{array}
if (-.f64 (exp.f64 x) (exp.f64 (neg.f64 x))) < 2e-3Initial program 39.0%
sub-neg39.0%
remove-double-neg39.0%
remove-double-neg39.0%
distribute-neg-in39.0%
+-commutative39.0%
sub-neg39.0%
distribute-neg-frac39.0%
distribute-neg-frac239.0%
remove-double-neg39.0%
metadata-eval39.0%
Simplified39.0%
Taylor expanded in x around 0 93.8%
if 2e-3 < (-.f64 (exp.f64 x) (exp.f64 (neg.f64 x))) Initial program 100.0%
Final simplification95.2%
x_m = (fabs.f64 x)
x_s = (copysign.f64 1 x)
(FPCore (x_s x_m)
:precision binary64
(let* ((t_0 (- (exp x_m) (exp (- x_m)))))
(*
x_s
(if (<= t_0 0.002)
(/ (+ (* x_m -2.0) (* -0.3333333333333333 (pow x_m 3.0))) -2.0)
(/ t_0 2.0)))))x_m = fabs(x);
x_s = copysign(1.0, x);
double code(double x_s, double x_m) {
double t_0 = exp(x_m) - exp(-x_m);
double tmp;
if (t_0 <= 0.002) {
tmp = ((x_m * -2.0) + (-0.3333333333333333 * pow(x_m, 3.0))) / -2.0;
} else {
tmp = t_0 / 2.0;
}
return x_s * tmp;
}
x_m = abs(x)
x_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m)
real(8), intent (in) :: x_s
real(8), intent (in) :: x_m
real(8) :: t_0
real(8) :: tmp
t_0 = exp(x_m) - exp(-x_m)
if (t_0 <= 0.002d0) then
tmp = ((x_m * (-2.0d0)) + ((-0.3333333333333333d0) * (x_m ** 3.0d0))) / (-2.0d0)
else
tmp = t_0 / 2.0d0
end if
code = x_s * tmp
end function
x_m = Math.abs(x);
x_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m) {
double t_0 = Math.exp(x_m) - Math.exp(-x_m);
double tmp;
if (t_0 <= 0.002) {
tmp = ((x_m * -2.0) + (-0.3333333333333333 * Math.pow(x_m, 3.0))) / -2.0;
} else {
tmp = t_0 / 2.0;
}
return x_s * tmp;
}
x_m = math.fabs(x) x_s = math.copysign(1.0, x) def code(x_s, x_m): t_0 = math.exp(x_m) - math.exp(-x_m) tmp = 0 if t_0 <= 0.002: tmp = ((x_m * -2.0) + (-0.3333333333333333 * math.pow(x_m, 3.0))) / -2.0 else: tmp = t_0 / 2.0 return x_s * tmp
x_m = abs(x) x_s = copysign(1.0, x) function code(x_s, x_m) t_0 = Float64(exp(x_m) - exp(Float64(-x_m))) tmp = 0.0 if (t_0 <= 0.002) tmp = Float64(Float64(Float64(x_m * -2.0) + Float64(-0.3333333333333333 * (x_m ^ 3.0))) / -2.0); else tmp = Float64(t_0 / 2.0); end return Float64(x_s * tmp) end
x_m = abs(x); x_s = sign(x) * abs(1.0); function tmp_2 = code(x_s, x_m) t_0 = exp(x_m) - exp(-x_m); tmp = 0.0; if (t_0 <= 0.002) tmp = ((x_m * -2.0) + (-0.3333333333333333 * (x_m ^ 3.0))) / -2.0; else tmp = t_0 / 2.0; end tmp_2 = x_s * tmp; end
x_m = N[Abs[x], $MachinePrecision]
x_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_] := Block[{t$95$0 = N[(N[Exp[x$95$m], $MachinePrecision] - N[Exp[(-x$95$m)], $MachinePrecision]), $MachinePrecision]}, N[(x$95$s * If[LessEqual[t$95$0, 0.002], N[(N[(N[(x$95$m * -2.0), $MachinePrecision] + N[(-0.3333333333333333 * N[Power[x$95$m, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / -2.0), $MachinePrecision], N[(t$95$0 / 2.0), $MachinePrecision]]), $MachinePrecision]]
\begin{array}{l}
x_m = \left|x\right|
\\
x_s = \mathsf{copysign}\left(1, x\right)
\\
\begin{array}{l}
t_0 := e^{x\_m} - e^{-x\_m}\\
x\_s \cdot \begin{array}{l}
\mathbf{if}\;t\_0 \leq 0.002:\\
\;\;\;\;\frac{x\_m \cdot -2 + -0.3333333333333333 \cdot {x\_m}^{3}}{-2}\\
\mathbf{else}:\\
\;\;\;\;\frac{t\_0}{2}\\
\end{array}
\end{array}
\end{array}
if (-.f64 (exp.f64 x) (exp.f64 (neg.f64 x))) < 2e-3Initial program 39.0%
sub-neg39.0%
remove-double-neg39.0%
remove-double-neg39.0%
distribute-neg-in39.0%
+-commutative39.0%
sub-neg39.0%
distribute-neg-frac39.0%
distribute-neg-frac239.0%
remove-double-neg39.0%
metadata-eval39.0%
Simplified39.0%
Taylor expanded in x around 0 90.4%
if 2e-3 < (-.f64 (exp.f64 x) (exp.f64 (neg.f64 x))) Initial program 100.0%
Final simplification92.5%
x_m = (fabs.f64 x)
x_s = (copysign.f64 1 x)
(FPCore (x_s x_m)
:precision binary64
(*
x_s
(if (<= x_m 5.0)
(/ (+ (* x_m -2.0) (* -0.3333333333333333 (pow x_m 3.0))) -2.0)
(/ (* -0.016666666666666666 (pow x_m 5.0)) -2.0))))x_m = fabs(x);
x_s = copysign(1.0, x);
double code(double x_s, double x_m) {
double tmp;
if (x_m <= 5.0) {
tmp = ((x_m * -2.0) + (-0.3333333333333333 * pow(x_m, 3.0))) / -2.0;
} else {
tmp = (-0.016666666666666666 * pow(x_m, 5.0)) / -2.0;
}
return x_s * tmp;
}
x_m = abs(x)
x_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m)
real(8), intent (in) :: x_s
real(8), intent (in) :: x_m
real(8) :: tmp
if (x_m <= 5.0d0) then
tmp = ((x_m * (-2.0d0)) + ((-0.3333333333333333d0) * (x_m ** 3.0d0))) / (-2.0d0)
else
tmp = ((-0.016666666666666666d0) * (x_m ** 5.0d0)) / (-2.0d0)
end if
code = x_s * tmp
end function
x_m = Math.abs(x);
x_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m) {
double tmp;
if (x_m <= 5.0) {
tmp = ((x_m * -2.0) + (-0.3333333333333333 * Math.pow(x_m, 3.0))) / -2.0;
} else {
tmp = (-0.016666666666666666 * Math.pow(x_m, 5.0)) / -2.0;
}
return x_s * tmp;
}
x_m = math.fabs(x) x_s = math.copysign(1.0, x) def code(x_s, x_m): tmp = 0 if x_m <= 5.0: tmp = ((x_m * -2.0) + (-0.3333333333333333 * math.pow(x_m, 3.0))) / -2.0 else: tmp = (-0.016666666666666666 * math.pow(x_m, 5.0)) / -2.0 return x_s * tmp
x_m = abs(x) x_s = copysign(1.0, x) function code(x_s, x_m) tmp = 0.0 if (x_m <= 5.0) tmp = Float64(Float64(Float64(x_m * -2.0) + Float64(-0.3333333333333333 * (x_m ^ 3.0))) / -2.0); else tmp = Float64(Float64(-0.016666666666666666 * (x_m ^ 5.0)) / -2.0); end return Float64(x_s * tmp) end
x_m = abs(x); x_s = sign(x) * abs(1.0); function tmp_2 = code(x_s, x_m) tmp = 0.0; if (x_m <= 5.0) tmp = ((x_m * -2.0) + (-0.3333333333333333 * (x_m ^ 3.0))) / -2.0; else tmp = (-0.016666666666666666 * (x_m ^ 5.0)) / -2.0; end tmp_2 = x_s * tmp; end
x_m = N[Abs[x], $MachinePrecision]
x_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_] := N[(x$95$s * If[LessEqual[x$95$m, 5.0], N[(N[(N[(x$95$m * -2.0), $MachinePrecision] + N[(-0.3333333333333333 * N[Power[x$95$m, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / -2.0), $MachinePrecision], N[(N[(-0.016666666666666666 * N[Power[x$95$m, 5.0], $MachinePrecision]), $MachinePrecision] / -2.0), $MachinePrecision]]), $MachinePrecision]
\begin{array}{l}
x_m = \left|x\right|
\\
x_s = \mathsf{copysign}\left(1, x\right)
\\
x\_s \cdot \begin{array}{l}
\mathbf{if}\;x\_m \leq 5:\\
\;\;\;\;\frac{x\_m \cdot -2 + -0.3333333333333333 \cdot {x\_m}^{3}}{-2}\\
\mathbf{else}:\\
\;\;\;\;\frac{-0.016666666666666666 \cdot {x\_m}^{5}}{-2}\\
\end{array}
\end{array}
if x < 5Initial program 39.6%
sub-neg39.6%
remove-double-neg39.6%
remove-double-neg39.6%
distribute-neg-in39.6%
+-commutative39.6%
sub-neg39.6%
distribute-neg-frac39.6%
distribute-neg-frac239.6%
remove-double-neg39.6%
metadata-eval39.6%
Simplified39.6%
Taylor expanded in x around 0 90.0%
if 5 < x Initial program 100.0%
sub-neg100.0%
remove-double-neg100.0%
remove-double-neg100.0%
distribute-neg-in100.0%
+-commutative100.0%
sub-neg100.0%
distribute-neg-frac100.0%
distribute-neg-frac2100.0%
remove-double-neg100.0%
metadata-eval100.0%
Simplified100.0%
Taylor expanded in x around 0 87.9%
Taylor expanded in x around inf 87.9%
Taylor expanded in x around inf 87.9%
Final simplification89.5%
x_m = (fabs.f64 x)
x_s = (copysign.f64 1 x)
(FPCore (x_s x_m)
:precision binary64
(*
x_s
(if (<= x_m 3.3)
(/ (* x_m -2.0) -2.0)
(/ (* -0.016666666666666666 (pow x_m 5.0)) -2.0))))x_m = fabs(x);
x_s = copysign(1.0, x);
double code(double x_s, double x_m) {
double tmp;
if (x_m <= 3.3) {
tmp = (x_m * -2.0) / -2.0;
} else {
tmp = (-0.016666666666666666 * pow(x_m, 5.0)) / -2.0;
}
return x_s * tmp;
}
x_m = abs(x)
x_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m)
real(8), intent (in) :: x_s
real(8), intent (in) :: x_m
real(8) :: tmp
if (x_m <= 3.3d0) then
tmp = (x_m * (-2.0d0)) / (-2.0d0)
else
tmp = ((-0.016666666666666666d0) * (x_m ** 5.0d0)) / (-2.0d0)
end if
code = x_s * tmp
end function
x_m = Math.abs(x);
x_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m) {
double tmp;
if (x_m <= 3.3) {
tmp = (x_m * -2.0) / -2.0;
} else {
tmp = (-0.016666666666666666 * Math.pow(x_m, 5.0)) / -2.0;
}
return x_s * tmp;
}
x_m = math.fabs(x) x_s = math.copysign(1.0, x) def code(x_s, x_m): tmp = 0 if x_m <= 3.3: tmp = (x_m * -2.0) / -2.0 else: tmp = (-0.016666666666666666 * math.pow(x_m, 5.0)) / -2.0 return x_s * tmp
x_m = abs(x) x_s = copysign(1.0, x) function code(x_s, x_m) tmp = 0.0 if (x_m <= 3.3) tmp = Float64(Float64(x_m * -2.0) / -2.0); else tmp = Float64(Float64(-0.016666666666666666 * (x_m ^ 5.0)) / -2.0); end return Float64(x_s * tmp) end
x_m = abs(x); x_s = sign(x) * abs(1.0); function tmp_2 = code(x_s, x_m) tmp = 0.0; if (x_m <= 3.3) tmp = (x_m * -2.0) / -2.0; else tmp = (-0.016666666666666666 * (x_m ^ 5.0)) / -2.0; end tmp_2 = x_s * tmp; end
x_m = N[Abs[x], $MachinePrecision]
x_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_] := N[(x$95$s * If[LessEqual[x$95$m, 3.3], N[(N[(x$95$m * -2.0), $MachinePrecision] / -2.0), $MachinePrecision], N[(N[(-0.016666666666666666 * N[Power[x$95$m, 5.0], $MachinePrecision]), $MachinePrecision] / -2.0), $MachinePrecision]]), $MachinePrecision]
\begin{array}{l}
x_m = \left|x\right|
\\
x_s = \mathsf{copysign}\left(1, x\right)
\\
x\_s \cdot \begin{array}{l}
\mathbf{if}\;x\_m \leq 3.3:\\
\;\;\;\;\frac{x\_m \cdot -2}{-2}\\
\mathbf{else}:\\
\;\;\;\;\frac{-0.016666666666666666 \cdot {x\_m}^{5}}{-2}\\
\end{array}
\end{array}
if x < 3.2999999999999998Initial program 39.6%
sub-neg39.6%
remove-double-neg39.6%
remove-double-neg39.6%
distribute-neg-in39.6%
+-commutative39.6%
sub-neg39.6%
distribute-neg-frac39.6%
distribute-neg-frac239.6%
remove-double-neg39.6%
metadata-eval39.6%
Simplified39.6%
Taylor expanded in x around 0 67.7%
if 3.2999999999999998 < x Initial program 100.0%
sub-neg100.0%
remove-double-neg100.0%
remove-double-neg100.0%
distribute-neg-in100.0%
+-commutative100.0%
sub-neg100.0%
distribute-neg-frac100.0%
distribute-neg-frac2100.0%
remove-double-neg100.0%
metadata-eval100.0%
Simplified100.0%
Taylor expanded in x around 0 87.9%
Taylor expanded in x around inf 87.9%
Taylor expanded in x around inf 87.9%
Final simplification72.1%
x_m = (fabs.f64 x) x_s = (copysign.f64 1 x) (FPCore (x_s x_m) :precision binary64 (* x_s (/ (+ (* x_m -2.0) (* -0.016666666666666666 (pow x_m 5.0))) -2.0)))
x_m = fabs(x);
x_s = copysign(1.0, x);
double code(double x_s, double x_m) {
return x_s * (((x_m * -2.0) + (-0.016666666666666666 * pow(x_m, 5.0))) / -2.0);
}
x_m = abs(x)
x_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m)
real(8), intent (in) :: x_s
real(8), intent (in) :: x_m
code = x_s * (((x_m * (-2.0d0)) + ((-0.016666666666666666d0) * (x_m ** 5.0d0))) / (-2.0d0))
end function
x_m = Math.abs(x);
x_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m) {
return x_s * (((x_m * -2.0) + (-0.016666666666666666 * Math.pow(x_m, 5.0))) / -2.0);
}
x_m = math.fabs(x) x_s = math.copysign(1.0, x) def code(x_s, x_m): return x_s * (((x_m * -2.0) + (-0.016666666666666666 * math.pow(x_m, 5.0))) / -2.0)
x_m = abs(x) x_s = copysign(1.0, x) function code(x_s, x_m) return Float64(x_s * Float64(Float64(Float64(x_m * -2.0) + Float64(-0.016666666666666666 * (x_m ^ 5.0))) / -2.0)) end
x_m = abs(x); x_s = sign(x) * abs(1.0); function tmp = code(x_s, x_m) tmp = x_s * (((x_m * -2.0) + (-0.016666666666666666 * (x_m ^ 5.0))) / -2.0); end
x_m = N[Abs[x], $MachinePrecision]
x_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_] := N[(x$95$s * N[(N[(N[(x$95$m * -2.0), $MachinePrecision] + N[(-0.016666666666666666 * N[Power[x$95$m, 5.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / -2.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
x_m = \left|x\right|
\\
x_s = \mathsf{copysign}\left(1, x\right)
\\
x\_s \cdot \frac{x\_m \cdot -2 + -0.016666666666666666 \cdot {x\_m}^{5}}{-2}
\end{array}
Initial program 52.6%
sub-neg52.6%
remove-double-neg52.6%
remove-double-neg52.6%
distribute-neg-in52.6%
+-commutative52.6%
sub-neg52.6%
distribute-neg-frac52.6%
distribute-neg-frac252.6%
remove-double-neg52.6%
metadata-eval52.6%
Simplified52.6%
Taylor expanded in x around 0 92.3%
Taylor expanded in x around inf 91.4%
Final simplification91.4%
x_m = (fabs.f64 x) x_s = (copysign.f64 1 x) (FPCore (x_s x_m) :precision binary64 (* x_s (/ (* x_m -2.0) -2.0)))
x_m = fabs(x);
x_s = copysign(1.0, x);
double code(double x_s, double x_m) {
return x_s * ((x_m * -2.0) / -2.0);
}
x_m = abs(x)
x_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m)
real(8), intent (in) :: x_s
real(8), intent (in) :: x_m
code = x_s * ((x_m * (-2.0d0)) / (-2.0d0))
end function
x_m = Math.abs(x);
x_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m) {
return x_s * ((x_m * -2.0) / -2.0);
}
x_m = math.fabs(x) x_s = math.copysign(1.0, x) def code(x_s, x_m): return x_s * ((x_m * -2.0) / -2.0)
x_m = abs(x) x_s = copysign(1.0, x) function code(x_s, x_m) return Float64(x_s * Float64(Float64(x_m * -2.0) / -2.0)) end
x_m = abs(x); x_s = sign(x) * abs(1.0); function tmp = code(x_s, x_m) tmp = x_s * ((x_m * -2.0) / -2.0); end
x_m = N[Abs[x], $MachinePrecision]
x_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_] := N[(x$95$s * N[(N[(x$95$m * -2.0), $MachinePrecision] / -2.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
x_m = \left|x\right|
\\
x_s = \mathsf{copysign}\left(1, x\right)
\\
x\_s \cdot \frac{x\_m \cdot -2}{-2}
\end{array}
Initial program 52.6%
sub-neg52.6%
remove-double-neg52.6%
remove-double-neg52.6%
distribute-neg-in52.6%
+-commutative52.6%
sub-neg52.6%
distribute-neg-frac52.6%
distribute-neg-frac252.6%
remove-double-neg52.6%
metadata-eval52.6%
Simplified52.6%
Taylor expanded in x around 0 54.6%
Final simplification54.6%
x_m = (fabs.f64 x) x_s = (copysign.f64 1 x) (FPCore (x_s x_m) :precision binary64 (* x_s 1.0))
x_m = fabs(x);
x_s = copysign(1.0, x);
double code(double x_s, double x_m) {
return x_s * 1.0;
}
x_m = abs(x)
x_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m)
real(8), intent (in) :: x_s
real(8), intent (in) :: x_m
code = x_s * 1.0d0
end function
x_m = Math.abs(x);
x_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m) {
return x_s * 1.0;
}
x_m = math.fabs(x) x_s = math.copysign(1.0, x) def code(x_s, x_m): return x_s * 1.0
x_m = abs(x) x_s = copysign(1.0, x) function code(x_s, x_m) return Float64(x_s * 1.0) end
x_m = abs(x); x_s = sign(x) * abs(1.0); function tmp = code(x_s, x_m) tmp = x_s * 1.0; end
x_m = N[Abs[x], $MachinePrecision]
x_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_] := N[(x$95$s * 1.0), $MachinePrecision]
\begin{array}{l}
x_m = \left|x\right|
\\
x_s = \mathsf{copysign}\left(1, x\right)
\\
x\_s \cdot 1
\end{array}
Initial program 52.6%
sub-neg52.6%
remove-double-neg52.6%
remove-double-neg52.6%
distribute-neg-in52.6%
+-commutative52.6%
sub-neg52.6%
distribute-neg-frac52.6%
distribute-neg-frac252.6%
remove-double-neg52.6%
metadata-eval52.6%
Simplified52.6%
Applied egg-rr2.8%
Final simplification2.8%
herbie shell --seed 2024039
(FPCore (x)
:name "Hyperbolic sine"
:precision binary64
(/ (- (exp x) (exp (- x))) 2.0))