\left(a - \left(\frac{\left(1.0\right)}{\left(3.0\right)}\right)\right) \cdot \left(\frac{\left(1\right)}{\left(\left(\frac{\left(1\right)}{\left(\sqrt{\left(\left(9\right) \cdot \left(a - \left(\frac{\left(1.0\right)}{\left(3.0\right)}\right)\right)\right)}\right)}\right) \cdot rand\right)}\right)\frac{rand \cdot 1}{\sqrt{9 \cdot \left(a - \frac{1.0}{3.0}\right)}} \cdot \left(a - \frac{1.0}{3.0}\right) + \left(a - \frac{1.0}{3.0}\right) \cdot 1double f(double a, double rand) {
double r1086784 = a;
double r1086785 = 1.0;
double r1086786 = /* ERROR: no posit support in C */;
double r1086787 = 3.0;
double r1086788 = /* ERROR: no posit support in C */;
double r1086789 = r1086786 / r1086788;
double r1086790 = r1086784 - r1086789;
double r1086791 = 1.0;
double r1086792 = /* ERROR: no posit support in C */;
double r1086793 = 9.0;
double r1086794 = /* ERROR: no posit support in C */;
double r1086795 = r1086794 * r1086790;
double r1086796 = sqrt(r1086795);
double r1086797 = r1086792 / r1086796;
double r1086798 = rand;
double r1086799 = r1086797 * r1086798;
double r1086800 = r1086792 + r1086799;
double r1086801 = r1086790 * r1086800;
return r1086801;
}
double f(double a, double rand) {
double r1086802 = rand;
double r1086803 = 1.0;
double r1086804 = r1086802 * r1086803;
double r1086805 = 9.0;
double r1086806 = a;
double r1086807 = 1.0;
double r1086808 = 3.0;
double r1086809 = r1086807 / r1086808;
double r1086810 = r1086806 - r1086809;
double r1086811 = r1086805 * r1086810;
double r1086812 = sqrt(r1086811);
double r1086813 = r1086804 / r1086812;
double r1086814 = r1086813 * r1086810;
double r1086815 = r1086810 * r1086803;
double r1086816 = r1086814 + r1086815;
return r1086816;
}



Bits error versus a



Bits error versus rand
Initial program 0.2
rmApplied sub-neg0.2
Applied distribute-lft-in0.2
rmApplied distribute-lft-in0.2
Simplified0.2
rmApplied p16-flip--0.2
Simplified0.2
Simplified0.2
Final simplification0.2
herbie shell --seed 2019153
(FPCore (a rand)
:name "Octave 3.8, oct_fill_randg"
(*.p16 (-.p16 a (/.p16 (real->posit16 1.0) (real->posit16 3.0))) (+.p16 (real->posit16 1) (*.p16 (/.p16 (real->posit16 1) (sqrt.p16 (*.p16 (real->posit16 9) (-.p16 a (/.p16 (real->posit16 1.0) (real->posit16 3.0)))))) rand))))