
(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}
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 15 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}
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
(*
(sin (fma (- uy) (+ PI PI) (* 0.5 PI)))
(sqrt
(*
ux
(-
(+ 2.0 (* -1.0 (* ux (pow (- maxCos 1.0) 2.0))))
(* 2.0 maxCos))))))float code(float ux, float uy, float maxCos) {
return sinf(fmaf(-uy, (((float) M_PI) + ((float) M_PI)), (0.5f * ((float) M_PI)))) * sqrtf((ux * ((2.0f + (-1.0f * (ux * powf((maxCos - 1.0f), 2.0f)))) - (2.0f * maxCos))));
}
function code(ux, uy, maxCos) return Float32(sin(fma(Float32(-uy), Float32(Float32(pi) + Float32(pi)), Float32(Float32(0.5) * Float32(pi)))) * sqrt(Float32(ux * Float32(Float32(Float32(2.0) + Float32(Float32(-1.0) * Float32(ux * (Float32(maxCos - Float32(1.0)) ^ Float32(2.0))))) - Float32(Float32(2.0) * maxCos))))) end
\sin \left(\mathsf{fma}\left(-uy, \pi + \pi, 0.5 \cdot \pi\right)\right) \cdot \sqrt{ux \cdot \left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right)}
Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
lift-cos.f32N/A
cos-neg-revN/A
lift-*.f32N/A
lift-*.f32N/A
associate-*l*N/A
count-2N/A
lift-+.f32N/A
*-commutativeN/A
lift-*.f32N/A
sin-+PI/2-revN/A
lower-sin.f32N/A
lift-*.f32N/A
*-commutativeN/A
distribute-lft-neg-inN/A
lower-fma.f32N/A
lower-neg.f32N/A
lift-PI.f32N/A
mult-flip-revN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f3299.1%
Applied rewrites99.1%
(FPCore (ux uy maxCos)
:precision binary32
(*
(sin (fma -2.0 (* uy PI) (* 0.5 PI)))
(sqrt
(*
ux
(-
(+ 2.0 (* -1.0 (* ux (pow (- maxCos 1.0) 2.0))))
(* 2.0 maxCos))))))float code(float ux, float uy, float maxCos) {
return sinf(fmaf(-2.0f, (uy * ((float) M_PI)), (0.5f * ((float) M_PI)))) * sqrtf((ux * ((2.0f + (-1.0f * (ux * powf((maxCos - 1.0f), 2.0f)))) - (2.0f * maxCos))));
}
function code(ux, uy, maxCos) return Float32(sin(fma(Float32(-2.0), Float32(uy * Float32(pi)), Float32(Float32(0.5) * Float32(pi)))) * sqrt(Float32(ux * Float32(Float32(Float32(2.0) + Float32(Float32(-1.0) * Float32(ux * (Float32(maxCos - Float32(1.0)) ^ Float32(2.0))))) - Float32(Float32(2.0) * maxCos))))) end
\sin \left(\mathsf{fma}\left(-2, uy \cdot \pi, 0.5 \cdot \pi\right)\right) \cdot \sqrt{ux \cdot \left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right)}
Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
lift-cos.f32N/A
cos-neg-revN/A
lift-*.f32N/A
lift-*.f32N/A
associate-*l*N/A
count-2N/A
lift-+.f32N/A
*-commutativeN/A
lift-*.f32N/A
sin-+PI/2-revN/A
lower-sin.f32N/A
lift-*.f32N/A
*-commutativeN/A
distribute-lft-neg-inN/A
lower-fma.f32N/A
lower-neg.f32N/A
lift-PI.f32N/A
mult-flip-revN/A
metadata-evalN/A
*-commutativeN/A
lower-*.f3299.1%
Applied rewrites99.1%
Taylor expanded in uy around 0
lower-fma.f32N/A
lower-*.f32N/A
lower-PI.f32N/A
lower-*.f32N/A
lower-PI.f3299.0%
Applied rewrites99.0%
(FPCore (ux uy maxCos)
:precision binary32
(*
(cos (* (* uy 2.0) PI))
(sqrt
(*
ux
(-
(- (fma (* (- 1.0 maxCos) (- maxCos 1.0)) ux 2.0) maxCos)
maxCos)))))float code(float ux, float uy, float maxCos) {
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((ux * ((fmaf(((1.0f - maxCos) * (maxCos - 1.0f)), ux, 2.0f) - maxCos) - maxCos)));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(ux * Float32(Float32(fma(Float32(Float32(Float32(1.0) - maxCos) * Float32(maxCos - Float32(1.0))), ux, Float32(2.0)) - maxCos) - maxCos)))) end
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(\left(\mathsf{fma}\left(\left(1 - maxCos\right) \cdot \left(maxCos - 1\right), ux, 2\right) - maxCos\right) - maxCos\right)}
Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in ux around inf
lower-*.f32N/A
lower-fma.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f32N/A
lower-/.f3298.8%
Applied rewrites98.8%
lift--.f32N/A
lift-*.f32N/A
count-2-revN/A
associate--r+N/A
lower--.f32N/A
Applied rewrites98.9%
(FPCore (ux uy maxCos) :precision binary32 (let* ((t_0 (- ux (* maxCos ux)))) (* (cos (* (* uy 2.0) 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 cosf(((uy * 2.0f) * ((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(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(t_0 - Float32(0.0)) * Float32(-Float32(t_0 - Float32(2.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(0.0)) * -(t_0 - single(2.0)))); end
\begin{array}{l}
t_0 := ux - maxCos \cdot ux\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(t\_0 - 0\right) \cdot \left(-\left(t\_0 - 2\right)\right)}
\end{array}
Initial program 57.3%
lift--.f32N/A
sub-negate-revN/A
lift-*.f32N/A
sqr-neg-revN/A
difference-of-sqr-1N/A
distribute-rgt-neg-inN/A
lower-*.f32N/A
Applied rewrites99.0%
(FPCore (ux uy maxCos) :precision binary32 (* (cos (* (* uy 2.0) PI)) (sqrt (* ux (+ 2.0 (fma -1.0 ux (* maxCos (- (* 2.0 ux) 2.0))))))))
float code(float ux, float uy, float maxCos) {
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((ux * (2.0f + fmaf(-1.0f, ux, (maxCos * ((2.0f * ux) - 2.0f))))));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(ux * Float32(Float32(2.0) + fma(Float32(-1.0), ux, Float32(maxCos * Float32(Float32(Float32(2.0) * ux) - Float32(2.0)))))))) end
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(2 + \mathsf{fma}\left(-1, ux, maxCos \cdot \left(2 \cdot ux - 2\right)\right)\right)}
Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in maxCos around 0
lower-+.f32N/A
lower-fma.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3298.4%
Applied rewrites98.4%
(FPCore (ux uy maxCos) :precision binary32 (* (cos (* (* uy 2.0) PI)) (sqrt (* ux (- (+ 2.0 (* -1.0 ux)) (* 2.0 maxCos))))))
float code(float ux, float uy, float maxCos) {
return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((ux * ((2.0f + (-1.0f * ux)) - (2.0f * maxCos))));
}
function code(ux, uy, maxCos) return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * 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 = cos(((uy * single(2.0)) * single(pi))) * sqrt((ux * ((single(2.0) + (single(-1.0) * ux)) - (single(2.0) * maxCos)))); end
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(\left(2 + -1 \cdot ux\right) - 2 \cdot maxCos\right)}
Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in maxCos around 0
lower-+.f32N/A
lower-*.f3297.6%
Applied rewrites97.6%
(FPCore (ux uy maxCos)
:precision binary32
(if (<= uy 0.0035000001080334187)
(*
(sqrt
(*
(-
2.0
(fma (* ux (- maxCos 1.0)) (- maxCos 1.0) (+ maxCos maxCos)))
ux))
(fma (* (* (* uy uy) -2.0) PI) PI 1.0))
(*
(sin (* PI (+ (- uy) (- (- uy) -0.5))))
(sqrt (* ux (+ 2.0 (* -1.0 ux)))))))float code(float ux, float uy, float maxCos) {
float tmp;
if (uy <= 0.0035000001080334187f) {
tmp = sqrtf(((2.0f - fmaf((ux * (maxCos - 1.0f)), (maxCos - 1.0f), (maxCos + maxCos))) * ux)) * fmaf((((uy * uy) * -2.0f) * ((float) M_PI)), ((float) M_PI), 1.0f);
} else {
tmp = sinf((((float) M_PI) * (-uy + (-uy - -0.5f)))) * sqrtf((ux * (2.0f + (-1.0f * ux))));
}
return tmp;
}
function code(ux, uy, maxCos) tmp = Float32(0.0) if (uy <= Float32(0.0035000001080334187)) tmp = Float32(sqrt(Float32(Float32(Float32(2.0) - fma(Float32(ux * Float32(maxCos - Float32(1.0))), Float32(maxCos - Float32(1.0)), Float32(maxCos + maxCos))) * ux)) * fma(Float32(Float32(Float32(uy * uy) * Float32(-2.0)) * Float32(pi)), Float32(pi), Float32(1.0))); else tmp = Float32(sin(Float32(Float32(pi) * Float32(Float32(-uy) + Float32(Float32(-uy) - Float32(-0.5))))) * sqrt(Float32(ux * Float32(Float32(2.0) + Float32(Float32(-1.0) * ux))))); end return tmp end
\begin{array}{l}
\mathbf{if}\;uy \leq 0.0035000001080334187:\\
\;\;\;\;\sqrt{\left(2 - \mathsf{fma}\left(ux \cdot \left(maxCos - 1\right), maxCos - 1, maxCos + maxCos\right)\right) \cdot ux} \cdot \mathsf{fma}\left(\left(\left(uy \cdot uy\right) \cdot -2\right) \cdot \pi, \pi, 1\right)\\
\mathbf{else}:\\
\;\;\;\;\sin \left(\pi \cdot \left(\left(-uy\right) + \left(\left(-uy\right) - -0.5\right)\right)\right) \cdot \sqrt{ux \cdot \left(2 + -1 \cdot ux\right)}\\
\end{array}
if uy < 0.00350000011Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in uy around 0
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower-pow.f32N/A
lower-PI.f3288.5%
Applied rewrites88.5%
Applied rewrites88.5%
if 0.00350000011 < uy Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in maxCos around 0
lower-*.f32N/A
lower-+.f32N/A
lower-*.f3292.9%
Applied rewrites92.9%
lift-cos.f32N/A
cos-neg-revN/A
sin-+PI/2-revN/A
lift-*.f32N/A
lift-*.f32N/A
associate-*l*N/A
distribute-lft-neg-inN/A
lift-neg.f32N/A
count-2-revN/A
distribute-lft-outN/A
lift-PI.f32N/A
mult-flipN/A
metadata-evalN/A
*-commutativeN/A
lift-*.f32N/A
associate-+r+N/A
lift-fma.f32N/A
lift-fma.f32N/A
Applied rewrites93.0%
(FPCore (ux uy maxCos)
:precision binary32
(if (<= uy 0.0035000001080334187)
(*
(sqrt
(*
(-
2.0
(fma (* ux (- maxCos 1.0)) (- maxCos 1.0) (+ maxCos maxCos)))
ux))
(fma (* (* (* uy uy) -2.0) PI) PI 1.0))
(* (sqrt (* (- 2.0 ux) ux)) (cos (* PI (+ uy uy))))))float code(float ux, float uy, float maxCos) {
float tmp;
if (uy <= 0.0035000001080334187f) {
tmp = sqrtf(((2.0f - fmaf((ux * (maxCos - 1.0f)), (maxCos - 1.0f), (maxCos + maxCos))) * ux)) * fmaf((((uy * uy) * -2.0f) * ((float) M_PI)), ((float) M_PI), 1.0f);
} else {
tmp = sqrtf(((2.0f - ux) * ux)) * cosf((((float) M_PI) * (uy + uy)));
}
return tmp;
}
function code(ux, uy, maxCos) tmp = Float32(0.0) if (uy <= Float32(0.0035000001080334187)) tmp = Float32(sqrt(Float32(Float32(Float32(2.0) - fma(Float32(ux * Float32(maxCos - Float32(1.0))), Float32(maxCos - Float32(1.0)), Float32(maxCos + maxCos))) * ux)) * fma(Float32(Float32(Float32(uy * uy) * Float32(-2.0)) * Float32(pi)), Float32(pi), Float32(1.0))); else tmp = Float32(sqrt(Float32(Float32(Float32(2.0) - ux) * ux)) * cos(Float32(Float32(pi) * Float32(uy + uy)))); end return tmp end
\begin{array}{l}
\mathbf{if}\;uy \leq 0.0035000001080334187:\\
\;\;\;\;\sqrt{\left(2 - \mathsf{fma}\left(ux \cdot \left(maxCos - 1\right), maxCos - 1, maxCos + maxCos\right)\right) \cdot ux} \cdot \mathsf{fma}\left(\left(\left(uy \cdot uy\right) \cdot -2\right) \cdot \pi, \pi, 1\right)\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\left(2 - ux\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right)\\
\end{array}
if uy < 0.00350000011Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in uy around 0
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower-pow.f32N/A
lower-PI.f3288.5%
Applied rewrites88.5%
Applied rewrites88.5%
if 0.00350000011 < uy Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in maxCos around 0
lower-*.f32N/A
lower-+.f32N/A
lower-*.f3292.9%
Applied rewrites92.9%
lift-*.f32N/A
*-commutativeN/A
lower-*.f3292.9%
Applied rewrites92.9%
(FPCore (ux uy maxCos)
:precision binary32
(*
(sqrt
(*
(-
2.0
(fma (* ux (- maxCos 1.0)) (- maxCos 1.0) (+ maxCos maxCos)))
ux))
(fma (* (* (* uy uy) -2.0) PI) PI 1.0)))float code(float ux, float uy, float maxCos) {
return sqrtf(((2.0f - fmaf((ux * (maxCos - 1.0f)), (maxCos - 1.0f), (maxCos + maxCos))) * ux)) * fmaf((((uy * uy) * -2.0f) * ((float) M_PI)), ((float) M_PI), 1.0f);
}
function code(ux, uy, maxCos) return Float32(sqrt(Float32(Float32(Float32(2.0) - fma(Float32(ux * Float32(maxCos - Float32(1.0))), Float32(maxCos - Float32(1.0)), Float32(maxCos + maxCos))) * ux)) * fma(Float32(Float32(Float32(uy * uy) * Float32(-2.0)) * Float32(pi)), Float32(pi), Float32(1.0))) end
\sqrt{\left(2 - \mathsf{fma}\left(ux \cdot \left(maxCos - 1\right), maxCos - 1, maxCos + maxCos\right)\right) \cdot ux} \cdot \mathsf{fma}\left(\left(\left(uy \cdot uy\right) \cdot -2\right) \cdot \pi, \pi, 1\right)
Initial program 57.3%
Taylor expanded in ux around 0
lower-*.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3299.0%
Applied rewrites99.0%
Taylor expanded in uy around 0
lower-+.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower-pow.f32N/A
lower-PI.f3288.5%
Applied rewrites88.5%
Applied rewrites88.5%
(FPCore (ux uy maxCos) :precision binary32 (let* ((t_0 (- ux (* maxCos ux)))) (sqrt (- (* 2.0 t_0) (pow t_0 2.0)))))
float code(float ux, float uy, float maxCos) {
float t_0 = ux - (maxCos * ux);
return sqrtf(((2.0f * t_0) - powf(t_0, 2.0f)));
}
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
real(4) :: t_0
t_0 = ux - (maxcos * ux)
code = sqrt(((2.0e0 * t_0) - (t_0 ** 2.0e0)))
end function
function code(ux, uy, maxCos) t_0 = Float32(ux - Float32(maxCos * ux)) return sqrt(Float32(Float32(Float32(2.0) * t_0) - (t_0 ^ Float32(2.0)))) end
function tmp = code(ux, uy, maxCos) t_0 = ux - (maxCos * ux); tmp = sqrt(((single(2.0) * t_0) - (t_0 ^ single(2.0)))); end
\begin{array}{l}
t_0 := ux - maxCos \cdot ux\\
\sqrt{2 \cdot t\_0 - {t\_0}^{2}}
\end{array}
Initial program 57.3%
lift--.f32N/A
lift-*.f32N/A
pow2N/A
lift-+.f32N/A
lift--.f32N/A
associate-+l-N/A
sub-square-powN/A
associate--r+N/A
lower--.f32N/A
Applied rewrites59.0%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-*.f3280.3%
Applied rewrites80.3%
(FPCore (ux uy maxCos) :precision binary32 (sqrt (- (fma -2.0 ux (pow ux 2.0)))))
float code(float ux, float uy, float maxCos) {
return sqrtf(-fmaf(-2.0f, ux, powf(ux, 2.0f)));
}
function code(ux, uy, maxCos) return sqrt(Float32(-fma(Float32(-2.0), ux, (ux ^ Float32(2.0))))) end
\sqrt{-\mathsf{fma}\left(-2, ux, {ux}^{2}\right)}
Initial program 57.3%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f3249.3%
Applied rewrites49.3%
lift-pow.f32N/A
lift--.f32N/A
sub-square-powN/A
+-commutativeN/A
unpow2N/A
lower-fma.f32N/A
fp-cancel-sub-sign-invN/A
unpow2N/A
lower-fma.f32N/A
lift-+.f32N/A
+-commutativeN/A
lift-*.f32N/A
lift-fma.f32N/A
lift-+.f32N/A
+-commutativeN/A
lift-*.f32N/A
lift-fma.f32N/A
metadata-evalN/A
lower-*.f32N/A
lower-*.f3251.4%
Applied rewrites51.4%
Taylor expanded in maxCos around 0
lower-sqrt.f32N/A
lower-neg.f32N/A
lower-fma.f32N/A
lower-pow.f3276.0%
Applied rewrites76.0%
(FPCore (ux uy maxCos)
:precision binary32
(let* ((t_0 (+ (- 1.0 ux) (* ux maxCos))))
(if (<= (sqrt (- 1.0 (* t_0 t_0))) 0.01850000023841858)
(sqrt (* (fma -2.0 maxCos 2.0) ux))
(sqrt
(fma
(fma maxCos ux (- 1.0 ux))
(- ux (fma maxCos ux 1.0))
1.0)))))float code(float ux, float uy, float maxCos) {
float t_0 = (1.0f - ux) + (ux * maxCos);
float tmp;
if (sqrtf((1.0f - (t_0 * t_0))) <= 0.01850000023841858f) {
tmp = sqrtf((fmaf(-2.0f, maxCos, 2.0f) * ux));
} else {
tmp = sqrtf(fmaf(fmaf(maxCos, ux, (1.0f - ux)), (ux - fmaf(maxCos, ux, 1.0f)), 1.0f));
}
return tmp;
}
function code(ux, uy, maxCos) t_0 = Float32(Float32(Float32(1.0) - ux) + Float32(ux * maxCos)) tmp = Float32(0.0) if (sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))) <= Float32(0.01850000023841858)) tmp = sqrt(Float32(fma(Float32(-2.0), maxCos, Float32(2.0)) * ux)); else tmp = sqrt(fma(fma(maxCos, ux, Float32(Float32(1.0) - ux)), Float32(ux - fma(maxCos, ux, Float32(1.0))), Float32(1.0))); end return tmp end
\begin{array}{l}
t_0 := \left(1 - ux\right) + ux \cdot maxCos\\
\mathbf{if}\;\sqrt{1 - t\_0 \cdot t\_0} \leq 0.01850000023841858:\\
\;\;\;\;\sqrt{\mathsf{fma}\left(-2, maxCos, 2\right) \cdot ux}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(maxCos, ux, 1 - ux\right), ux - \mathsf{fma}\left(maxCos, ux, 1\right), 1\right)}\\
\end{array}
if (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos)) (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos))))) < 0.0185000002Initial program 57.3%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f3249.3%
Applied rewrites49.3%
Taylor expanded in ux around 0
lower-sqrt.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3264.9%
Applied rewrites64.9%
lift-*.f32N/A
*-commutativeN/A
lower-*.f3264.9%
lift--.f32N/A
sub-flipN/A
+-commutativeN/A
lift-*.f32N/A
distribute-lft-neg-outN/A
metadata-evalN/A
lower-fma.f3264.9%
Applied rewrites64.9%
if 0.0185000002 < (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos)) (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos))))) Initial program 57.3%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f3249.3%
Applied rewrites49.3%
lift-pow.f32N/A
lift--.f32N/A
sub-square-powN/A
+-commutativeN/A
unpow2N/A
lower-fma.f32N/A
fp-cancel-sub-sign-invN/A
unpow2N/A
lower-fma.f32N/A
lift-+.f32N/A
+-commutativeN/A
lift-*.f32N/A
lift-fma.f32N/A
lift-+.f32N/A
+-commutativeN/A
lift-*.f32N/A
lift-fma.f32N/A
metadata-evalN/A
lower-*.f32N/A
lower-*.f3251.4%
Applied rewrites51.4%
lift--.f32N/A
sub-flipN/A
+-commutativeN/A
Applied rewrites49.5%
(FPCore (ux uy maxCos)
:precision binary32
(let* ((t_0 (+ (- 1.0 ux) (* ux maxCos))))
(if (<= (sqrt (- 1.0 (* t_0 t_0))) 0.01850000023841858)
(sqrt (* (fma -2.0 maxCos 2.0) ux))
(sqrt
(fma
(- (fma maxCos ux 1.0) ux)
(- ux (fma maxCos ux 1.0))
1.0)))))float code(float ux, float uy, float maxCos) {
float t_0 = (1.0f - ux) + (ux * maxCos);
float tmp;
if (sqrtf((1.0f - (t_0 * t_0))) <= 0.01850000023841858f) {
tmp = sqrtf((fmaf(-2.0f, maxCos, 2.0f) * ux));
} else {
tmp = sqrtf(fmaf((fmaf(maxCos, ux, 1.0f) - ux), (ux - fmaf(maxCos, ux, 1.0f)), 1.0f));
}
return tmp;
}
function code(ux, uy, maxCos) t_0 = Float32(Float32(Float32(1.0) - ux) + Float32(ux * maxCos)) tmp = Float32(0.0) if (sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))) <= Float32(0.01850000023841858)) tmp = sqrt(Float32(fma(Float32(-2.0), maxCos, Float32(2.0)) * ux)); else tmp = sqrt(fma(Float32(fma(maxCos, ux, Float32(1.0)) - ux), Float32(ux - fma(maxCos, ux, Float32(1.0))), Float32(1.0))); end return tmp end
\begin{array}{l}
t_0 := \left(1 - ux\right) + ux \cdot maxCos\\
\mathbf{if}\;\sqrt{1 - t\_0 \cdot t\_0} \leq 0.01850000023841858:\\
\;\;\;\;\sqrt{\mathsf{fma}\left(-2, maxCos, 2\right) \cdot ux}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\mathsf{fma}\left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux, ux - \mathsf{fma}\left(maxCos, ux, 1\right), 1\right)}\\
\end{array}
if (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos)) (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos))))) < 0.0185000002Initial program 57.3%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f3249.3%
Applied rewrites49.3%
Taylor expanded in ux around 0
lower-sqrt.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3264.9%
Applied rewrites64.9%
lift-*.f32N/A
*-commutativeN/A
lower-*.f3264.9%
lift--.f32N/A
sub-flipN/A
+-commutativeN/A
lift-*.f32N/A
distribute-lft-neg-outN/A
metadata-evalN/A
lower-fma.f3264.9%
Applied rewrites64.9%
if 0.0185000002 < (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos)) (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos))))) Initial program 57.3%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f3249.3%
Applied rewrites49.3%
lift--.f32N/A
lift-pow.f32N/A
unpow2N/A
lift--.f32N/A
sub-negate-revN/A
lift-+.f32N/A
+-commutativeN/A
lift-*.f32N/A
lift-fma.f32N/A
lift--.f32N/A
lift--.f32N/A
lift-+.f32N/A
+-commutativeN/A
associate-+r-N/A
lift--.f32N/A
lift-*.f32N/A
lift-fma.f32N/A
fp-cancel-sign-sub-invN/A
+-commutativeN/A
Applied rewrites49.4%
(FPCore (ux uy maxCos) :precision binary32 (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.3%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f3249.3%
Applied rewrites49.3%
Taylor expanded in ux around 0
lower-sqrt.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3264.9%
Applied rewrites64.9%
lift-*.f32N/A
*-commutativeN/A
lower-*.f3264.9%
lift--.f32N/A
sub-flipN/A
+-commutativeN/A
lift-*.f32N/A
distribute-lft-neg-outN/A
metadata-evalN/A
lower-fma.f3264.9%
Applied rewrites64.9%
(FPCore (ux uy maxCos) :precision binary32 (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.3%
Taylor expanded in uy around 0
lower-sqrt.f32N/A
lower--.f32N/A
lower-pow.f32N/A
lower--.f32N/A
lower-+.f32N/A
lower-*.f3249.3%
Applied rewrites49.3%
Taylor expanded in ux around 0
lower-sqrt.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3264.9%
Applied rewrites64.9%
Taylor expanded in maxCos around 0
lower-*.f3262.4%
Applied rewrites62.4%
lift-*.f32N/A
count-2-revN/A
lower-+.f3262.4%
Applied rewrites62.4%
herbie shell --seed 2025323
(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)))))))