
(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(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 57.3%
associate-*l*57.3%
sub-neg57.3%
log1p-def98.9%
Simplified98.9%
Final simplification98.9%
(FPCore (alpha u0) :precision binary32 (* (log1p (- u0)) (* alpha (- alpha))))
float code(float alpha, float u0) {
return log1pf(-u0) * (alpha * -alpha);
}
function code(alpha, u0) return Float32(log1p(Float32(-u0)) * Float32(alpha * Float32(-alpha))) end
\begin{array}{l}
\\
\mathsf{log1p}\left(-u0\right) \cdot \left(\alpha \cdot \left(-\alpha\right)\right)
\end{array}
Initial program 57.3%
associate-*l*57.3%
Simplified57.3%
Taylor expanded in alpha around 0 57.3%
mul-1-neg57.3%
*-commutative57.3%
distribute-rgt-neg-in57.3%
sub-neg57.3%
mul-1-neg57.3%
log1p-def98.9%
mul-1-neg98.9%
unpow298.9%
distribute-rgt-neg-in98.9%
Simplified98.9%
Final simplification98.9%
(FPCore (alpha u0) :precision binary32 (* alpha (- (* alpha u0) (* alpha (* (* u0 u0) (+ -0.5 (* u0 -0.3333333333333333)))))))
float code(float alpha, float u0) {
return alpha * ((alpha * u0) - (alpha * ((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) - (alpha * ((u0 * u0) * ((-0.5e0) + (u0 * (-0.3333333333333333e0))))))
end function
function code(alpha, u0) return Float32(alpha * Float32(Float32(alpha * u0) - Float32(alpha * Float32(Float32(u0 * u0) * Float32(Float32(-0.5) + Float32(u0 * Float32(-0.3333333333333333))))))) end
function tmp = code(alpha, u0) tmp = alpha * ((alpha * u0) - (alpha * ((u0 * u0) * (single(-0.5) + (u0 * single(-0.3333333333333333)))))); end
\begin{array}{l}
\\
\alpha \cdot \left(\alpha \cdot u0 - \alpha \cdot \left(\left(u0 \cdot u0\right) \cdot \left(-0.5 + u0 \cdot -0.3333333333333333\right)\right)\right)
\end{array}
Initial program 57.3%
associate-*l*57.3%
Simplified57.3%
Taylor expanded in u0 around 0 89.3%
+-commutative89.3%
mul-1-neg89.3%
unsub-neg89.3%
*-commutative89.3%
associate-*r*89.3%
*-commutative89.3%
associate-*r*89.3%
distribute-rgt-out89.3%
cube-mult89.3%
unpow289.3%
associate-*r*89.3%
distribute-rgt-out89.3%
unpow289.3%
*-commutative89.3%
Simplified89.3%
Final simplification89.3%
(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(alpha * Float32(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}
\\
\alpha \cdot \left(\alpha \cdot \left(u0 - \left(u0 \cdot u0\right) \cdot \left(-0.5 + u0 \cdot -0.3333333333333333\right)\right)\right)
\end{array}
Initial program 57.3%
associate-*l*57.3%
Simplified57.3%
Taylor expanded in u0 around 0 89.2%
+-commutative89.2%
mul-1-neg89.2%
unsub-neg89.2%
cube-mult89.2%
unpow289.2%
associate-*r*89.2%
distribute-rgt-out89.2%
unpow289.2%
Simplified89.2%
Final simplification89.2%
(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 57.3%
Taylor expanded in u0 around 0 89.2%
+-commutative89.2%
mul-1-neg89.2%
unsub-neg89.2%
cube-mult89.2%
unpow289.2%
associate-*r*89.2%
distribute-rgt-out89.2%
unpow289.2%
Simplified89.2%
Final simplification89.2%
(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 57.3%
associate-*l*57.3%
Simplified57.3%
Taylor expanded in u0 around 0 84.1%
+-commutative84.1%
*-commutative84.1%
associate-*l*84.1%
distribute-lft-out84.2%
unpow284.2%
unpow284.2%
Simplified84.2%
Taylor expanded in alpha around 0 84.2%
unpow284.2%
*-commutative84.2%
unpow284.2%
associate-*r*84.2%
associate-*l*84.3%
Simplified84.3%
Final simplification84.3%
(FPCore (alpha u0) :precision binary32 (* alpha (* u0 (- alpha (* alpha (* u0 -0.5))))))
float code(float alpha, float u0) {
return alpha * (u0 * (alpha - (alpha * (u0 * -0.5f))));
}
real(4) function code(alpha, u0)
real(4), intent (in) :: alpha
real(4), intent (in) :: u0
code = alpha * (u0 * (alpha - (alpha * (u0 * (-0.5e0)))))
end function
function code(alpha, u0) return Float32(alpha * Float32(u0 * Float32(alpha - Float32(alpha * Float32(u0 * Float32(-0.5)))))) end
function tmp = code(alpha, u0) tmp = alpha * (u0 * (alpha - (alpha * (u0 * single(-0.5))))); end
\begin{array}{l}
\\
\alpha \cdot \left(u0 \cdot \left(\alpha - \alpha \cdot \left(u0 \cdot -0.5\right)\right)\right)
\end{array}
Initial program 57.3%
associate-*l*57.3%
Simplified57.3%
Taylor expanded in u0 around 0 84.3%
+-commutative84.3%
mul-1-neg84.3%
unsub-neg84.3%
*-commutative84.3%
unpow284.3%
*-commutative84.3%
Simplified84.3%
Taylor expanded in u0 around 0 84.3%
mul-1-neg84.3%
distribute-lft-neg-in84.3%
*-commutative84.3%
*-commutative84.3%
unpow284.3%
associate-*r*84.3%
associate-*r*84.3%
*-commutative84.3%
distribute-rgt-out84.3%
*-commutative84.3%
associate-*r*84.3%
*-commutative84.3%
*-commutative84.3%
Simplified84.3%
Final simplification84.3%
(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 57.3%
associate-*l*57.3%
Simplified57.3%
Taylor expanded in alpha around 0 57.3%
mul-1-neg57.3%
*-commutative57.3%
distribute-rgt-neg-in57.3%
sub-neg57.3%
mul-1-neg57.3%
log1p-def98.9%
mul-1-neg98.9%
unpow298.9%
distribute-rgt-neg-in98.9%
Simplified98.9%
Taylor expanded in u0 around 0 72.4%
*-commutative72.4%
unpow272.4%
associate-*r*72.4%
*-commutative72.4%
*-commutative72.4%
Simplified72.4%
Final simplification72.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 57.3%
associate-*l*57.3%
Simplified57.3%
Taylor expanded in u0 around 0 72.4%
*-commutative72.4%
unpow272.4%
Simplified72.4%
Final simplification72.4%
herbie shell --seed 2023271
(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))))