
(FPCore (ux uy maxCos)
: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)))
(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}
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}
Herbie found 14 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (ux uy maxCos)
: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)))
(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}
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}
(FPCore (ux uy maxCos)
: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)))
(let* ((t_0 (- ux (* maxCos ux))))
(*
(sin (fma (* -2.0 PI) uy (* 0.5 PI)))
(sqrt (* (- t_0 0.0) (- (- t_0 2.0)))))))float code(float ux, float uy, float maxCos) {
float t_0 = ux - (maxCos * ux);
return sinf(fmaf((-2.0f * ((float) M_PI)), uy, (0.5f * ((float) M_PI)))) * sqrtf(((t_0 - 0.0f) * -(t_0 - 2.0f)));
}
function code(ux, uy, maxCos) t_0 = Float32(ux - Float32(maxCos * ux)) return Float32(sin(fma(Float32(Float32(-2.0) * Float32(pi)), uy, Float32(Float32(0.5) * Float32(pi)))) * sqrt(Float32(Float32(t_0 - Float32(0.0)) * Float32(-Float32(t_0 - Float32(2.0)))))) end
\begin{array}{l}
t_0 := ux - maxCos \cdot ux\\
\sin \left(\mathsf{fma}\left(-2 \cdot \pi, uy, 0.5 \cdot \pi\right)\right) \cdot \sqrt{\left(t\_0 - 0\right) \cdot \left(-\left(t\_0 - 2\right)\right)}
\end{array}
Initial program 57.6%
Applied rewrites99.0%
Applied rewrites99.1%
(FPCore (ux uy maxCos)
: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)))
(let* ((t_0 (- ux (* maxCos ux))))
(*
(cos (* (* uy 2.0) PI))
(sqrt (fma (fma maxCos ux (- 1.0 ux)) t_0 t_0)))))float code(float ux, float uy, float maxCos) {
float t_0 = ux - (maxCos * ux);
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf(fmaf(fmaf(maxCos, ux, (1.0f - ux)), t_0, t_0));
}
function code(ux, uy, maxCos) t_0 = Float32(ux - Float32(maxCos * ux)) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(fma(fma(maxCos, ux, Float32(Float32(1.0) - ux)), t_0, t_0))) end
\begin{array}{l}
t_0 := ux - maxCos \cdot ux\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\mathsf{fma}\left(maxCos, ux, 1 - ux\right), t\_0, t\_0\right)}
\end{array}
Initial program 57.6%
Applied rewrites98.9%
Applied rewrites98.9%
Applied rewrites99.0%
(FPCore (ux uy maxCos)
: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)))
(let* ((t_0 (- ux (* maxCos ux))))
(* (cos (* (* uy 2.0) PI)) (sqrt (* t_0 (- 2.0 t_0))))))float code(float ux, float uy, float maxCos) {
float t_0 = ux - (maxCos * ux);
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((t_0 * (2.0f - t_0)));
}
function code(ux, uy, maxCos) t_0 = Float32(ux - Float32(maxCos * ux)) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(t_0 * Float32(Float32(2.0) - t_0)))) end
function tmp = code(ux, uy, maxCos) t_0 = ux - (maxCos * ux); tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt((t_0 * (single(2.0) - t_0))); end
\begin{array}{l}
t_0 := ux - maxCos \cdot ux\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{t\_0 \cdot \left(2 - t\_0\right)}
\end{array}
Initial program 57.6%
Applied rewrites98.9%
Applied rewrites98.9%
Applied rewrites99.0%
(FPCore (ux uy maxCos)
: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)))
(*
(sqrt (* (- (* maxCos ux) ux) (- ux (fma maxCos ux 2.0))))
(cos (* (+ PI PI) uy))))float code(float ux, float uy, float maxCos) {
return sqrtf((((maxCos * ux) - ux) * (ux - fmaf(maxCos, ux, 2.0f)))) * cosf(((((float) M_PI) + ((float) M_PI)) * uy));
}
function code(ux, uy, maxCos) return Float32(sqrt(Float32(Float32(Float32(maxCos * ux) - ux) * Float32(ux - fma(maxCos, ux, Float32(2.0))))) * cos(Float32(Float32(Float32(pi) + Float32(pi)) * uy))) end
\sqrt{\left(maxCos \cdot ux - ux\right) \cdot \left(ux - \mathsf{fma}\left(maxCos, ux, 2\right)\right)} \cdot \cos \left(\left(\pi + \pi\right) \cdot uy\right)
Initial program 57.6%
Applied rewrites99.0%
Applied rewrites99.0%
(FPCore (ux uy maxCos)
: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 (* (- ux (* maxCos ux)) (- (- 1.0 ux) -1.0)))))float code(float ux, float uy, float maxCos) {
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf(((ux - (maxCos * ux)) * ((1.0f - ux) - -1.0f)));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(ux - Float32(maxCos * ux)) * Float32(Float32(Float32(1.0) - ux) - Float32(-1.0))))) end
function tmp = code(ux, uy, maxCos) tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt(((ux - (maxCos * ux)) * ((single(1.0) - ux) - single(-1.0)))); end
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(ux - maxCos \cdot ux\right) \cdot \left(\left(1 - ux\right) - -1\right)}
Initial program 57.6%
Applied rewrites98.9%
Applied rewrites98.9%
Taylor expanded in maxCos around 0
Applied rewrites97.7%
(FPCore (ux uy maxCos)
: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)))
(* (sin (fma (* -2.0 PI) uy (* 0.5 PI))) (sqrt (* ux (- 2.0 ux)))))float code(float ux, float uy, float maxCos) {
return sinf(fmaf((-2.0f * ((float) M_PI)), uy, (0.5f * ((float) M_PI)))) * sqrtf((ux * (2.0f - ux)));
}
function code(ux, uy, maxCos) return Float32(sin(fma(Float32(Float32(-2.0) * Float32(pi)), uy, Float32(Float32(0.5) * Float32(pi)))) * sqrt(Float32(ux * Float32(Float32(2.0) - ux)))) end
\sin \left(\mathsf{fma}\left(-2 \cdot \pi, uy, 0.5 \cdot \pi\right)\right) \cdot \sqrt{ux \cdot \left(2 - ux\right)}
Initial program 57.6%
Applied rewrites99.0%
Applied rewrites99.1%
Taylor expanded in maxCos around 0
Applied rewrites93.0%
(FPCore (ux uy maxCos)
: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 (* ux (- 2.0 ux)))))float code(float ux, float uy, float maxCos) {
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((ux * (2.0f - ux)));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(ux * Float32(Float32(2.0) - ux)))) end
function tmp = code(ux, uy, maxCos) tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt((ux * (single(2.0) - ux))); end
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(2 - ux\right)}
Initial program 57.6%
Applied rewrites99.0%
Taylor expanded in maxCos around 0
Applied rewrites92.8%
(FPCore (ux uy maxCos)
: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)))
(sqrt
(fma
ux
2.0
(*
ux
(fma (- ux) (* (- 1.0 maxCos) (- 1.0 maxCos)) (* -2.0 maxCos))))))float code(float ux, float uy, float maxCos) {
return sqrtf(fmaf(ux, 2.0f, (ux * fmaf(-ux, ((1.0f - maxCos) * (1.0f - maxCos)), (-2.0f * maxCos)))));
}
function code(ux, uy, maxCos) return sqrt(fma(ux, Float32(2.0), Float32(ux * fma(Float32(-ux), Float32(Float32(Float32(1.0) - maxCos) * Float32(Float32(1.0) - maxCos)), Float32(Float32(-2.0) * maxCos))))) end
\sqrt{\mathsf{fma}\left(ux, 2, ux \cdot \mathsf{fma}\left(-ux, \left(1 - maxCos\right) \cdot \left(1 - maxCos\right), -2 \cdot maxCos\right)\right)}
Initial program 57.6%
Taylor expanded in uy around 0
Applied rewrites49.5%
Taylor expanded in ux around 0
Applied rewrites80.3%
Applied rewrites80.4%
(FPCore (ux uy maxCos)
: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)))
(sqrt
(*
ux
(fma maxCos -2.0 (- 2.0 (* (* ux (- maxCos 1.0)) (- maxCos 1.0)))))))float code(float ux, float uy, float maxCos) {
return sqrtf((ux * fmaf(maxCos, -2.0f, (2.0f - ((ux * (maxCos - 1.0f)) * (maxCos - 1.0f))))));
}
function code(ux, uy, maxCos) return sqrt(Float32(ux * fma(maxCos, Float32(-2.0), Float32(Float32(2.0) - Float32(Float32(ux * Float32(maxCos - Float32(1.0))) * Float32(maxCos - Float32(1.0))))))) end
\sqrt{ux \cdot \mathsf{fma}\left(maxCos, -2, 2 - \left(ux \cdot \left(maxCos - 1\right)\right) \cdot \left(maxCos - 1\right)\right)}
Initial program 57.6%
Taylor expanded in uy around 0
Applied rewrites49.5%
Taylor expanded in ux around 0
Applied rewrites80.3%
Applied rewrites80.3%
(FPCore (ux uy maxCos)
: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)))
(sqrt (* (- ux (* maxCos ux)) (- (+ 2.0 (* maxCos ux)) ux))))float code(float ux, float uy, float maxCos) {
return sqrtf(((ux - (maxCos * ux)) * ((2.0f + (maxCos * ux)) - ux)));
}
real(4) function code(ux, uy, maxcos)
use fmin_fmax_functions
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = sqrt(((ux - (maxcos * ux)) * ((2.0e0 + (maxcos * ux)) - ux)))
end function
function code(ux, uy, maxCos) return sqrt(Float32(Float32(ux - Float32(maxCos * ux)) * Float32(Float32(Float32(2.0) + Float32(maxCos * ux)) - ux))) end
function tmp = code(ux, uy, maxCos) tmp = sqrt(((ux - (maxCos * ux)) * ((single(2.0) + (maxCos * ux)) - ux))); end
\sqrt{\left(ux - maxCos \cdot ux\right) \cdot \left(\left(2 + maxCos \cdot ux\right) - ux\right)}
Initial program 57.6%
Applied rewrites99.0%
Taylor expanded in uy around 0
Applied rewrites80.3%
(FPCore (ux uy maxCos)
: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)))
(sqrt (* ux (- (+ 2.0 (* -1.0 ux)) (* 2.0 maxCos)))))float code(float ux, float uy, float maxCos) {
return sqrtf((ux * ((2.0f + (-1.0f * ux)) - (2.0f * maxCos))));
}
real(4) function code(ux, uy, maxcos)
use fmin_fmax_functions
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = sqrt((ux * ((2.0e0 + ((-1.0e0) * ux)) - (2.0e0 * maxcos))))
end function
function code(ux, uy, maxCos) return sqrt(Float32(ux * Float32(Float32(Float32(2.0) + Float32(Float32(-1.0) * ux)) - Float32(Float32(2.0) * maxCos)))) end
function tmp = code(ux, uy, maxCos) tmp = sqrt((ux * ((single(2.0) + (single(-1.0) * ux)) - (single(2.0) * maxCos)))); end
\sqrt{ux \cdot \left(\left(2 + -1 \cdot ux\right) - 2 \cdot maxCos\right)}
Initial program 57.6%
Taylor expanded in uy around 0
Applied rewrites49.5%
Taylor expanded in ux around 0
Applied rewrites80.3%
Taylor expanded in maxCos around 0
Applied rewrites79.4%
(FPCore (ux uy maxCos)
: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)))
(sqrt (* ux (+ 2.0 (* -1.0 ux)))))float code(float ux, float uy, float maxCos) {
return sqrtf((ux * (2.0f + (-1.0f * ux))));
}
real(4) function code(ux, uy, maxcos)
use fmin_fmax_functions
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = sqrt((ux * (2.0e0 + ((-1.0e0) * ux))))
end function
function code(ux, uy, maxCos) return sqrt(Float32(ux * Float32(Float32(2.0) + Float32(Float32(-1.0) * ux)))) end
function tmp = code(ux, uy, maxCos) tmp = sqrt((ux * (single(2.0) + (single(-1.0) * ux)))); end
\sqrt{ux \cdot \left(2 + -1 \cdot ux\right)}
Initial program 57.6%
Taylor expanded in uy around 0
Applied rewrites49.5%
Taylor expanded in ux around 0
Applied rewrites80.3%
Taylor expanded in maxCos around 0
Applied rewrites76.1%
(FPCore (ux uy maxCos)
: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)))
(sqrt (* (fma -2.0 maxCos 2.0) ux)))float code(float ux, float uy, float maxCos) {
return sqrtf((fmaf(-2.0f, maxCos, 2.0f) * ux));
}
function code(ux, uy, maxCos) return sqrt(Float32(fma(Float32(-2.0), maxCos, Float32(2.0)) * ux)) end
\sqrt{\mathsf{fma}\left(-2, maxCos, 2\right) \cdot ux}
Initial program 57.6%
Taylor expanded in uy around 0
Applied rewrites49.5%
Taylor expanded in ux around 0
Applied rewrites64.9%
Applied rewrites64.9%
(FPCore (ux uy maxCos)
: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)))
(sqrt (+ ux ux)))float code(float ux, float uy, float maxCos) {
return sqrtf((ux + ux));
}
real(4) function code(ux, uy, maxcos)
use fmin_fmax_functions
real(4), intent (in) :: ux
real(4), intent (in) :: uy
real(4), intent (in) :: maxcos
code = sqrt((ux + ux))
end function
function code(ux, uy, maxCos) return sqrt(Float32(ux + ux)) end
function tmp = code(ux, uy, maxCos) tmp = sqrt((ux + ux)); end
\sqrt{ux + ux}
Initial program 57.6%
Taylor expanded in uy around 0
Applied rewrites49.5%
Taylor expanded in ux around 0
Applied rewrites64.9%
Taylor expanded in maxCos around 0
Applied rewrites62.3%
Applied rewrites62.3%
herbie shell --seed 2026035 +o sampling:rival3
(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)))))))