\left(\left(x - 1\right) \cdot \log y + \left(z - 1\right) \cdot \log \left(1 - y\right)\right) - t
\left(\log \left(\sqrt[3]{y} \cdot \sqrt[3]{y}\right) \cdot \left(x - 1\right) + \left(\log \left(\sqrt[3]{y}\right) \cdot \left(x - 1\right) + \left(z - 1\right) \cdot \left(\log 1 - \left(1 \cdot 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 r58259 = x;
double r58260 = 1.0;
double r58261 = r58259 - r58260;
double r58262 = y;
double r58263 = log(r58262);
double r58264 = r58261 * r58263;
double r58265 = z;
double r58266 = r58265 - r58260;
double r58267 = r58260 - r58262;
double r58268 = log(r58267);
double r58269 = r58266 * r58268;
double r58270 = r58264 + r58269;
double r58271 = t;
double r58272 = r58270 - r58271;
return r58272;
}
double f(double x, double y, double z, double t) {
double r58273 = y;
double r58274 = cbrt(r58273);
double r58275 = r58274 * r58274;
double r58276 = log(r58275);
double r58277 = x;
double r58278 = 1.0;
double r58279 = r58277 - r58278;
double r58280 = r58276 * r58279;
double r58281 = log(r58274);
double r58282 = r58281 * r58279;
double r58283 = z;
double r58284 = r58283 - r58278;
double r58285 = log(r58278);
double r58286 = r58278 * r58273;
double r58287 = 0.5;
double r58288 = 2.0;
double r58289 = pow(r58273, r58288);
double r58290 = pow(r58278, r58288);
double r58291 = r58289 / r58290;
double r58292 = r58287 * r58291;
double r58293 = r58286 + r58292;
double r58294 = r58285 - r58293;
double r58295 = r58284 * r58294;
double r58296 = r58282 + r58295;
double r58297 = r58280 + r58296;
double r58298 = t;
double r58299 = r58297 - r58298;
return r58299;
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus t
Results
Initial program 6.9
Taylor expanded around 0 0.4
rmApplied add-cube-cbrt0.4
Applied log-prod0.5
Applied distribute-rgt-in0.5
Applied associate-+l+0.5
Final simplification0.5
herbie shell --seed 2020065
(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))