
(FPCore (s u) :precision binary32 (* s (log (/ 1.0 (- 1.0 (* 4.0 u))))))
float code(float s, float u) {
return s * logf((1.0f / (1.0f - (4.0f * u))));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * log((1.0e0 / (1.0e0 - (4.0e0 * u))))
end function
function code(s, u) return Float32(s * log(Float32(Float32(1.0) / Float32(Float32(1.0) - Float32(Float32(4.0) * u))))) end
function tmp = code(s, u) tmp = s * log((single(1.0) / (single(1.0) - (single(4.0) * u)))); end
\begin{array}{l}
\\
s \cdot \log \left(\frac{1}{1 - 4 \cdot u}\right)
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 3 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (s u) :precision binary32 (* s (log (/ 1.0 (- 1.0 (* 4.0 u))))))
float code(float s, float u) {
return s * logf((1.0f / (1.0f - (4.0f * u))));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * log((1.0e0 / (1.0e0 - (4.0e0 * u))))
end function
function code(s, u) return Float32(s * log(Float32(Float32(1.0) / Float32(Float32(1.0) - Float32(Float32(4.0) * u))))) end
function tmp = code(s, u) tmp = s * log((single(1.0) / (single(1.0) - (single(4.0) * u)))); end
\begin{array}{l}
\\
s \cdot \log \left(\frac{1}{1 - 4 \cdot u}\right)
\end{array}
(FPCore (s u) :precision binary32 (* (* u 4.0) s))
float code(float s, float u) {
return (u * 4.0f) * s;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = (u * 4.0e0) * s
end function
function code(s, u) return Float32(Float32(u * Float32(4.0)) * s) end
function tmp = code(s, u) tmp = (u * single(4.0)) * s; end
\begin{array}{l}
\\
\left(u \cdot 4\right) \cdot s
\end{array}
Initial program 65.6%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f3272.1
Applied rewrites72.1%
Final simplification72.1%
(FPCore (s u) :precision binary32 (if (<= (* u 4.0) 0.0034000000450760126) (fma s 0.0 (* (* (+ (* -8.0 u) -4.0) u) (- s))) (* (log (/ 1.0 (- 1.0 (* u 4.0)))) s)))
float code(float s, float u) {
float tmp;
if ((u * 4.0f) <= 0.0034000000450760126f) {
tmp = fmaf(s, 0.0f, ((((-8.0f * u) + -4.0f) * u) * -s));
} else {
tmp = logf((1.0f / (1.0f - (u * 4.0f)))) * s;
}
return tmp;
}
function code(s, u) tmp = Float32(0.0) if (Float32(u * Float32(4.0)) <= Float32(0.0034000000450760126)) tmp = fma(s, Float32(0.0), Float32(Float32(Float32(Float32(Float32(-8.0) * u) + Float32(-4.0)) * u) * Float32(-s))); else tmp = Float32(log(Float32(Float32(1.0) / Float32(Float32(1.0) - Float32(u * Float32(4.0))))) * s); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;u \cdot 4 \leq 0.0034000000450760126:\\
\;\;\;\;\mathsf{fma}\left(s, 0, \left(\left(-8 \cdot u + -4\right) \cdot u\right) \cdot \left(-s\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\log \left(\frac{1}{1 - u \cdot 4}\right) \cdot s\\
\end{array}
\end{array}
if (*.f32 #s(literal 4 binary32) u) < 0.00340000005Initial program 53.0%
lift-*.f32N/A
+-lft-identityN/A
metadata-evalN/A
distribute-lft-inN/A
lift-*.f32N/A
lower-fma.f32N/A
metadata-eval13.6
lift-*.f32N/A
lift-log.f32N/A
lift-/.f32N/A
log-recN/A
distribute-rgt-neg-outN/A
distribute-lft-neg-inN/A
lower-*.f32N/A
lower-neg.f32N/A
lift--.f32N/A
sub-negN/A
lower-log1p.f32N/A
lift-*.f32N/A
distribute-lft-neg-inN/A
lower-*.f32N/A
metadata-eval86.4
Applied rewrites86.1%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
sub-negN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f32N/A
sub-negN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f32N/A
sub-negN/A
metadata-evalN/A
lower-fma.f3286.4
Applied rewrites86.1%
Applied rewrites97.4%
Taylor expanded in u around 0
Applied rewrites98.0%
if 0.00340000005 < (*.f32 #s(literal 4 binary32) u) Initial program 92.6%
Final simplification49.8%
(FPCore (s u) :precision binary32 (fma s 0.0 (* (* (+ (* -8.0 u) -4.0) u) (- s))))
float code(float s, float u) {
return fmaf(s, 0.0f, ((((-8.0f * u) + -4.0f) * u) * -s));
}
function code(s, u) return fma(s, Float32(0.0), Float32(Float32(Float32(Float32(Float32(-8.0) * u) + Float32(-4.0)) * u) * Float32(-s))) end
\begin{array}{l}
\\
\mathsf{fma}\left(s, 0, \left(\left(-8 \cdot u + -4\right) \cdot u\right) \cdot \left(-s\right)\right)
\end{array}
Initial program 65.6%
lift-*.f32N/A
+-lft-identityN/A
metadata-evalN/A
distribute-lft-inN/A
lift-*.f32N/A
lower-fma.f32N/A
metadata-eval12.3
lift-*.f32N/A
lift-log.f32N/A
lift-/.f32N/A
log-recN/A
distribute-rgt-neg-outN/A
distribute-lft-neg-inN/A
lower-*.f32N/A
lower-neg.f32N/A
lift--.f32N/A
sub-negN/A
lower-log1p.f32N/A
lift-*.f32N/A
distribute-lft-neg-inN/A
lower-*.f32N/A
metadata-eval72.1
Applied rewrites72.1%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
sub-negN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f32N/A
sub-negN/A
*-commutativeN/A
metadata-evalN/A
lower-fma.f32N/A
sub-negN/A
metadata-evalN/A
lower-fma.f3272.1
Applied rewrites72.0%
Applied rewrites84.2%
Taylor expanded in u around 0
Applied rewrites84.3%
Final simplification54.5%
herbie shell --seed 2024284
(FPCore (s u)
:name "Disney BSSRDF, sample scattering profile, lower"
:precision binary32
:pre (and (and (<= 0.0 s) (<= s 256.0)) (and (<= 2.328306437e-10 u) (<= u 0.25)))
(* s (log (/ 1.0 (- 1.0 (* 4.0 u))))))