\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 + \left(a - \frac{1}{3}\right) \cdot \frac{\frac{1 \cdot rand}{\sqrt{9}}}{\sqrt{a - \frac{1}{3}}}double f(double a, double rand) {
double r86872 = a;
double r86873 = 1.0;
double r86874 = 3.0;
double r86875 = r86873 / r86874;
double r86876 = r86872 - r86875;
double r86877 = 9.0;
double r86878 = r86877 * r86876;
double r86879 = sqrt(r86878);
double r86880 = r86873 / r86879;
double r86881 = rand;
double r86882 = r86880 * r86881;
double r86883 = r86873 + r86882;
double r86884 = r86876 * r86883;
return r86884;
}
double f(double a, double rand) {
double r86885 = a;
double r86886 = 1.0;
double r86887 = 3.0;
double r86888 = r86886 / r86887;
double r86889 = r86885 - r86888;
double r86890 = r86889 * r86886;
double r86891 = rand;
double r86892 = r86886 * r86891;
double r86893 = 9.0;
double r86894 = sqrt(r86893);
double r86895 = r86892 / r86894;
double r86896 = sqrt(r86889);
double r86897 = r86895 / r86896;
double r86898 = r86889 * r86897;
double r86899 = r86890 + r86898;
return r86899;
}



Bits error versus a



Bits error versus rand
Results
Initial program 0.1
rmApplied associate-*l/0.1
rmApplied distribute-lft-in0.1
rmApplied sqrt-prod0.1
Applied associate-/r*0.1
Final simplification0.1
herbie shell --seed 2020057
(FPCore (a rand)
:name "Octave 3.8, oct_fill_randg"
:precision binary64
(* (- a (/ 1 3)) (+ 1 (* (/ 1 (sqrt (* 9 (- a (/ 1 3))))) rand))))