\left(a - \frac{1}{3}\right) \cdot \left(1 + \frac{1}{\sqrt{9 \cdot \left(a - \frac{1}{3}\right)}} \cdot rand\right)\left(a - \frac{1}{3}\right) \cdot 1 + \frac{a - \frac{1}{3}}{\frac{\sqrt{9} \cdot \sqrt{a - \frac{1}{3}}}{rand \cdot 1}}double f(double a, double rand) {
double r151345 = a;
double r151346 = 1.0;
double r151347 = 3.0;
double r151348 = r151346 / r151347;
double r151349 = r151345 - r151348;
double r151350 = 9.0;
double r151351 = r151350 * r151349;
double r151352 = sqrt(r151351);
double r151353 = r151346 / r151352;
double r151354 = rand;
double r151355 = r151353 * r151354;
double r151356 = r151346 + r151355;
double r151357 = r151349 * r151356;
return r151357;
}
double f(double a, double rand) {
double r151358 = a;
double r151359 = 1.0;
double r151360 = 3.0;
double r151361 = r151359 / r151360;
double r151362 = r151358 - r151361;
double r151363 = r151362 * r151359;
double r151364 = 9.0;
double r151365 = sqrt(r151364);
double r151366 = sqrt(r151362);
double r151367 = r151365 * r151366;
double r151368 = rand;
double r151369 = r151368 * r151359;
double r151370 = r151367 / r151369;
double r151371 = r151362 / r151370;
double r151372 = r151363 + r151371;
return r151372;
}



Bits error versus a



Bits error versus rand
Results
Initial program 0.1
rmApplied sqrt-prod0.2
Applied *-un-lft-identity0.2
Applied times-frac0.2
rmApplied frac-times0.2
Applied associate-*l/0.1
Simplified0.1
rmApplied clear-num0.2
rmApplied distribute-lft-in0.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2019354
(FPCore (a rand)
:name "Octave 3.8, oct_fill_randg"
:precision binary64
(* (- a (/ 1 3)) (+ 1 (* (/ 1 (sqrt (* 9 (- a (/ 1 3))))) rand))))