
(FPCore (xi yi zi ux uy maxCos)
:precision binary32
(let* ((t_0 (* (* (- 1.0 ux) maxCos) ux))
(t_1 (sqrt (- 1.0 (* t_0 t_0))))
(t_2 (* (* uy 2.0) PI)))
(+ (+ (* (* (cos t_2) t_1) xi) (* (* (sin t_2) t_1) yi)) (* t_0 zi))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
float t_0 = ((1.0f - ux) * maxCos) * ux;
float t_1 = sqrtf((1.0f - (t_0 * t_0)));
float t_2 = (uy * 2.0f) * ((float) M_PI);
return (((cosf(t_2) * t_1) * xi) + ((sinf(t_2) * t_1) * yi)) + (t_0 * zi);
}
function code(xi, yi, zi, ux, uy, maxCos) t_0 = Float32(Float32(Float32(Float32(1.0) - ux) * maxCos) * ux) t_1 = sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))) t_2 = Float32(Float32(uy * Float32(2.0)) * Float32(pi)) return Float32(Float32(Float32(Float32(cos(t_2) * t_1) * xi) + Float32(Float32(sin(t_2) * t_1) * yi)) + Float32(t_0 * zi)) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) t_0 = ((single(1.0) - ux) * maxCos) * ux; t_1 = sqrt((single(1.0) - (t_0 * t_0))); t_2 = (uy * single(2.0)) * single(pi); tmp = (((cos(t_2) * t_1) * xi) + ((sin(t_2) * t_1) * yi)) + (t_0 * zi); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(\left(1 - ux\right) \cdot maxCos\right) \cdot ux\\
t_1 := \sqrt{1 - t\_0 \cdot t\_0}\\
t_2 := \left(uy \cdot 2\right) \cdot \pi\\
\left(\left(\cos t\_2 \cdot t\_1\right) \cdot xi + \left(\sin t\_2 \cdot t\_1\right) \cdot yi\right) + t\_0 \cdot zi
\end{array}
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 11 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (xi yi zi ux uy maxCos)
:precision binary32
(let* ((t_0 (* (* (- 1.0 ux) maxCos) ux))
(t_1 (sqrt (- 1.0 (* t_0 t_0))))
(t_2 (* (* uy 2.0) PI)))
(+ (+ (* (* (cos t_2) t_1) xi) (* (* (sin t_2) t_1) yi)) (* t_0 zi))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
float t_0 = ((1.0f - ux) * maxCos) * ux;
float t_1 = sqrtf((1.0f - (t_0 * t_0)));
float t_2 = (uy * 2.0f) * ((float) M_PI);
return (((cosf(t_2) * t_1) * xi) + ((sinf(t_2) * t_1) * yi)) + (t_0 * zi);
}
function code(xi, yi, zi, ux, uy, maxCos) t_0 = Float32(Float32(Float32(Float32(1.0) - ux) * maxCos) * ux) t_1 = sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))) t_2 = Float32(Float32(uy * Float32(2.0)) * Float32(pi)) return Float32(Float32(Float32(Float32(cos(t_2) * t_1) * xi) + Float32(Float32(sin(t_2) * t_1) * yi)) + Float32(t_0 * zi)) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) t_0 = ((single(1.0) - ux) * maxCos) * ux; t_1 = sqrt((single(1.0) - (t_0 * t_0))); t_2 = (uy * single(2.0)) * single(pi); tmp = (((cos(t_2) * t_1) * xi) + ((sin(t_2) * t_1) * yi)) + (t_0 * zi); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(\left(1 - ux\right) \cdot maxCos\right) \cdot ux\\
t_1 := \sqrt{1 - t\_0 \cdot t\_0}\\
t_2 := \left(uy \cdot 2\right) \cdot \pi\\
\left(\left(\cos t\_2 \cdot t\_1\right) \cdot xi + \left(\sin t\_2 \cdot t\_1\right) \cdot yi\right) + t\_0 \cdot zi
\end{array}
\end{array}
(FPCore (xi yi zi ux uy maxCos)
:precision binary32
(let* ((t_0 (* (- 1.0 ux) (* ux maxCos))))
(fma
(cos (* uy (* 2.0 PI)))
(* (sqrt (- 1.0 (* t_0 t_0))) xi)
(+ (* maxCos (* ux (* (- 1.0 ux) zi))) (* yi (sin (* 2.0 (* uy PI))))))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
float t_0 = (1.0f - ux) * (ux * maxCos);
return fmaf(cosf((uy * (2.0f * ((float) M_PI)))), (sqrtf((1.0f - (t_0 * t_0))) * xi), ((maxCos * (ux * ((1.0f - ux) * zi))) + (yi * sinf((2.0f * (uy * ((float) M_PI)))))));
}
function code(xi, yi, zi, ux, uy, maxCos) t_0 = Float32(Float32(Float32(1.0) - ux) * Float32(ux * maxCos)) return fma(cos(Float32(uy * Float32(Float32(2.0) * Float32(pi)))), Float32(sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))) * xi), Float32(Float32(maxCos * Float32(ux * Float32(Float32(Float32(1.0) - ux) * zi))) + Float32(yi * sin(Float32(Float32(2.0) * Float32(uy * Float32(pi))))))) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(1 - ux\right) \cdot \left(ux \cdot maxCos\right)\\
\mathsf{fma}\left(\cos \left(uy \cdot \left(2 \cdot \pi\right)\right), \sqrt{1 - t\_0 \cdot t\_0} \cdot xi, maxCos \cdot \left(ux \cdot \left(\left(1 - ux\right) \cdot zi\right)\right) + yi \cdot \sin \left(2 \cdot \left(uy \cdot \pi\right)\right)\right)
\end{array}
\end{array}
Initial program 98.9%
associate-+l+98.9%
associate-*l*98.9%
fma-define98.9%
Simplified98.9%
Taylor expanded in maxCos around 0 98.9%
Final simplification98.9%
(FPCore (xi yi zi ux uy maxCos)
:precision binary32
(let* ((t_0 (* ux (* (- 1.0 ux) maxCos))))
(+
(+
(* yi (sin (* 2.0 (* uy PI))))
(*
xi
(*
(cos (* PI (* uy 2.0)))
(sqrt (+ 1.0 (* t_0 (* ux (* maxCos (+ ux -1.0)))))))))
(* zi t_0))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
float t_0 = ux * ((1.0f - ux) * maxCos);
return ((yi * sinf((2.0f * (uy * ((float) M_PI))))) + (xi * (cosf((((float) M_PI) * (uy * 2.0f))) * sqrtf((1.0f + (t_0 * (ux * (maxCos * (ux + -1.0f))))))))) + (zi * t_0);
}
function code(xi, yi, zi, ux, uy, maxCos) t_0 = Float32(ux * Float32(Float32(Float32(1.0) - ux) * maxCos)) return Float32(Float32(Float32(yi * sin(Float32(Float32(2.0) * Float32(uy * Float32(pi))))) + Float32(xi * Float32(cos(Float32(Float32(pi) * Float32(uy * Float32(2.0)))) * sqrt(Float32(Float32(1.0) + Float32(t_0 * Float32(ux * Float32(maxCos * Float32(ux + Float32(-1.0)))))))))) + Float32(zi * t_0)) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) t_0 = ux * ((single(1.0) - ux) * maxCos); tmp = ((yi * sin((single(2.0) * (uy * single(pi))))) + (xi * (cos((single(pi) * (uy * single(2.0)))) * sqrt((single(1.0) + (t_0 * (ux * (maxCos * (ux + single(-1.0)))))))))) + (zi * t_0); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := ux \cdot \left(\left(1 - ux\right) \cdot maxCos\right)\\
\left(yi \cdot \sin \left(2 \cdot \left(uy \cdot \pi\right)\right) + xi \cdot \left(\cos \left(\pi \cdot \left(uy \cdot 2\right)\right) \cdot \sqrt{1 + t\_0 \cdot \left(ux \cdot \left(maxCos \cdot \left(ux + -1\right)\right)\right)}\right)\right) + zi \cdot t\_0
\end{array}
\end{array}
Initial program 98.9%
Taylor expanded in ux around 0 98.9%
Final simplification98.9%
(FPCore (xi yi zi ux uy maxCos)
:precision binary32
(let* ((t_0 (* 2.0 (* uy PI))))
(+
(fma xi (cos t_0) (* yi (sin t_0)))
(* (* (- 1.0 ux) (* ux maxCos)) zi))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
float t_0 = 2.0f * (uy * ((float) M_PI));
return fmaf(xi, cosf(t_0), (yi * sinf(t_0))) + (((1.0f - ux) * (ux * maxCos)) * zi);
}
function code(xi, yi, zi, ux, uy, maxCos) t_0 = Float32(Float32(2.0) * Float32(uy * Float32(pi))) return Float32(fma(xi, cos(t_0), Float32(yi * sin(t_0))) + Float32(Float32(Float32(Float32(1.0) - ux) * Float32(ux * maxCos)) * zi)) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 2 \cdot \left(uy \cdot \pi\right)\\
\mathsf{fma}\left(xi, \cos t\_0, yi \cdot \sin t\_0\right) + \left(\left(1 - ux\right) \cdot \left(ux \cdot maxCos\right)\right) \cdot zi
\end{array}
\end{array}
Initial program 98.9%
Simplified98.9%
Taylor expanded in ux around 0 98.7%
fma-define98.7%
Simplified98.7%
Final simplification98.7%
(FPCore (xi yi zi ux uy maxCos)
:precision binary32
(let* ((t_0 (* 2.0 (* uy PI))))
(+
(* maxCos (* ux (* (- 1.0 ux) zi)))
(+ (* yi (sin t_0)) (* xi (cos t_0))))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
float t_0 = 2.0f * (uy * ((float) M_PI));
return (maxCos * (ux * ((1.0f - ux) * zi))) + ((yi * sinf(t_0)) + (xi * cosf(t_0)));
}
function code(xi, yi, zi, ux, uy, maxCos) t_0 = Float32(Float32(2.0) * Float32(uy * Float32(pi))) return Float32(Float32(maxCos * Float32(ux * Float32(Float32(Float32(1.0) - ux) * zi))) + Float32(Float32(yi * sin(t_0)) + Float32(xi * cos(t_0)))) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) t_0 = single(2.0) * (uy * single(pi)); tmp = (maxCos * (ux * ((single(1.0) - ux) * zi))) + ((yi * sin(t_0)) + (xi * cos(t_0))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 2 \cdot \left(uy \cdot \pi\right)\\
maxCos \cdot \left(ux \cdot \left(\left(1 - ux\right) \cdot zi\right)\right) + \left(yi \cdot \sin t\_0 + xi \cdot \cos t\_0\right)
\end{array}
\end{array}
Initial program 98.9%
associate-+l+98.9%
associate-*l*98.9%
fma-define98.9%
Simplified98.9%
Taylor expanded in maxCos around 0 98.7%
Final simplification98.7%
(FPCore (xi yi zi ux uy maxCos) :precision binary32 (let* ((t_0 (* 2.0 (* uy PI)))) (+ (+ (* yi (sin t_0)) (* xi (cos t_0))) (* maxCos (* ux zi)))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
float t_0 = 2.0f * (uy * ((float) M_PI));
return ((yi * sinf(t_0)) + (xi * cosf(t_0))) + (maxCos * (ux * zi));
}
function code(xi, yi, zi, ux, uy, maxCos) t_0 = Float32(Float32(2.0) * Float32(uy * Float32(pi))) return Float32(Float32(Float32(yi * sin(t_0)) + Float32(xi * cos(t_0))) + Float32(maxCos * Float32(ux * zi))) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) t_0 = single(2.0) * (uy * single(pi)); tmp = ((yi * sin(t_0)) + (xi * cos(t_0))) + (maxCos * (ux * zi)); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 2 \cdot \left(uy \cdot \pi\right)\\
\left(yi \cdot \sin t\_0 + xi \cdot \cos t\_0\right) + maxCos \cdot \left(ux \cdot zi\right)
\end{array}
\end{array}
Initial program 98.9%
associate-+l+98.9%
associate-*l*98.9%
fma-define98.9%
Simplified98.9%
Taylor expanded in ux around 0 96.2%
Final simplification96.2%
(FPCore (xi yi zi ux uy maxCos) :precision binary32 (fma maxCos (* ux (* (- 1.0 ux) zi)) (* xi (cos (* 2.0 (* uy PI))))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
return fmaf(maxCos, (ux * ((1.0f - ux) * zi)), (xi * cosf((2.0f * (uy * ((float) M_PI))))));
}
function code(xi, yi, zi, ux, uy, maxCos) return fma(maxCos, Float32(ux * Float32(Float32(Float32(1.0) - ux) * zi)), Float32(xi * cos(Float32(Float32(2.0) * Float32(uy * Float32(pi)))))) end
\begin{array}{l}
\\
\mathsf{fma}\left(maxCos, ux \cdot \left(\left(1 - ux\right) \cdot zi\right), xi \cdot \cos \left(2 \cdot \left(uy \cdot \pi\right)\right)\right)
\end{array}
Initial program 98.9%
Simplified98.9%
Taylor expanded in xi around inf 59.4%
*-commutative59.4%
Simplified59.4%
add-log-exp58.2%
Applied egg-rr58.2%
Taylor expanded in maxCos around 0 59.3%
fma-define59.3%
Simplified59.3%
Final simplification59.3%
(FPCore (xi yi zi ux uy maxCos) :precision binary32 (+ (* (* (- 1.0 ux) (* ux maxCos)) zi) (* xi (cos (* 2.0 (* uy PI))))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
return (((1.0f - ux) * (ux * maxCos)) * zi) + (xi * cosf((2.0f * (uy * ((float) M_PI)))));
}
function code(xi, yi, zi, ux, uy, maxCos) return Float32(Float32(Float32(Float32(Float32(1.0) - ux) * Float32(ux * maxCos)) * zi) + Float32(xi * cos(Float32(Float32(2.0) * Float32(uy * Float32(pi)))))) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) tmp = (((single(1.0) - ux) * (ux * maxCos)) * zi) + (xi * cos((single(2.0) * (uy * single(pi))))); end
\begin{array}{l}
\\
\left(\left(1 - ux\right) \cdot \left(ux \cdot maxCos\right)\right) \cdot zi + xi \cdot \cos \left(2 \cdot \left(uy \cdot \pi\right)\right)
\end{array}
Initial program 98.9%
Simplified98.9%
Taylor expanded in xi around inf 59.4%
*-commutative59.4%
Simplified59.4%
Taylor expanded in maxCos around 0 59.3%
*-commutative59.3%
Simplified59.3%
Final simplification59.3%
(FPCore (xi yi zi ux uy maxCos) :precision binary32 (+ (* xi (cos (* 2.0 (* uy PI)))) (* maxCos (* ux zi))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
return (xi * cosf((2.0f * (uy * ((float) M_PI))))) + (maxCos * (ux * zi));
}
function code(xi, yi, zi, ux, uy, maxCos) return Float32(Float32(xi * cos(Float32(Float32(2.0) * Float32(uy * Float32(pi))))) + Float32(maxCos * Float32(ux * zi))) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) tmp = (xi * cos((single(2.0) * (uy * single(pi))))) + (maxCos * (ux * zi)); end
\begin{array}{l}
\\
xi \cdot \cos \left(2 \cdot \left(uy \cdot \pi\right)\right) + maxCos \cdot \left(ux \cdot zi\right)
\end{array}
Initial program 98.9%
Simplified98.9%
Taylor expanded in xi around inf 59.4%
*-commutative59.4%
Simplified59.4%
add-log-exp58.2%
Applied egg-rr58.2%
Taylor expanded in ux around 0 57.6%
Final simplification57.6%
(FPCore (xi yi zi ux uy maxCos) :precision binary32 (* maxCos (* ux (* (- 1.0 ux) zi))))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
return maxCos * (ux * ((1.0f - ux) * zi));
}
real(4) function code(xi, yi, zi, ux, uy, maxcos)
real(4), intent (in) :: xi
real(4), intent (in) :: yi
real(4), intent (in) :: zi
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = maxcos * (ux * ((1.0e0 - ux) * zi))
end function
function code(xi, yi, zi, ux, uy, maxCos) return Float32(maxCos * Float32(ux * Float32(Float32(Float32(1.0) - ux) * zi))) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) tmp = maxCos * (ux * ((single(1.0) - ux) * zi)); end
\begin{array}{l}
\\
maxCos \cdot \left(ux \cdot \left(\left(1 - ux\right) \cdot zi\right)\right)
\end{array}
Initial program 98.9%
associate-+l+98.9%
associate-*l*98.9%
fma-define98.9%
Simplified98.9%
Taylor expanded in zi around inf 12.2%
Final simplification12.2%
(FPCore (xi yi zi ux uy maxCos) :precision binary32 (* zi (* ux maxCos)))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
return zi * (ux * maxCos);
}
real(4) function code(xi, yi, zi, ux, uy, maxcos)
real(4), intent (in) :: xi
real(4), intent (in) :: yi
real(4), intent (in) :: zi
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = zi * (ux * maxcos)
end function
function code(xi, yi, zi, ux, uy, maxCos) return Float32(zi * Float32(ux * maxCos)) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) tmp = zi * (ux * maxCos); end
\begin{array}{l}
\\
zi \cdot \left(ux \cdot maxCos\right)
\end{array}
Initial program 98.9%
associate-+l+98.9%
associate-*l*98.9%
fma-define98.9%
Simplified98.9%
Taylor expanded in zi around inf 12.2%
Taylor expanded in ux around 0 11.3%
associate-*r*11.3%
*-commutative11.3%
Simplified11.3%
Final simplification11.3%
(FPCore (xi yi zi ux uy maxCos) :precision binary32 (* maxCos (* ux zi)))
float code(float xi, float yi, float zi, float ux, float uy, float maxCos) {
return maxCos * (ux * zi);
}
real(4) function code(xi, yi, zi, ux, uy, maxcos)
real(4), intent (in) :: xi
real(4), intent (in) :: yi
real(4), intent (in) :: zi
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = maxcos * (ux * zi)
end function
function code(xi, yi, zi, ux, uy, maxCos) return Float32(maxCos * Float32(ux * zi)) end
function tmp = code(xi, yi, zi, ux, uy, maxCos) tmp = maxCos * (ux * zi); end
\begin{array}{l}
\\
maxCos \cdot \left(ux \cdot zi\right)
\end{array}
Initial program 98.9%
associate-+l+98.9%
associate-*l*98.9%
fma-define98.9%
Simplified98.9%
Taylor expanded in zi around inf 12.2%
Taylor expanded in ux around 0 11.3%
herbie shell --seed 2024146
(FPCore (xi yi zi ux uy maxCos)
:name "UniformSampleCone 2"
:precision binary32
:pre (and (and (and (and (and (and (<= -10000.0 xi) (<= xi 10000.0)) (and (<= -10000.0 yi) (<= yi 10000.0))) (and (<= -10000.0 zi) (<= zi 10000.0))) (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) maxCos) ux) (* (* (- 1.0 ux) maxCos) ux))))) xi) (* (* (sin (* (* uy 2.0) PI)) (sqrt (- 1.0 (* (* (* (- 1.0 ux) maxCos) ux) (* (* (- 1.0 ux) maxCos) ux))))) yi)) (* (* (* (- 1.0 ux) maxCos) ux) zi)))