\left(\frac{1}{6} \cdot {\left(-2 \cdot \log u1\right)}^{0.5}\right) \cdot \cos \left(\left(2 \cdot \pi\right) \cdot u2\right) + 0.5\left(\sqrt{\frac{1}{6}} \cdot \left(\sqrt{\frac{1}{6}} \cdot {\left(-2 \cdot \log u1\right)}^{0.5}\right)\right) \cdot \cos \left(\left(2 \cdot \pi\right) \cdot u2\right) + 0.5double f(double u1, double u2) {
double r90146 = 1.0;
double r90147 = 6.0;
double r90148 = r90146 / r90147;
double r90149 = -2.0;
double r90150 = u1;
double r90151 = log(r90150);
double r90152 = r90149 * r90151;
double r90153 = 0.5;
double r90154 = pow(r90152, r90153);
double r90155 = r90148 * r90154;
double r90156 = 2.0;
double r90157 = atan2(1.0, 0.0);
double r90158 = r90156 * r90157;
double r90159 = u2;
double r90160 = r90158 * r90159;
double r90161 = cos(r90160);
double r90162 = r90155 * r90161;
double r90163 = r90162 + r90153;
return r90163;
}
double f(double u1, double u2) {
double r90164 = 1.0;
double r90165 = 6.0;
double r90166 = r90164 / r90165;
double r90167 = sqrt(r90166);
double r90168 = -2.0;
double r90169 = u1;
double r90170 = log(r90169);
double r90171 = r90168 * r90170;
double r90172 = 0.5;
double r90173 = pow(r90171, r90172);
double r90174 = r90167 * r90173;
double r90175 = r90167 * r90174;
double r90176 = 2.0;
double r90177 = atan2(1.0, 0.0);
double r90178 = r90176 * r90177;
double r90179 = u2;
double r90180 = r90178 * r90179;
double r90181 = cos(r90180);
double r90182 = r90175 * r90181;
double r90183 = r90182 + r90172;
return r90183;
}



Bits error versus u1



Bits error versus u2
Results
Initial program 0.4
rmApplied add-sqr-sqrt0.4
Applied associate-*l*0.4
Final simplification0.4
herbie shell --seed 2019326 +o rules:numerics
(FPCore (u1 u2)
:name "normal distribution"
:precision binary64
:pre (and (<= 0.0 u1 1) (<= 0.0 u2 1))
(+ (* (* (/ 1 6) (pow (* -2 (log u1)) 0.5)) (cos (* (* 2 PI) u2))) 0.5))