\sqrt{\frac{u1}{1 - u1}} \cdot \cos \left(6.28318530718 \cdot u2\right)
\begin{array}{l}
t_0 := \cos \left(6.28318530718 \cdot u2\right)\\
\sqrt[3]{\sqrt{\frac{{u1}^{3}}{{\left(1 - u1\right)}^{3}}} \cdot \left(\left(t_0 \cdot t_0\right) \cdot \cos \left(\sqrt{6.28318530718} \cdot \left(u2 \cdot \sqrt{6.28318530718}\right)\right)\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 (cos (* 6.28318530718 u2))))
(cbrt
(*
(sqrt (/ (pow u1 3.0) (pow (- 1.0 u1) 3.0)))
(*
(* t_0 t_0)
(cos (* (sqrt 6.28318530718) (* u2 (sqrt 6.28318530718)))))))))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 = cosf(6.28318530718f * u2);
return cbrtf(sqrtf(powf(u1, 3.0f) / powf((1.0f - u1), 3.0f)) * ((t_0 * t_0) * cosf(sqrtf(6.28318530718f) * (u2 * sqrtf(6.28318530718f)))));
}



Bits error versus cosTheta_i



Bits error versus u1



Bits error versus u2
Results
Initial program 0.3
Applied add-cbrt-cube_binary320.3
Applied add-cbrt-cube_binary320.3
Applied cbrt-unprod_binary320.4
Applied sqrt-unprod_binary320.3
Applied sqrt-unprod_binary320.4
Simplified0.3
Applied add-sqr-sqrt_binary320.3
Applied associate-*l*_binary320.3
Simplified0.3
Applied cube-div_binary320.3
Final simplification0.3
herbie shell --seed 2022039
(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))))