\sqrt{\frac{u1}{1 - u1}} \cdot \cos \left(6.28318530718 \cdot u2\right)
\begin{array}{l}
t_0 := \frac{u1}{1 - u1 \cdot u1}\\
\sqrt{t_0 + u1 \cdot t_0} \cdot \cos \left(e^{\log 6.28318530718 + \log u2}\right)
\end{array}
(FPCore (cosTheta_i u1 u2) :precision binary32 (* (sqrt (/ u1 (- 1.0 u1))) (cos (* 6.28318530718 u2))))
(FPCore (cosTheta_i u1 u2) :precision binary32 (let* ((t_0 (/ u1 (- 1.0 (* u1 u1))))) (* (sqrt (+ t_0 (* u1 t_0))) (cos (exp (+ (log 6.28318530718) (log u2)))))))
float code(float cosTheta_i, float u1, float u2) {
return sqrtf(u1 / (1.0f - u1)) * cosf(6.28318530718f * u2);
}
float code(float cosTheta_i, float u1, float u2) {
float t_0 = u1 / (1.0f - (u1 * u1));
return sqrtf(t_0 + (u1 * t_0)) * cosf(expf(logf(6.28318530718f) + logf(u2)));
}



Bits error versus cosTheta_i



Bits error versus u1



Bits error versus u2
Results
Initial program 0.3
Applied add-exp-log_binary320.3
Applied add-exp-log_binary320.4
Applied prod-exp_binary320.4
Applied flip--_binary320.4
Applied associate-/r/_binary320.4
Simplified0.4
Applied distribute-rgt-in_binary320.4
Final simplification0.4
herbie shell --seed 2022103
(FPCore (cosTheta_i u1 u2)
:name "Trowbridge-Reitz Sample, near normal, slope_x"
:precision binary32
:pre (and (and (and (> cosTheta_i 0.9999) (<= cosTheta_i 1.0)) (and (<= 2.328306437e-10 u1) (<= u1 1.0))) (and (<= 2.328306437e-10 u2) (<= u2 1.0)))
(* (sqrt (/ u1 (- 1.0 u1))) (cos (* 6.28318530718 u2))))