
(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 9 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.2%
*-commutative54.2%
sub-neg54.2%
log1p-def99.1%
Simplified99.1%
Final simplification99.1%
(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\right) \cdot \left(\alpha \cdot \mathsf{log1p}\left(-u0\right)\right)
\end{array}
Initial program 54.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Final simplification99.1%
(FPCore (alpha u0) :precision binary32 (let* ((t_0 (* 0.5 (* u0 u0))) (t_1 (* (* u0 u0) (* u0 0.3333333333333333)))) (* (* alpha alpha) (+ u0 (/ (- (* t_0 t_0) (* t_1 t_1)) (- t_0 t_1))))))
float code(float alpha, float u0) {
float t_0 = 0.5f * (u0 * u0);
float t_1 = (u0 * u0) * (u0 * 0.3333333333333333f);
return (alpha * alpha) * (u0 + (((t_0 * t_0) - (t_1 * t_1)) / (t_0 - t_1)));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
real(4) :: t_0
real(4) :: t_1
t_0 = 0.5e0 * (u0 * u0)
t_1 = (u0 * u0) * (u0 * 0.3333333333333333e0)
code = (alpha * alpha) * (u0 + (((t_0 * t_0) - (t_1 * t_1)) / (t_0 - t_1)))
end function
function code(alpha, u0) t_0 = Float32(Float32(0.5) * Float32(u0 * u0)) t_1 = Float32(Float32(u0 * u0) * Float32(u0 * Float32(0.3333333333333333))) return Float32(Float32(alpha * alpha) * Float32(u0 + Float32(Float32(Float32(t_0 * t_0) - Float32(t_1 * t_1)) / Float32(t_0 - t_1)))) end
function tmp = code(alpha, u0) t_0 = single(0.5) * (u0 * u0); t_1 = (u0 * u0) * (u0 * single(0.3333333333333333)); tmp = (alpha * alpha) * (u0 + (((t_0 * t_0) - (t_1 * t_1)) / (t_0 - t_1))); end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 0.5 \cdot \left(u0 \cdot u0\right)\\
t_1 := \left(u0 \cdot u0\right) \cdot \left(u0 \cdot 0.3333333333333333\right)\\
\left(\alpha \cdot \alpha\right) \cdot \left(u0 + \frac{t_0 \cdot t_0 - t_1 \cdot t_1}{t_0 - t_1}\right)
\end{array}
\end{array}
Initial program 54.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Taylor expanded in u0 around 0 93.5%
associate-+r+93.5%
+-commutative93.5%
+-commutative93.5%
associate-*r*93.5%
associate-*r*93.5%
distribute-rgt-out93.5%
associate-*r*93.5%
distribute-rgt-out93.5%
distribute-lft-out93.6%
unpow293.6%
Simplified93.6%
Taylor expanded in u0 around 0 91.8%
associate-+r+91.8%
unpow291.8%
*-commutative91.8%
associate-+r+91.8%
*-commutative91.8%
unpow391.8%
associate-*r*91.8%
distribute-lft-in91.8%
Simplified91.8%
distribute-rgt-in91.8%
flip-+91.8%
Applied egg-rr91.8%
Final simplification91.8%
(FPCore (alpha u0) :precision binary32 (* (* alpha alpha) (+ u0 (+ (* 0.5 (* u0 u0)) (* (* u0 u0) (* u0 0.3333333333333333))))))
float code(float alpha, float u0) {
return (alpha * alpha) * (u0 + ((0.5f * (u0 * u0)) + ((u0 * u0) * (u0 * 0.3333333333333333f))));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = (alpha * alpha) * (u0 + ((0.5e0 * (u0 * u0)) + ((u0 * u0) * (u0 * 0.3333333333333333e0))))
end function
function code(alpha, u0) return Float32(Float32(alpha * alpha) * Float32(u0 + Float32(Float32(Float32(0.5) * Float32(u0 * u0)) + Float32(Float32(u0 * u0) * Float32(u0 * Float32(0.3333333333333333)))))) end
function tmp = code(alpha, u0) tmp = (alpha * alpha) * (u0 + ((single(0.5) * (u0 * u0)) + ((u0 * u0) * (u0 * single(0.3333333333333333))))); end
\begin{array}{l}
\\
\left(\alpha \cdot \alpha\right) \cdot \left(u0 + \left(0.5 \cdot \left(u0 \cdot u0\right) + \left(u0 \cdot u0\right) \cdot \left(u0 \cdot 0.3333333333333333\right)\right)\right)
\end{array}
Initial program 54.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Taylor expanded in u0 around 0 93.5%
associate-+r+93.5%
+-commutative93.5%
+-commutative93.5%
associate-*r*93.5%
associate-*r*93.5%
distribute-rgt-out93.5%
associate-*r*93.5%
distribute-rgt-out93.5%
distribute-lft-out93.6%
unpow293.6%
Simplified93.6%
Taylor expanded in u0 around 0 91.8%
associate-+r+91.8%
unpow291.8%
*-commutative91.8%
associate-+r+91.8%
*-commutative91.8%
unpow391.8%
associate-*r*91.8%
distribute-lft-in91.8%
Simplified91.8%
+-commutative91.8%
distribute-rgt-in91.8%
Applied egg-rr91.8%
Final simplification91.8%
(FPCore (alpha u0) :precision binary32 (* (* alpha alpha) (+ u0 (* (* u0 u0) (+ 0.5 (* u0 0.3333333333333333))))))
float code(float alpha, float u0) {
return (alpha * alpha) * (u0 + ((u0 * u0) * (0.5f + (u0 * 0.3333333333333333f))));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = (alpha * alpha) * (u0 + ((u0 * u0) * (0.5e0 + (u0 * 0.3333333333333333e0))))
end function
function code(alpha, u0) return Float32(Float32(alpha * alpha) * Float32(u0 + Float32(Float32(u0 * u0) * Float32(Float32(0.5) + Float32(u0 * Float32(0.3333333333333333)))))) end
function tmp = code(alpha, u0) tmp = (alpha * alpha) * (u0 + ((u0 * u0) * (single(0.5) + (u0 * single(0.3333333333333333))))); end
\begin{array}{l}
\\
\left(\alpha \cdot \alpha\right) \cdot \left(u0 + \left(u0 \cdot u0\right) \cdot \left(0.5 + u0 \cdot 0.3333333333333333\right)\right)
\end{array}
Initial program 54.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Taylor expanded in u0 around 0 91.8%
*-commutative91.8%
+-commutative91.8%
associate-*r*91.8%
associate-*r*91.8%
distribute-rgt-out91.8%
distribute-lft-out91.8%
unpow291.8%
cube-mult91.8%
unpow291.8%
associate-*r*91.8%
distribute-rgt-out91.8%
unpow291.8%
Simplified91.8%
Final simplification91.8%
(FPCore (alpha u0) :precision binary32 (* (* alpha alpha) (+ u0 (* 0.5 (* u0 u0)))))
float code(float alpha, float u0) {
return (alpha * alpha) * (u0 + (0.5f * (u0 * u0)));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = (alpha * alpha) * (u0 + (0.5e0 * (u0 * u0)))
end function
function code(alpha, u0) return Float32(Float32(alpha * alpha) * Float32(u0 + Float32(Float32(0.5) * Float32(u0 * u0)))) end
function tmp = code(alpha, u0) tmp = (alpha * alpha) * (u0 + (single(0.5) * (u0 * u0))); end
\begin{array}{l}
\\
\left(\alpha \cdot \alpha\right) \cdot \left(u0 + 0.5 \cdot \left(u0 \cdot u0\right)\right)
\end{array}
Initial program 54.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Taylor expanded in u0 around 0 87.8%
+-commutative87.8%
associate-*r*87.8%
distribute-rgt-out87.9%
unpow287.9%
unpow287.9%
Simplified87.9%
Final simplification87.9%
(FPCore (alpha u0) :precision binary32 (* alpha (* alpha (- u0 (* u0 (* u0 -0.5))))))
float code(float alpha, float u0) {
return alpha * (alpha * (u0 - (u0 * (u0 * -0.5f))));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = alpha * (alpha * (u0 - (u0 * (u0 * (-0.5e0)))))
end function
function code(alpha, u0) return Float32(alpha * Float32(alpha * Float32(u0 - Float32(u0 * Float32(u0 * Float32(-0.5)))))) end
function tmp = code(alpha, u0) tmp = alpha * (alpha * (u0 - (u0 * (u0 * single(-0.5))))); end
\begin{array}{l}
\\
\alpha \cdot \left(\alpha \cdot \left(u0 - u0 \cdot \left(u0 \cdot -0.5\right)\right)\right)
\end{array}
Initial program 54.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Taylor expanded in u0 around 0 87.8%
+-commutative87.8%
mul-1-neg87.8%
unsub-neg87.8%
associate-*r*87.8%
distribute-rgt-out--87.9%
*-commutative87.9%
unpow287.9%
associate-*l*87.9%
Simplified87.9%
Final simplification87.9%
(FPCore (alpha u0) :precision binary32 (* alpha (* alpha u0)))
float code(float alpha, float u0) {
return alpha * (alpha * u0);
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = alpha * (alpha * u0)
end function
function code(alpha, u0) return Float32(alpha * Float32(alpha * u0)) end
function tmp = code(alpha, u0) tmp = alpha * (alpha * u0); end
\begin{array}{l}
\\
\alpha \cdot \left(\alpha \cdot u0\right)
\end{array}
Initial program 54.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Taylor expanded in u0 around 0 76.1%
*-commutative76.1%
unpow276.1%
associate-*l*76.1%
Simplified76.1%
Final simplification76.1%
(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.2%
associate-*l*54.1%
sub-neg54.1%
log1p-def99.1%
Simplified99.1%
Taylor expanded in u0 around 0 76.1%
*-commutative76.1%
unpow276.1%
Simplified76.1%
Final simplification76.1%
herbie shell --seed 2023238
(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))))