
(FPCore (alpha u0) :precision binary32 (* (* (- alpha) alpha) (log (- 1.0 u0))))
float code(float alpha, float u0) {
return (-alpha * alpha) * logf((1.0f - u0));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = (-alpha * alpha) * log((1.0e0 - u0))
end function
function code(alpha, u0) return Float32(Float32(Float32(-alpha) * alpha) * log(Float32(Float32(1.0) - u0))) end
function tmp = code(alpha, u0) tmp = (-alpha * alpha) * log((single(1.0) - u0)); end
\begin{array}{l}
\\
\left(\left(-\alpha\right) \cdot \alpha\right) \cdot \log \left(1 - u0\right)
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 14 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (alpha u0) :precision binary32 (* (* (- alpha) alpha) (log (- 1.0 u0))))
float code(float alpha, float u0) {
return (-alpha * alpha) * logf((1.0f - u0));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = (-alpha * alpha) * log((1.0e0 - u0))
end function
function code(alpha, u0) return Float32(Float32(Float32(-alpha) * alpha) * log(Float32(Float32(1.0) - u0))) end
function tmp = code(alpha, u0) tmp = (-alpha * alpha) * log((single(1.0) - u0)); end
\begin{array}{l}
\\
\left(\left(-\alpha\right) \cdot \alpha\right) \cdot \log \left(1 - u0\right)
\end{array}
(FPCore (alpha u0) :precision binary32 (* (* alpha (- alpha)) (log1p (- u0))))
float code(float alpha, float u0) {
return (alpha * -alpha) * log1pf(-u0);
}
function code(alpha, u0) return Float32(Float32(alpha * Float32(-alpha)) * log1p(Float32(-u0))) end
\begin{array}{l}
\\
\left(\alpha \cdot \left(-\alpha\right)\right) \cdot \mathsf{log1p}\left(-u0\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Final simplification98.9%
(FPCore (alpha u0) :precision binary32 (* alpha (* (- alpha) (log1p (- u0)))))
float code(float alpha, float u0) {
return alpha * (-alpha * log1pf(-u0));
}
function code(alpha, u0) return Float32(alpha * Float32(Float32(-alpha) * log1p(Float32(-u0)))) end
\begin{array}{l}
\\
\alpha \cdot \left(\left(-\alpha\right) \cdot \mathsf{log1p}\left(-u0\right)\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Applied rewrites98.8%
lift-neg.f32N/A
lift-neg.f32N/A
lift-*.f32N/A
lift-log1p.f32N/A
lift-log1p.f32N/A
lift--.f32N/A
associate-*l*N/A
*-commutativeN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f32N/A
Applied rewrites98.9%
Final simplification98.9%
(FPCore (alpha u0) :precision binary32 (fma (* alpha alpha) (fma 0.5 (* u0 u0) u0) (* (* u0 u0) (* (* alpha alpha) (* u0 (fma u0 0.25 0.3333333333333333))))))
float code(float alpha, float u0) {
return fmaf((alpha * alpha), fmaf(0.5f, (u0 * u0), u0), ((u0 * u0) * ((alpha * alpha) * (u0 * fmaf(u0, 0.25f, 0.3333333333333333f)))));
}
function code(alpha, u0) return fma(Float32(alpha * alpha), fma(Float32(0.5), Float32(u0 * u0), u0), Float32(Float32(u0 * u0) * Float32(Float32(alpha * alpha) * Float32(u0 * fma(u0, Float32(0.25), Float32(0.3333333333333333)))))) end
\begin{array}{l}
\\
\mathsf{fma}\left(\alpha \cdot \alpha, \mathsf{fma}\left(0.5, u0 \cdot u0, u0\right), \left(u0 \cdot u0\right) \cdot \left(\left(\alpha \cdot \alpha\right) \cdot \left(u0 \cdot \mathsf{fma}\left(u0, 0.25, 0.3333333333333333\right)\right)\right)\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Taylor expanded in u0 around 0
lower-*.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
associate-*r*N/A
associate-+r+N/A
+-commutativeN/A
*-commutativeN/A
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites92.8%
lift-*.f32N/A
lift-*.f32N/A
lift-fma.f32N/A
lift-*.f32N/A
lift-*.f32N/A
lift-fma.f32N/A
lift-*.f32N/A
+-commutativeN/A
distribute-lft-inN/A
Applied rewrites93.0%
(FPCore (alpha u0)
:precision binary32
(*
u0
(fma
(* alpha (* u0 0.5))
alpha
(fma
alpha
alpha
(* (* alpha alpha) (* u0 (* u0 (fma u0 0.25 0.3333333333333333))))))))
float code(float alpha, float u0) {
return u0 * fmaf((alpha * (u0 * 0.5f)), alpha, fmaf(alpha, alpha, ((alpha * alpha) * (u0 * (u0 * fmaf(u0, 0.25f, 0.3333333333333333f))))));
}
function code(alpha, u0) return Float32(u0 * fma(Float32(alpha * Float32(u0 * Float32(0.5))), alpha, fma(alpha, alpha, Float32(Float32(alpha * alpha) * Float32(u0 * Float32(u0 * fma(u0, Float32(0.25), Float32(0.3333333333333333)))))))) end
\begin{array}{l}
\\
u0 \cdot \mathsf{fma}\left(\alpha \cdot \left(u0 \cdot 0.5\right), \alpha, \mathsf{fma}\left(\alpha, \alpha, \left(\alpha \cdot \alpha\right) \cdot \left(u0 \cdot \left(u0 \cdot \mathsf{fma}\left(u0, 0.25, 0.3333333333333333\right)\right)\right)\right)\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Taylor expanded in u0 around 0
lower-*.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
associate-*r*N/A
associate-+r+N/A
+-commutativeN/A
*-commutativeN/A
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites92.8%
lift-*.f32N/A
lift-*.f32N/A
lift-fma.f32N/A
lift-*.f32N/A
lift-*.f32N/A
lift-fma.f32N/A
lift-*.f32N/A
+-commutativeN/A
lift-*.f32N/A
lift-fma.f32N/A
distribute-lft-inN/A
*-rgt-identityN/A
associate-+l+N/A
*-commutativeN/A
lift-*.f32N/A
associate-*r*N/A
Applied rewrites93.0%
Final simplification93.0%
(FPCore (alpha u0)
:precision binary32
(*
u0
(fma
u0
(fma
(* alpha (* alpha u0))
(fma 0.25 u0 0.3333333333333333)
(* (* alpha alpha) 0.5))
(* alpha alpha))))
float code(float alpha, float u0) {
return u0 * fmaf(u0, fmaf((alpha * (alpha * u0)), fmaf(0.25f, u0, 0.3333333333333333f), ((alpha * alpha) * 0.5f)), (alpha * alpha));
}
function code(alpha, u0) return Float32(u0 * fma(u0, fma(Float32(alpha * Float32(alpha * u0)), fma(Float32(0.25), u0, Float32(0.3333333333333333)), Float32(Float32(alpha * alpha) * Float32(0.5))), Float32(alpha * alpha))) end
\begin{array}{l}
\\
u0 \cdot \mathsf{fma}\left(u0, \mathsf{fma}\left(\alpha \cdot \left(\alpha \cdot u0\right), \mathsf{fma}\left(0.25, u0, 0.3333333333333333\right), \left(\alpha \cdot \alpha\right) \cdot 0.5\right), \alpha \cdot \alpha\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Applied rewrites98.8%
Taylor expanded in u0 around 0
lower-*.f32N/A
lower-fma.f32N/A
Applied rewrites93.0%
(FPCore (alpha u0) :precision binary32 (* u0 (fma u0 (* (* alpha alpha) (fma u0 (fma u0 0.25 0.3333333333333333) 0.5)) (* alpha alpha))))
float code(float alpha, float u0) {
return u0 * fmaf(u0, ((alpha * alpha) * fmaf(u0, fmaf(u0, 0.25f, 0.3333333333333333f), 0.5f)), (alpha * alpha));
}
function code(alpha, u0) return Float32(u0 * fma(u0, Float32(Float32(alpha * alpha) * fma(u0, fma(u0, Float32(0.25), Float32(0.3333333333333333)), Float32(0.5))), Float32(alpha * alpha))) end
\begin{array}{l}
\\
u0 \cdot \mathsf{fma}\left(u0, \left(\alpha \cdot \alpha\right) \cdot \mathsf{fma}\left(u0, \mathsf{fma}\left(u0, 0.25, 0.3333333333333333\right), 0.5\right), \alpha \cdot \alpha\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Applied rewrites98.8%
lift-neg.f32N/A
*-commutativeN/A
lift-*.f32N/A
lift-neg.f32N/A
lift-*.f32N/A
lift-log1p.f32N/A
lift-log1p.f32N/A
sub-negN/A
distribute-lft-inN/A
lower-fma.f32N/A
lift-*.f32N/A
lift-neg.f32N/A
distribute-rgt-neg-outN/A
lift-*.f32N/A
lower-neg.f32N/A
lower-*.f32N/A
Applied rewrites98.9%
Taylor expanded in u0 around 0
Applied rewrites93.0%
(FPCore (alpha u0) :precision binary32 (* (* alpha (* alpha u0)) (fma u0 (fma u0 (fma u0 0.25 0.3333333333333333) 0.5) 1.0)))
float code(float alpha, float u0) {
return (alpha * (alpha * u0)) * fmaf(u0, fmaf(u0, fmaf(u0, 0.25f, 0.3333333333333333f), 0.5f), 1.0f);
}
function code(alpha, u0) return Float32(Float32(alpha * Float32(alpha * u0)) * fma(u0, fma(u0, fma(u0, Float32(0.25), Float32(0.3333333333333333)), Float32(0.5)), Float32(1.0))) end
\begin{array}{l}
\\
\left(\alpha \cdot \left(\alpha \cdot u0\right)\right) \cdot \mathsf{fma}\left(u0, \mathsf{fma}\left(u0, \mathsf{fma}\left(u0, 0.25, 0.3333333333333333\right), 0.5\right), 1\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Taylor expanded in u0 around 0
lower-*.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
associate-*r*N/A
associate-+r+N/A
+-commutativeN/A
*-commutativeN/A
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites92.8%
Taylor expanded in alpha around 0
associate-*r*N/A
lower-*.f32N/A
unpow2N/A
associate-*l*N/A
lower-*.f32N/A
lower-*.f32N/A
+-commutativeN/A
+-commutativeN/A
unpow2N/A
associate-*l*N/A
*-commutativeN/A
distribute-lft-outN/A
lower-fma.f32N/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3292.8
Applied rewrites92.8%
(FPCore (alpha u0) :precision binary32 (* u0 (* (* alpha alpha) (fma u0 (fma u0 (fma u0 0.25 0.3333333333333333) 0.5) 1.0))))
float code(float alpha, float u0) {
return u0 * ((alpha * alpha) * fmaf(u0, fmaf(u0, fmaf(u0, 0.25f, 0.3333333333333333f), 0.5f), 1.0f));
}
function code(alpha, u0) return Float32(u0 * Float32(Float32(alpha * alpha) * fma(u0, fma(u0, fma(u0, Float32(0.25), Float32(0.3333333333333333)), Float32(0.5)), Float32(1.0)))) end
\begin{array}{l}
\\
u0 \cdot \left(\left(\alpha \cdot \alpha\right) \cdot \mathsf{fma}\left(u0, \mathsf{fma}\left(u0, \mathsf{fma}\left(u0, 0.25, 0.3333333333333333\right), 0.5\right), 1\right)\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Taylor expanded in u0 around 0
lower-*.f32N/A
+-commutativeN/A
distribute-rgt-inN/A
associate-*r*N/A
associate-+r+N/A
+-commutativeN/A
*-commutativeN/A
+-commutativeN/A
lower-fma.f32N/A
Applied rewrites92.8%
Taylor expanded in alpha around 0
lower-*.f32N/A
unpow2N/A
lower-*.f32N/A
+-commutativeN/A
+-commutativeN/A
unpow2N/A
associate-*l*N/A
*-commutativeN/A
distribute-lft-outN/A
lower-fma.f32N/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3292.8
Applied rewrites92.8%
(FPCore (alpha u0) :precision binary32 (* u0 (fma alpha alpha (* (* alpha alpha) (* u0 (fma u0 0.3333333333333333 0.5))))))
float code(float alpha, float u0) {
return u0 * fmaf(alpha, alpha, ((alpha * alpha) * (u0 * fmaf(u0, 0.3333333333333333f, 0.5f))));
}
function code(alpha, u0) return Float32(u0 * fma(alpha, alpha, Float32(Float32(alpha * alpha) * Float32(u0 * fma(u0, Float32(0.3333333333333333), Float32(0.5)))))) end
\begin{array}{l}
\\
u0 \cdot \mathsf{fma}\left(\alpha, \alpha, \left(\alpha \cdot \alpha\right) \cdot \left(u0 \cdot \mathsf{fma}\left(u0, 0.3333333333333333, 0.5\right)\right)\right)
\end{array}
Initial program 54.0%
Taylor expanded in u0 around 0
lower-*.f32N/A
lower-fma.f32N/A
*-commutativeN/A
associate-*r*N/A
distribute-rgt-outN/A
unpow2N/A
+-commutativeN/A
associate-*l*N/A
lower-*.f32N/A
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
unpow2N/A
lower-*.f3291.1
Applied rewrites91.1%
lift-fma.f32N/A
lift-*.f32N/A
lift-*.f32N/A
lift-*.f32N/A
+-commutativeN/A
lift-*.f32N/A
lower-fma.f32N/A
*-commutativeN/A
lift-*.f32N/A
lift-*.f32N/A
associate-*r*N/A
lift-*.f32N/A
associate-*l*N/A
lower-*.f32N/A
lower-*.f3291.4
Applied rewrites91.4%
Final simplification91.4%
(FPCore (alpha u0) :precision binary32 (* (* alpha alpha) (fma (* u0 u0) (fma u0 0.3333333333333333 0.5) u0)))
float code(float alpha, float u0) {
return (alpha * alpha) * fmaf((u0 * u0), fmaf(u0, 0.3333333333333333f, 0.5f), u0);
}
function code(alpha, u0) return Float32(Float32(alpha * alpha) * fma(Float32(u0 * u0), fma(u0, Float32(0.3333333333333333), Float32(0.5)), u0)) end
\begin{array}{l}
\\
\left(\alpha \cdot \alpha\right) \cdot \mathsf{fma}\left(u0 \cdot u0, \mathsf{fma}\left(u0, 0.3333333333333333, 0.5\right), u0\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Taylor expanded in u0 around 0
*-commutativeN/A
Applied rewrites91.2%
(FPCore (alpha u0) :precision binary32 (* u0 (* alpha (* alpha (fma u0 (fma u0 0.3333333333333333 0.5) 1.0)))))
float code(float alpha, float u0) {
return u0 * (alpha * (alpha * fmaf(u0, fmaf(u0, 0.3333333333333333f, 0.5f), 1.0f)));
}
function code(alpha, u0) return Float32(u0 * Float32(alpha * Float32(alpha * fma(u0, fma(u0, Float32(0.3333333333333333), Float32(0.5)), Float32(1.0))))) end
\begin{array}{l}
\\
u0 \cdot \left(\alpha \cdot \left(\alpha \cdot \mathsf{fma}\left(u0, \mathsf{fma}\left(u0, 0.3333333333333333, 0.5\right), 1\right)\right)\right)
\end{array}
Initial program 54.0%
Taylor expanded in u0 around 0
lower-*.f32N/A
lower-fma.f32N/A
*-commutativeN/A
associate-*r*N/A
distribute-rgt-outN/A
unpow2N/A
+-commutativeN/A
associate-*l*N/A
lower-*.f32N/A
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
unpow2N/A
lower-*.f3291.1
Applied rewrites91.1%
Taylor expanded in u0 around 0
+-commutativeN/A
distribute-lft-inN/A
associate-+r+N/A
+-commutativeN/A
associate-*r*N/A
*-commutativeN/A
*-commutativeN/A
associate-*r*N/A
associate-*r*N/A
unpow2N/A
*-commutativeN/A
associate-*r*N/A
unpow2N/A
associate-*r*N/A
*-commutativeN/A
distribute-rgt1-inN/A
Applied rewrites90.9%
(FPCore (alpha u0) :precision binary32 (* u0 (fma alpha alpha (* alpha (* alpha (* u0 0.5))))))
float code(float alpha, float u0) {
return u0 * fmaf(alpha, alpha, (alpha * (alpha * (u0 * 0.5f))));
}
function code(alpha, u0) return Float32(u0 * fma(alpha, alpha, Float32(alpha * Float32(alpha * Float32(u0 * Float32(0.5)))))) end
\begin{array}{l}
\\
u0 \cdot \mathsf{fma}\left(\alpha, \alpha, \alpha \cdot \left(\alpha \cdot \left(u0 \cdot 0.5\right)\right)\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Taylor expanded in u0 around 0
lower-*.f32N/A
*-commutativeN/A
associate-*l*N/A
*-commutativeN/A
*-rgt-identityN/A
distribute-lft-outN/A
+-commutativeN/A
lower-*.f32N/A
unpow2N/A
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3287.3
Applied rewrites87.3%
lift-*.f32N/A
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lift-*.f32N/A
lower-fma.f32N/A
lift-*.f32N/A
associate-*l*N/A
lower-*.f32N/A
lower-*.f32N/A
lower-*.f3287.5
Applied rewrites87.5%
(FPCore (alpha u0) :precision binary32 (* alpha (* alpha (fma u0 (* u0 0.5) u0))))
float code(float alpha, float u0) {
return alpha * (alpha * fmaf(u0, (u0 * 0.5f), u0));
}
function code(alpha, u0) return Float32(alpha * Float32(alpha * fma(u0, Float32(u0 * Float32(0.5)), u0))) end
\begin{array}{l}
\\
\alpha \cdot \left(\alpha \cdot \mathsf{fma}\left(u0, u0 \cdot 0.5, u0\right)\right)
\end{array}
Initial program 54.0%
sub-negN/A
lower-log1p.f32N/A
lower-neg.f3298.9
Applied rewrites98.9%
Applied rewrites98.8%
lift-neg.f32N/A
*-commutativeN/A
lift-*.f32N/A
lift-neg.f32N/A
lift-*.f32N/A
lift-log1p.f32N/A
lift-log1p.f32N/A
sub-negN/A
distribute-lft-inN/A
lower-fma.f32N/A
lift-*.f32N/A
lift-neg.f32N/A
distribute-rgt-neg-outN/A
lift-*.f32N/A
lower-neg.f32N/A
lower-*.f32N/A
Applied rewrites98.9%
Taylor expanded in u0 around 0
distribute-lft1-inN/A
metadata-evalN/A
associate-*r*N/A
*-commutativeN/A
*-lft-identityN/A
distribute-rgt-inN/A
+-commutativeN/A
associate-*l*N/A
*-commutativeN/A
associate-*r*N/A
unpow2N/A
associate-*l*N/A
lower-*.f32N/A
lower-*.f32N/A
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
lower-fma.f32N/A
*-commutativeN/A
lower-*.f3287.4
Applied rewrites87.4%
(FPCore (alpha u0) :precision binary32 (* u0 (* alpha alpha)))
float code(float alpha, float u0) {
return u0 * (alpha * alpha);
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = u0 * (alpha * alpha)
end function
function code(alpha, u0) return Float32(u0 * Float32(alpha * alpha)) end
function tmp = code(alpha, u0) tmp = u0 * (alpha * alpha); end
\begin{array}{l}
\\
u0 \cdot \left(\alpha \cdot \alpha\right)
\end{array}
Initial program 54.0%
Taylor expanded in u0 around 0
*-commutativeN/A
lower-*.f32N/A
unpow2N/A
lower-*.f3275.3
Applied rewrites75.3%
herbie shell --seed 2024214
(FPCore (alpha u0)
:name "Beckmann Distribution sample, tan2theta, alphax == alphay"
:precision binary32
:pre (and (and (<= 0.0001 alpha) (<= alpha 1.0)) (and (<= 2.328306437e-10 u0) (<= u0 1.0)))
(* (* (- alpha) alpha) (log (- 1.0 u0))))