\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 y + \left(\left(z - 1\right) \cdot \left(\sqrt{\log 1} + \sqrt{1 \cdot y + \frac{1}{2} \cdot \frac{{y}^{2}}{{1}^{2}}}\right)\right) \cdot \left(\sqrt{\log 1} - \sqrt{1 \cdot y + \frac{1}{2} \cdot \frac{{y}^{2}}{{1}^{2}}}\right)\right) - tdouble f(double x, double y, double z, double t) {
double r75317 = x;
double r75318 = 1.0;
double r75319 = r75317 - r75318;
double r75320 = y;
double r75321 = log(r75320);
double r75322 = r75319 * r75321;
double r75323 = z;
double r75324 = r75323 - r75318;
double r75325 = r75318 - r75320;
double r75326 = log(r75325);
double r75327 = r75324 * r75326;
double r75328 = r75322 + r75327;
double r75329 = t;
double r75330 = r75328 - r75329;
return r75330;
}
double f(double x, double y, double z, double t) {
double r75331 = x;
double r75332 = 1.0;
double r75333 = r75331 - r75332;
double r75334 = y;
double r75335 = log(r75334);
double r75336 = r75333 * r75335;
double r75337 = z;
double r75338 = r75337 - r75332;
double r75339 = log(r75332);
double r75340 = sqrt(r75339);
double r75341 = r75332 * r75334;
double r75342 = 0.5;
double r75343 = 2.0;
double r75344 = pow(r75334, r75343);
double r75345 = pow(r75332, r75343);
double r75346 = r75344 / r75345;
double r75347 = r75342 * r75346;
double r75348 = r75341 + r75347;
double r75349 = sqrt(r75348);
double r75350 = r75340 + r75349;
double r75351 = r75338 * r75350;
double r75352 = r75340 - r75349;
double r75353 = r75351 * r75352;
double r75354 = r75336 + r75353;
double r75355 = t;
double r75356 = r75354 - r75355;
return r75356;
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus t
Results
Initial program 6.7
Taylor expanded around 0 0.4
rmApplied add-sqr-sqrt0.4
Applied add-sqr-sqrt0.4
Applied difference-of-squares0.4
Applied associate-*r*0.4
Final simplification0.4
herbie shell --seed 2020057
(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))