(FPCore (x y z t a) :precision binary64 (+ (- (+ (log (+ x y)) (log z)) t) (* (- a 0.5) (log t))))
(FPCore (x y z t a) :precision binary64 (- (+ (log (+ y x)) (+ (log z) (* 0.5 (log (/ 1.0 t))))) (- t (+ (* a (log (pow (cbrt t) 2.0))) (* a (log (pow t 0.3333333333333333)))))))
double code(double x, double y, double z, double t, double a) {
return ((log((x + y)) + log(z)) - t) + ((a - 0.5) * log(t));
}
double code(double x, double y, double z, double t, double a) {
return (log((y + x)) + (log(z) + (0.5 * log((1.0 / t))))) - (t - ((a * log(pow(cbrt(t), 2.0))) + (a * log(pow(t, 0.3333333333333333)))));
}
public static double code(double x, double y, double z, double t, double a) {
return ((Math.log((x + y)) + Math.log(z)) - t) + ((a - 0.5) * Math.log(t));
}
public static double code(double x, double y, double z, double t, double a) {
return (Math.log((y + x)) + (Math.log(z) + (0.5 * Math.log((1.0 / t))))) - (t - ((a * Math.log(Math.pow(Math.cbrt(t), 2.0))) + (a * Math.log(Math.pow(t, 0.3333333333333333)))));
}
function code(x, y, z, t, a) return Float64(Float64(Float64(log(Float64(x + y)) + log(z)) - t) + Float64(Float64(a - 0.5) * log(t))) end
function code(x, y, z, t, a) return Float64(Float64(log(Float64(y + x)) + Float64(log(z) + Float64(0.5 * log(Float64(1.0 / t))))) - Float64(t - Float64(Float64(a * log((cbrt(t) ^ 2.0))) + Float64(a * log((t ^ 0.3333333333333333)))))) end
code[x_, y_, z_, t_, a_] := N[(N[(N[(N[Log[N[(x + y), $MachinePrecision]], $MachinePrecision] + N[Log[z], $MachinePrecision]), $MachinePrecision] - t), $MachinePrecision] + N[(N[(a - 0.5), $MachinePrecision] * N[Log[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[x_, y_, z_, t_, a_] := N[(N[(N[Log[N[(y + x), $MachinePrecision]], $MachinePrecision] + N[(N[Log[z], $MachinePrecision] + N[(0.5 * N[Log[N[(1.0 / t), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(t - N[(N[(a * N[Log[N[Power[N[Power[t, 1/3], $MachinePrecision], 2.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[(a * N[Log[N[Power[t, 0.3333333333333333], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \left(a - 0.5\right) \cdot \log t
\left(\log \left(y + x\right) + \left(\log z + 0.5 \cdot \log \left(\frac{1}{t}\right)\right)\right) - \left(t - \left(a \cdot \log \left({\left(\sqrt[3]{t}\right)}^{2}\right) + a \cdot \log \left({t}^{0.3333333333333333}\right)\right)\right)




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 0.3 |
|---|---|
| Target | 0.3 |
| Herbie | 0.3 |
Initial program 0.3
Simplified0.3
Taylor expanded in t around inf 0.3
Applied add-cube-cbrt_binary640.3
Applied add-cube-cbrt_binary640.3
Applied times-frac_binary640.3
Applied log-prod_binary640.3
Applied distribute-rgt-in_binary640.3
Simplified0.3
Simplified0.3
Taylor expanded in t around 0 0.3
Applied pow2_binary640.3
Final simplification0.3
herbie shell --seed 2022131
(FPCore (x y z t a)
:name "Numeric.SpecFunctions:logGammaL from math-functions-0.1.5.2"
:precision binary64
:herbie-target
(+ (log (+ x y)) (+ (- (log z) t) (* (- a 0.5) (log t))))
(+ (- (+ (log (+ x y)) (log z)) t) (* (- a 0.5) (log t))))