(FPCore (x) :precision binary64 (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))))
(FPCore (x) :precision binary64 (log (pow (exp 6.0) (pow (/ (+ x (fma 4.0 (sqrt x) 1.0)) (+ x -1.0)) -1.0))))
double code(double x) {
return (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)));
}
double code(double x) {
return log(pow(exp(6.0), pow(((x + fma(4.0, sqrt(x), 1.0)) / (x + -1.0)), -1.0)));
}
function code(x) return Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(Float64(x + 1.0) + Float64(4.0 * sqrt(x)))) end
function code(x) return log((exp(6.0) ^ (Float64(Float64(x + fma(4.0, sqrt(x), 1.0)) / Float64(x + -1.0)) ^ -1.0))) end
code[x_] := N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(N[(x + 1.0), $MachinePrecision] + N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[x_] := N[Log[N[Power[N[Exp[6.0], $MachinePrecision], N[Power[N[(N[(x + N[(4.0 * N[Sqrt[x], $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision] / N[(x + -1.0), $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]], $MachinePrecision]], $MachinePrecision]
\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}}
\log \left({\left(e^{6}\right)}^{\left({\left(\frac{x + \mathsf{fma}\left(4, \sqrt{x}, 1\right)}{x + -1}\right)}^{-1}\right)}\right)




Bits error versus x
| Original | 0.2 |
|---|---|
| Target | 0.1 |
| Herbie | 0.1 |
Initial program 0.2
Applied egg-rr0.1
Applied egg-rr0.1
Applied egg-rr0.0
Applied egg-rr0.1
Final simplification0.1
herbie shell --seed 2022166
(FPCore (x)
:name "Data.Approximate.Numerics:blog from approximate-0.2.2.1"
:precision binary64
:herbie-target
(/ 6.0 (/ (+ (+ x 1.0) (* 4.0 (sqrt x))) (- x 1.0)))
(/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))))