\left(\left(x - 1\right) \cdot \log y + \left(z - 1\right) \cdot \log \left(1 - y\right)\right) - t
\left(\left(x - 1\right) \cdot \log \left(\sqrt[3]{y} \cdot \sqrt[3]{y}\right) + \mathsf{fma}\left(\log \left(\sqrt[3]{y}\right), x - 1, \left(z - 1\right) \cdot \left(\log 1 - \mathsf{fma}\left(1, y, \frac{1}{2} \cdot \frac{{y}^{2}}{{1}^{2}}\right)\right)\right)\right) - tdouble f(double x, double y, double z, double t) {
double r49323 = x;
double r49324 = 1.0;
double r49325 = r49323 - r49324;
double r49326 = y;
double r49327 = log(r49326);
double r49328 = r49325 * r49327;
double r49329 = z;
double r49330 = r49329 - r49324;
double r49331 = r49324 - r49326;
double r49332 = log(r49331);
double r49333 = r49330 * r49332;
double r49334 = r49328 + r49333;
double r49335 = t;
double r49336 = r49334 - r49335;
return r49336;
}
double f(double x, double y, double z, double t) {
double r49337 = x;
double r49338 = 1.0;
double r49339 = r49337 - r49338;
double r49340 = y;
double r49341 = cbrt(r49340);
double r49342 = r49341 * r49341;
double r49343 = log(r49342);
double r49344 = r49339 * r49343;
double r49345 = log(r49341);
double r49346 = z;
double r49347 = r49346 - r49338;
double r49348 = log(r49338);
double r49349 = 0.5;
double r49350 = 2.0;
double r49351 = pow(r49340, r49350);
double r49352 = pow(r49338, r49350);
double r49353 = r49351 / r49352;
double r49354 = r49349 * r49353;
double r49355 = fma(r49338, r49340, r49354);
double r49356 = r49348 - r49355;
double r49357 = r49347 * r49356;
double r49358 = fma(r49345, r49339, r49357);
double r49359 = r49344 + r49358;
double r49360 = t;
double r49361 = r49359 - r49360;
return r49361;
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus t
Initial program 7.0
Taylor expanded around 0 0.3
Simplified0.3
rmApplied add-cube-cbrt0.3
Applied log-prod0.4
Applied distribute-lft-in0.4
Applied associate-+l+0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019323 +o rules:numerics
(FPCore (x y z t)
:name "Statistics.Distribution.Beta:$cdensity from math-functions-0.1.5.2"
:precision binary64
(- (+ (* (- x 1) (log y)) (* (- z 1) (log (- 1 y)))) t))