\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 \left(1 + 1 \cdot \frac{rand}{\sqrt{9 \cdot \left(a - \frac{1}{3}\right)}}\right)double f(double a, double rand) {
double r90151 = a;
double r90152 = 1.0;
double r90153 = 3.0;
double r90154 = r90152 / r90153;
double r90155 = r90151 - r90154;
double r90156 = 9.0;
double r90157 = r90156 * r90155;
double r90158 = sqrt(r90157);
double r90159 = r90152 / r90158;
double r90160 = rand;
double r90161 = r90159 * r90160;
double r90162 = r90152 + r90161;
double r90163 = r90155 * r90162;
return r90163;
}
double f(double a, double rand) {
double r90164 = a;
double r90165 = 1.0;
double r90166 = 3.0;
double r90167 = r90165 / r90166;
double r90168 = r90164 - r90167;
double r90169 = rand;
double r90170 = 9.0;
double r90171 = r90170 * r90168;
double r90172 = sqrt(r90171);
double r90173 = r90169 / r90172;
double r90174 = r90165 * r90173;
double r90175 = r90165 + r90174;
double r90176 = r90168 * r90175;
return r90176;
}



Bits error versus a



Bits error versus rand
Results
Initial program 0.1
rmApplied div-inv0.1
Applied associate-*l*0.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2019351
(FPCore (a rand)
:name "Octave 3.8, oct_fill_randg"
:precision binary64
(* (- a (/ 1 3)) (+ 1 (* (/ 1 (sqrt (* 9 (- a (/ 1 3))))) rand))))