(FPCore (x) :precision binary64 (- (/ 1.0 (sqrt x)) (/ 1.0 (sqrt (+ x 1.0)))))
(FPCore (x) :precision binary64 (let* ((t_0 (sqrt (+ x 1.0)))) (/ (/ (pow (+ (sqrt x) t_0) -1.0) (sqrt x)) t_0)))
double code(double x) {
return (1.0 / sqrt(x)) - (1.0 / sqrt((x + 1.0)));
}
double code(double x) {
double t_0 = sqrt((x + 1.0));
return (pow((sqrt(x) + t_0), -1.0) / sqrt(x)) / t_0;
}
real(8) function code(x)
real(8), intent (in) :: x
code = (1.0d0 / sqrt(x)) - (1.0d0 / sqrt((x + 1.0d0)))
end function
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sqrt((x + 1.0d0))
code = (((sqrt(x) + t_0) ** (-1.0d0)) / sqrt(x)) / t_0
end function
public static double code(double x) {
return (1.0 / Math.sqrt(x)) - (1.0 / Math.sqrt((x + 1.0)));
}
public static double code(double x) {
double t_0 = Math.sqrt((x + 1.0));
return (Math.pow((Math.sqrt(x) + t_0), -1.0) / Math.sqrt(x)) / t_0;
}
def code(x): return (1.0 / math.sqrt(x)) - (1.0 / math.sqrt((x + 1.0)))
def code(x): t_0 = math.sqrt((x + 1.0)) return (math.pow((math.sqrt(x) + t_0), -1.0) / math.sqrt(x)) / t_0
function code(x) return Float64(Float64(1.0 / sqrt(x)) - Float64(1.0 / sqrt(Float64(x + 1.0)))) end
function code(x) t_0 = sqrt(Float64(x + 1.0)) return Float64(Float64((Float64(sqrt(x) + t_0) ^ -1.0) / sqrt(x)) / t_0) end
function tmp = code(x) tmp = (1.0 / sqrt(x)) - (1.0 / sqrt((x + 1.0))); end
function tmp = code(x) t_0 = sqrt((x + 1.0)); tmp = (((sqrt(x) + t_0) ^ -1.0) / sqrt(x)) / t_0; end
code[x_] := N[(N[(1.0 / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - N[(1.0 / N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[x_] := Block[{t$95$0 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, N[(N[(N[Power[N[(N[Sqrt[x], $MachinePrecision] + t$95$0), $MachinePrecision], -1.0], $MachinePrecision] / N[Sqrt[x], $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision]]
\frac{1}{\sqrt{x}} - \frac{1}{\sqrt{x + 1}}
\begin{array}{l}
t_0 := \sqrt{x + 1}\\
\frac{\frac{{\left(\sqrt{x} + t_0\right)}^{-1}}{\sqrt{x}}}{t_0}
\end{array}




Bits error versus x
Results
| Original | 19.9 |
|---|---|
| Target | 0.7 |
| Herbie | 0.4 |
Initial program 19.9
Applied egg-rr19.9
Applied egg-rr0.4
Applied egg-rr0.6
Applied egg-rr0.4
Final simplification0.4
herbie shell --seed 2022159
(FPCore (x)
:name "2isqrt (example 3.6)"
:precision binary64
:herbie-target
(/ 1.0 (+ (* (+ x 1.0) (sqrt x)) (* x (sqrt (+ x 1.0)))))
(- (/ 1.0 (sqrt x)) (/ 1.0 (sqrt (+ x 1.0)))))