
(FPCore (x) :precision binary64 (sqrt (/ (- (exp (* 2.0 x)) 1.0) (- (exp x) 1.0))))
double code(double x) {
return sqrt(((exp((2.0 * x)) - 1.0) / (exp(x) - 1.0)));
}
real(8) function code(x)
real(8), intent (in) :: x
code = sqrt(((exp((2.0d0 * x)) - 1.0d0) / (exp(x) - 1.0d0)))
end function
public static double code(double x) {
return Math.sqrt(((Math.exp((2.0 * x)) - 1.0) / (Math.exp(x) - 1.0)));
}
def code(x): return math.sqrt(((math.exp((2.0 * x)) - 1.0) / (math.exp(x) - 1.0)))
function code(x) return sqrt(Float64(Float64(exp(Float64(2.0 * x)) - 1.0) / Float64(exp(x) - 1.0))) end
function tmp = code(x) tmp = sqrt(((exp((2.0 * x)) - 1.0) / (exp(x) - 1.0))); end
code[x_] := N[Sqrt[N[(N[(N[Exp[N[(2.0 * x), $MachinePrecision]], $MachinePrecision] - 1.0), $MachinePrecision] / N[(N[Exp[x], $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{\frac{e^{2 \cdot x} - 1}{e^{x} - 1}}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 6 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (sqrt (/ (- (exp (* 2.0 x)) 1.0) (- (exp x) 1.0))))
double code(double x) {
return sqrt(((exp((2.0 * x)) - 1.0) / (exp(x) - 1.0)));
}
real(8) function code(x)
real(8), intent (in) :: x
code = sqrt(((exp((2.0d0 * x)) - 1.0d0) / (exp(x) - 1.0d0)))
end function
public static double code(double x) {
return Math.sqrt(((Math.exp((2.0 * x)) - 1.0) / (Math.exp(x) - 1.0)));
}
def code(x): return math.sqrt(((math.exp((2.0 * x)) - 1.0) / (math.exp(x) - 1.0)))
function code(x) return sqrt(Float64(Float64(exp(Float64(2.0 * x)) - 1.0) / Float64(exp(x) - 1.0))) end
function tmp = code(x) tmp = sqrt(((exp((2.0 * x)) - 1.0) / (exp(x) - 1.0))); end
code[x_] := N[Sqrt[N[(N[(N[Exp[N[(2.0 * x), $MachinePrecision]], $MachinePrecision] - 1.0), $MachinePrecision] / N[(N[Exp[x], $MachinePrecision] - 1.0), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{\frac{e^{2 \cdot x} - 1}{e^{x} - 1}}
\end{array}
(FPCore (x) :precision binary64 (sqrt (/ 1.0 (/ 1.0 (+ 1.0 (exp x))))))
double code(double x) {
return sqrt((1.0 / (1.0 / (1.0 + exp(x)))));
}
real(8) function code(x)
real(8), intent (in) :: x
code = sqrt((1.0d0 / (1.0d0 / (1.0d0 + exp(x)))))
end function
public static double code(double x) {
return Math.sqrt((1.0 / (1.0 / (1.0 + Math.exp(x)))));
}
def code(x): return math.sqrt((1.0 / (1.0 / (1.0 + math.exp(x)))))
function code(x) return sqrt(Float64(1.0 / Float64(1.0 / Float64(1.0 + exp(x))))) end
function tmp = code(x) tmp = sqrt((1.0 / (1.0 / (1.0 + exp(x))))); end
code[x_] := N[Sqrt[N[(1.0 / N[(1.0 / N[(1.0 + N[Exp[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{\frac{1}{\frac{1}{1 + e^{x}}}}
\end{array}
(FPCore (x) :precision binary64 (hypot 1.0 (exp (* x 0.5))))
double code(double x) {
return hypot(1.0, exp((x * 0.5)));
}
public static double code(double x) {
return Math.hypot(1.0, Math.exp((x * 0.5)));
}
def code(x): return math.hypot(1.0, math.exp((x * 0.5)))
function code(x) return hypot(1.0, exp(Float64(x * 0.5))) end
function tmp = code(x) tmp = hypot(1.0, exp((x * 0.5))); end
code[x_] := N[Sqrt[1.0 ^ 2 + N[Exp[N[(x * 0.5), $MachinePrecision]], $MachinePrecision] ^ 2], $MachinePrecision]
\begin{array}{l}
\\
\mathsf{hypot}\left(1, e^{x \cdot 0.5}\right)
\end{array}
(FPCore (x) :precision binary64 (sqrt (+ 1.0 (exp x))))
double code(double x) {
return sqrt((1.0 + exp(x)));
}
real(8) function code(x)
real(8), intent (in) :: x
code = sqrt((1.0d0 + exp(x)))
end function
public static double code(double x) {
return Math.sqrt((1.0 + Math.exp(x)));
}
def code(x): return math.sqrt((1.0 + math.exp(x)))
function code(x) return sqrt(Float64(1.0 + exp(x))) end
function tmp = code(x) tmp = sqrt((1.0 + exp(x))); end
code[x_] := N[Sqrt[N[(1.0 + N[Exp[x], $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{1 + e^{x}}
\end{array}
(FPCore (x) :precision binary64 (sqrt 2.0))
double code(double x) {
return sqrt(2.0);
}
real(8) function code(x)
real(8), intent (in) :: x
code = sqrt(2.0d0)
end function
public static double code(double x) {
return Math.sqrt(2.0);
}
def code(x): return math.sqrt(2.0)
function code(x) return sqrt(2.0) end
function tmp = code(x) tmp = sqrt(2.0); end
code[x_] := N[Sqrt[2.0], $MachinePrecision]
\begin{array}{l}
\\
\sqrt{2}
\end{array}
(FPCore (x) :precision binary64 (+ 1.0 (* x 0.5)))
double code(double x) {
return 1.0 + (x * 0.5);
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 + (x * 0.5d0)
end function
public static double code(double x) {
return 1.0 + (x * 0.5);
}
def code(x): return 1.0 + (x * 0.5)
function code(x) return Float64(1.0 + Float64(x * 0.5)) end
function tmp = code(x) tmp = 1.0 + (x * 0.5); end
code[x_] := N[(1.0 + N[(x * 0.5), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
1 + x \cdot 0.5
\end{array}
(FPCore (x) :precision binary64 (* x -0.5))
double code(double x) {
return x * -0.5;
}
real(8) function code(x)
real(8), intent (in) :: x
code = x * (-0.5d0)
end function
public static double code(double x) {
return x * -0.5;
}
def code(x): return x * -0.5
function code(x) return Float64(x * -0.5) end
function tmp = code(x) tmp = x * -0.5; end
code[x_] := N[(x * -0.5), $MachinePrecision]
\begin{array}{l}
\\
x \cdot -0.5
\end{array}
herbie shell --seed 2023347
(FPCore (x)
:name "sqrtexp (problem 3.4.4)"
:precision binary64
(sqrt (/ (- (exp (* 2.0 x)) 1.0) (- (exp x) 1.0))))