
(FPCore (ux uy maxCos) :precision binary32 (let* ((t_0 (+ (- 1.0 ux) (* ux maxCos)))) (* (cos (* (* uy 2.0) PI)) (sqrt (- 1.0 (* t_0 t_0))))))
float code(float ux, float uy, float maxCos) {
float t_0 = (1.0f - ux) + (ux * maxCos);
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((1.0f - (t_0 * t_0)));
}
function code(ux, uy, maxCos) t_0 = Float32(Float32(Float32(1.0) - ux) + Float32(ux * maxCos)) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0)))) end
function tmp = code(ux, uy, maxCos) t_0 = (single(1.0) - ux) + (ux * maxCos); tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt((single(1.0) - (t_0 * t_0))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(1 - ux\right) + ux \cdot maxCos\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 9 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (ux uy maxCos) :precision binary32 (let* ((t_0 (+ (- 1.0 ux) (* ux maxCos)))) (* (cos (* (* uy 2.0) PI)) (sqrt (- 1.0 (* t_0 t_0))))))
float code(float ux, float uy, float maxCos) {
float t_0 = (1.0f - ux) + (ux * maxCos);
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((1.0f - (t_0 * t_0)));
}
function code(ux, uy, maxCos) t_0 = Float32(Float32(Float32(1.0) - ux) + Float32(ux * maxCos)) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0)))) end
function tmp = code(ux, uy, maxCos) t_0 = (single(1.0) - ux) + (ux * maxCos); tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt((single(1.0) - (t_0 * t_0))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(1 - ux\right) + ux \cdot maxCos\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}
(FPCore (ux uy maxCos)
:precision binary32
(*
(cos (* uy (* 2.0 PI)))
(sqrt
(*
ux
(+
(- (* maxCos (- (* 2.0 ux) (* ux maxCos))) ux)
(- 2.0 (* 2.0 maxCos)))))))
float code(float ux, float uy, float maxCos) {
return cosf((uy * (2.0f * ((float) M_PI)))) * sqrtf((ux * (((maxCos * ((2.0f * ux) - (ux * maxCos))) - ux) + (2.0f - (2.0f * maxCos)))));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(uy * Float32(Float32(2.0) * Float32(pi)))) * sqrt(Float32(ux * Float32(Float32(Float32(maxCos * Float32(Float32(Float32(2.0) * ux) - Float32(ux * maxCos))) - ux) + Float32(Float32(2.0) - Float32(Float32(2.0) * maxCos)))))) end
function tmp = code(ux, uy, maxCos) tmp = cos((uy * (single(2.0) * single(pi)))) * sqrt((ux * (((maxCos * ((single(2.0) * ux) - (ux * maxCos))) - ux) + (single(2.0) - (single(2.0) * maxCos))))); end
\begin{array}{l}
\\
\cos \left(uy \cdot \left(2 \cdot \pi\right)\right) \cdot \sqrt{ux \cdot \left(\left(maxCos \cdot \left(2 \cdot ux - ux \cdot maxCos\right) - ux\right) + \left(2 - 2 \cdot maxCos\right)\right)}
\end{array}
Initial program 57.5%
associate-*l*57.5%
sub-neg57.5%
+-commutative57.5%
distribute-rgt-neg-in57.5%
fma-define57.9%
Simplified57.9%
Taylor expanded in ux around 0 98.8%
Taylor expanded in maxCos around 0 98.8%
Final simplification98.8%
(FPCore (ux uy maxCos)
:precision binary32
(*
(cos (* uy (* 2.0 PI)))
(sqrt
(*
ux
(+ (- 2.0 (* 2.0 maxCos)) (* ux (+ -1.0 (* maxCos (- 2.0 maxCos)))))))))
float code(float ux, float uy, float maxCos) {
return cosf((uy * (2.0f * ((float) M_PI)))) * sqrtf((ux * ((2.0f - (2.0f * maxCos)) + (ux * (-1.0f + (maxCos * (2.0f - maxCos)))))));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(uy * Float32(Float32(2.0) * Float32(pi)))) * sqrt(Float32(ux * Float32(Float32(Float32(2.0) - Float32(Float32(2.0) * maxCos)) + Float32(ux * Float32(Float32(-1.0) + Float32(maxCos * Float32(Float32(2.0) - maxCos)))))))) end
function tmp = code(ux, uy, maxCos) tmp = cos((uy * (single(2.0) * single(pi)))) * sqrt((ux * ((single(2.0) - (single(2.0) * maxCos)) + (ux * (single(-1.0) + (maxCos * (single(2.0) - maxCos))))))); end
\begin{array}{l}
\\
\cos \left(uy \cdot \left(2 \cdot \pi\right)\right) \cdot \sqrt{ux \cdot \left(\left(2 - 2 \cdot maxCos\right) + ux \cdot \left(-1 + maxCos \cdot \left(2 - maxCos\right)\right)\right)}
\end{array}
Initial program 57.5%
associate-*l*57.5%
sub-neg57.5%
+-commutative57.5%
distribute-rgt-neg-in57.5%
fma-define57.9%
Simplified57.9%
Taylor expanded in ux around 0 98.8%
Taylor expanded in maxCos around 0 98.8%
Taylor expanded in ux around 0 98.8%
distribute-lft-in98.8%
*-commutative98.8%
mul-1-neg98.8%
Applied egg-rr98.8%
*-commutative98.8%
distribute-lft-in98.8%
unsub-neg98.8%
Simplified98.8%
Final simplification98.8%
(FPCore (ux uy maxCos) :precision binary32 (* (cos (* PI (* uy 2.0))) (sqrt (* ux (+ 2.0 (- (* maxCos (- (* 2.0 ux) 2.0)) ux))))))
float code(float ux, float uy, float maxCos) {
return cosf((((float) M_PI) * (uy * 2.0f))) * sqrtf((ux * (2.0f + ((maxCos * ((2.0f * ux) - 2.0f)) - ux))));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(Float32(pi) * Float32(uy * Float32(2.0)))) * sqrt(Float32(ux * Float32(Float32(2.0) + Float32(Float32(maxCos * Float32(Float32(Float32(2.0) * ux) - Float32(2.0))) - ux))))) end
function tmp = code(ux, uy, maxCos) tmp = cos((single(pi) * (uy * single(2.0)))) * sqrt((ux * (single(2.0) + ((maxCos * ((single(2.0) * ux) - single(2.0))) - ux)))); end
\begin{array}{l}
\\
\cos \left(\pi \cdot \left(uy \cdot 2\right)\right) \cdot \sqrt{ux \cdot \left(2 + \left(maxCos \cdot \left(2 \cdot ux - 2\right) - ux\right)\right)}
\end{array}
Initial program 57.5%
Taylor expanded in ux around 0 98.8%
associate--l+98.8%
associate-*r*98.8%
mul-1-neg98.8%
fma-neg98.8%
sub-neg98.8%
metadata-eval98.8%
+-commutative98.8%
distribute-lft-neg-in98.8%
metadata-eval98.8%
*-commutative98.8%
Simplified98.8%
Taylor expanded in maxCos around 0 97.3%
Final simplification97.3%
(FPCore (ux uy maxCos)
:precision binary32
(if (<= (* uy 2.0) 0.00011999999696854502)
(sqrt
(*
ux
(+
(- (* maxCos (- (* 2.0 ux) (* ux maxCos))) ux)
(- 2.0 (* 2.0 maxCos)))))
(* (cos (* PI (* uy 2.0))) (sqrt (* ux (- 2.0 ux))))))
float code(float ux, float uy, float maxCos) {
float tmp;
if ((uy * 2.0f) <= 0.00011999999696854502f) {
tmp = sqrtf((ux * (((maxCos * ((2.0f * ux) - (ux * maxCos))) - ux) + (2.0f - (2.0f * maxCos)))));
} else {
tmp = cosf((((float) M_PI) * (uy * 2.0f))) * sqrtf((ux * (2.0f - ux)));
}
return tmp;
}
function code(ux, uy, maxCos) tmp = Float32(0.0) if (Float32(uy * Float32(2.0)) <= Float32(0.00011999999696854502)) tmp = sqrt(Float32(ux * Float32(Float32(Float32(maxCos * Float32(Float32(Float32(2.0) * ux) - Float32(ux * maxCos))) - ux) + Float32(Float32(2.0) - Float32(Float32(2.0) * maxCos))))); else tmp = Float32(cos(Float32(Float32(pi) * Float32(uy * Float32(2.0)))) * sqrt(Float32(ux * Float32(Float32(2.0) - ux)))); end return tmp end
function tmp_2 = code(ux, uy, maxCos) tmp = single(0.0); if ((uy * single(2.0)) <= single(0.00011999999696854502)) tmp = sqrt((ux * (((maxCos * ((single(2.0) * ux) - (ux * maxCos))) - ux) + (single(2.0) - (single(2.0) * maxCos))))); else tmp = cos((single(pi) * (uy * single(2.0)))) * sqrt((ux * (single(2.0) - ux))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;uy \cdot 2 \leq 0.00011999999696854502:\\
\;\;\;\;\sqrt{ux \cdot \left(\left(maxCos \cdot \left(2 \cdot ux - ux \cdot maxCos\right) - ux\right) + \left(2 - 2 \cdot maxCos\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;\cos \left(\pi \cdot \left(uy \cdot 2\right)\right) \cdot \sqrt{ux \cdot \left(2 - ux\right)}\\
\end{array}
\end{array}
if (*.f32 uy #s(literal 2 binary32)) < 1.19999997e-4Initial program 59.2%
associate-*l*59.2%
sub-neg59.2%
+-commutative59.2%
distribute-rgt-neg-in59.2%
fma-define59.5%
Simplified59.5%
Taylor expanded in ux around 0 99.6%
Taylor expanded in maxCos around 0 99.6%
Taylor expanded in uy around 0 99.6%
if 1.19999997e-4 < (*.f32 uy #s(literal 2 binary32)) Initial program 55.1%
associate-*l*55.1%
sub-neg55.1%
+-commutative55.1%
distribute-rgt-neg-in55.1%
fma-define55.6%
Simplified55.5%
Taylor expanded in ux around 0 97.7%
Taylor expanded in maxCos around 0 97.7%
Taylor expanded in maxCos around 0 92.4%
*-commutative92.4%
associate-*r*92.4%
neg-mul-192.4%
unsub-neg92.4%
Simplified92.4%
Final simplification96.7%
(FPCore (ux uy maxCos)
:precision binary32
(let* ((t_0 (- 2.0 (* 2.0 maxCos))))
(if (<= uy 0.0004199999966658652)
(sqrt (* ux (+ (- (* maxCos (- (* 2.0 ux) (* ux maxCos))) ux) t_0)))
(* (sqrt (* ux t_0)) (+ 1.0 (* -2.0 (* (* uy PI) (* uy PI))))))))
float code(float ux, float uy, float maxCos) {
float t_0 = 2.0f - (2.0f * maxCos);
float tmp;
if (uy <= 0.0004199999966658652f) {
tmp = sqrtf((ux * (((maxCos * ((2.0f * ux) - (ux * maxCos))) - ux) + t_0)));
} else {
tmp = sqrtf((ux * t_0)) * (1.0f + (-2.0f * ((uy * ((float) M_PI)) * (uy * ((float) M_PI)))));
}
return tmp;
}
function code(ux, uy, maxCos) t_0 = Float32(Float32(2.0) - Float32(Float32(2.0) * maxCos)) tmp = Float32(0.0) if (uy <= Float32(0.0004199999966658652)) tmp = sqrt(Float32(ux * Float32(Float32(Float32(maxCos * Float32(Float32(Float32(2.0) * ux) - Float32(ux * maxCos))) - ux) + t_0))); else tmp = Float32(sqrt(Float32(ux * t_0)) * Float32(Float32(1.0) + Float32(Float32(-2.0) * Float32(Float32(uy * Float32(pi)) * Float32(uy * Float32(pi)))))); end return tmp end
function tmp_2 = code(ux, uy, maxCos) t_0 = single(2.0) - (single(2.0) * maxCos); tmp = single(0.0); if (uy <= single(0.0004199999966658652)) tmp = sqrt((ux * (((maxCos * ((single(2.0) * ux) - (ux * maxCos))) - ux) + t_0))); else tmp = sqrt((ux * t_0)) * (single(1.0) + (single(-2.0) * ((uy * single(pi)) * (uy * single(pi))))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 2 - 2 \cdot maxCos\\
\mathbf{if}\;uy \leq 0.0004199999966658652:\\
\;\;\;\;\sqrt{ux \cdot \left(\left(maxCos \cdot \left(2 \cdot ux - ux \cdot maxCos\right) - ux\right) + t\_0\right)}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{ux \cdot t\_0} \cdot \left(1 + -2 \cdot \left(\left(uy \cdot \pi\right) \cdot \left(uy \cdot \pi\right)\right)\right)\\
\end{array}
\end{array}
if uy < 4.19999997e-4Initial program 58.6%
associate-*l*58.6%
sub-neg58.6%
+-commutative58.6%
distribute-rgt-neg-in58.6%
fma-define58.9%
Simplified59.0%
Taylor expanded in ux around 0 99.5%
Taylor expanded in maxCos around 0 99.5%
Taylor expanded in uy around 0 98.7%
if 4.19999997e-4 < uy Initial program 55.6%
Taylor expanded in ux around 0 77.9%
Taylor expanded in uy around 0 58.4%
unpow258.4%
unpow258.4%
swap-sqr58.4%
unpow158.4%
pow-plus58.4%
metadata-eval58.4%
Simplified58.4%
unpow258.4%
Applied egg-rr58.4%
Final simplification84.7%
(FPCore (ux uy maxCos)
:precision binary32
(let* ((t_0 (- 2.0 (* 2.0 maxCos))))
(if (<= uy 0.0004199999966658652)
(sqrt (* ux (+ t_0 (* ux (+ -1.0 (* maxCos (- 2.0 maxCos)))))))
(* (sqrt (* ux t_0)) (+ 1.0 (* -2.0 (* (* uy PI) (* uy PI))))))))
float code(float ux, float uy, float maxCos) {
float t_0 = 2.0f - (2.0f * maxCos);
float tmp;
if (uy <= 0.0004199999966658652f) {
tmp = sqrtf((ux * (t_0 + (ux * (-1.0f + (maxCos * (2.0f - maxCos)))))));
} else {
tmp = sqrtf((ux * t_0)) * (1.0f + (-2.0f * ((uy * ((float) M_PI)) * (uy * ((float) M_PI)))));
}
return tmp;
}
function code(ux, uy, maxCos) t_0 = Float32(Float32(2.0) - Float32(Float32(2.0) * maxCos)) tmp = Float32(0.0) if (uy <= Float32(0.0004199999966658652)) tmp = sqrt(Float32(ux * Float32(t_0 + Float32(ux * Float32(Float32(-1.0) + Float32(maxCos * Float32(Float32(2.0) - maxCos))))))); else tmp = Float32(sqrt(Float32(ux * t_0)) * Float32(Float32(1.0) + Float32(Float32(-2.0) * Float32(Float32(uy * Float32(pi)) * Float32(uy * Float32(pi)))))); end return tmp end
function tmp_2 = code(ux, uy, maxCos) t_0 = single(2.0) - (single(2.0) * maxCos); tmp = single(0.0); if (uy <= single(0.0004199999966658652)) tmp = sqrt((ux * (t_0 + (ux * (single(-1.0) + (maxCos * (single(2.0) - maxCos))))))); else tmp = sqrt((ux * t_0)) * (single(1.0) + (single(-2.0) * ((uy * single(pi)) * (uy * single(pi))))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 2 - 2 \cdot maxCos\\
\mathbf{if}\;uy \leq 0.0004199999966658652:\\
\;\;\;\;\sqrt{ux \cdot \left(t\_0 + ux \cdot \left(-1 + maxCos \cdot \left(2 - maxCos\right)\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{ux \cdot t\_0} \cdot \left(1 + -2 \cdot \left(\left(uy \cdot \pi\right) \cdot \left(uy \cdot \pi\right)\right)\right)\\
\end{array}
\end{array}
if uy < 4.19999997e-4Initial program 58.6%
associate-*l*58.6%
sub-neg58.6%
+-commutative58.6%
distribute-rgt-neg-in58.6%
fma-define58.9%
Simplified59.0%
Taylor expanded in ux around 0 99.5%
Taylor expanded in maxCos around 0 99.5%
Taylor expanded in ux around 0 99.5%
Taylor expanded in uy around 0 98.7%
if 4.19999997e-4 < uy Initial program 55.6%
Taylor expanded in ux around 0 77.9%
Taylor expanded in uy around 0 58.4%
unpow258.4%
unpow258.4%
swap-sqr58.4%
unpow158.4%
pow-plus58.4%
metadata-eval58.4%
Simplified58.4%
unpow258.4%
Applied egg-rr58.4%
Final simplification84.7%
(FPCore (ux uy maxCos)
:precision binary32
(if (<= ux 1.9999999494757503e-5)
(*
(sqrt (* ux (- 2.0 (* 2.0 maxCos))))
(+ 1.0 (* -2.0 (* (* uy PI) (* uy PI)))))
(sqrt (* ux (- 2.0 ux)))))
float code(float ux, float uy, float maxCos) {
float tmp;
if (ux <= 1.9999999494757503e-5f) {
tmp = sqrtf((ux * (2.0f - (2.0f * maxCos)))) * (1.0f + (-2.0f * ((uy * ((float) M_PI)) * (uy * ((float) M_PI)))));
} else {
tmp = sqrtf((ux * (2.0f - ux)));
}
return tmp;
}
function code(ux, uy, maxCos) tmp = Float32(0.0) if (ux <= Float32(1.9999999494757503e-5)) tmp = Float32(sqrt(Float32(ux * Float32(Float32(2.0) - Float32(Float32(2.0) * maxCos)))) * Float32(Float32(1.0) + Float32(Float32(-2.0) * Float32(Float32(uy * Float32(pi)) * Float32(uy * Float32(pi)))))); else tmp = sqrt(Float32(ux * Float32(Float32(2.0) - ux))); end return tmp end
function tmp_2 = code(ux, uy, maxCos) tmp = single(0.0); if (ux <= single(1.9999999494757503e-5)) tmp = sqrt((ux * (single(2.0) - (single(2.0) * maxCos)))) * (single(1.0) + (single(-2.0) * ((uy * single(pi)) * (uy * single(pi))))); else tmp = sqrt((ux * (single(2.0) - ux))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;ux \leq 1.9999999494757503 \cdot 10^{-5}:\\
\;\;\;\;\sqrt{ux \cdot \left(2 - 2 \cdot maxCos\right)} \cdot \left(1 + -2 \cdot \left(\left(uy \cdot \pi\right) \cdot \left(uy \cdot \pi\right)\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\sqrt{ux \cdot \left(2 - ux\right)}\\
\end{array}
\end{array}
if ux < 1.99999995e-5Initial program 31.1%
Taylor expanded in ux around 0 95.9%
Taylor expanded in uy around 0 86.3%
unpow286.3%
unpow286.3%
swap-sqr86.3%
unpow186.3%
pow-plus86.3%
metadata-eval86.3%
Simplified86.3%
unpow286.3%
Applied egg-rr86.3%
if 1.99999995e-5 < ux Initial program 84.4%
associate-*l*84.4%
sub-neg84.4%
+-commutative84.4%
distribute-rgt-neg-in84.4%
fma-define85.1%
Simplified85.2%
Taylor expanded in ux around 0 98.8%
add-log-exp97.1%
Applied egg-rr97.1%
Taylor expanded in maxCos around 0 91.8%
neg-mul-191.8%
Simplified91.8%
Taylor expanded in uy around 0 75.9%
(FPCore (ux uy maxCos) :precision binary32 (sqrt (* ux (- 2.0 ux))))
float code(float ux, float uy, float maxCos) {
return sqrtf((ux * (2.0f - ux)));
}
real(4) function code(ux, uy, maxcos)
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = sqrt((ux * (2.0e0 - ux)))
end function
function code(ux, uy, maxCos) return sqrt(Float32(ux * Float32(Float32(2.0) - ux))) end
function tmp = code(ux, uy, maxCos) tmp = sqrt((ux * (single(2.0) - ux))); end
\begin{array}{l}
\\
\sqrt{ux \cdot \left(2 - ux\right)}
\end{array}
Initial program 57.5%
associate-*l*57.5%
sub-neg57.5%
+-commutative57.5%
distribute-rgt-neg-in57.5%
fma-define57.9%
Simplified57.9%
Taylor expanded in ux around 0 98.8%
add-log-exp97.2%
Applied egg-rr97.2%
Taylor expanded in maxCos around 0 91.5%
neg-mul-191.5%
Simplified91.5%
Taylor expanded in uy around 0 75.6%
(FPCore (ux uy maxCos) :precision binary32 0.0)
float code(float ux, float uy, float maxCos) {
return 0.0f;
}
real(4) function code(ux, uy, maxcos)
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = 0.0e0
end function
function code(ux, uy, maxCos) return Float32(0.0) end
function tmp = code(ux, uy, maxCos) tmp = single(0.0); end
\begin{array}{l}
\\
0
\end{array}
Initial program 57.5%
associate-*l*57.5%
sub-neg57.5%
+-commutative57.5%
distribute-rgt-neg-in57.5%
fma-define57.9%
Simplified57.9%
Taylor expanded in uy around 0 49.5%
Simplified49.5%
Taylor expanded in ux around 0 6.6%
pow1/26.6%
metadata-eval6.6%
metadata-eval6.6%
metadata-eval6.6%
Applied egg-rr6.6%
herbie shell --seed 2024117
(FPCore (ux uy maxCos)
:name "UniformSampleCone, x"
:precision binary32
:pre (and (and (and (<= 2.328306437e-10 ux) (<= ux 1.0)) (and (<= 2.328306437e-10 uy) (<= uy 1.0))) (and (<= 0.0 maxCos) (<= maxCos 1.0)))
(* (cos (* (* uy 2.0) PI)) (sqrt (- 1.0 (* (+ (- 1.0 ux) (* ux maxCos)) (+ (- 1.0 ux) (* ux maxCos)))))))