
(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 13 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 (* (log1p (* u -4.0)) (- s)))
float code(float s, float u) {
return log1pf((u * -4.0f)) * -s;
}
function code(s, u) return Float32(log1p(Float32(u * Float32(-4.0))) * Float32(-s)) end
\begin{array}{l}
\\
\mathsf{log1p}\left(u \cdot -4\right) \cdot \left(-s\right)
\end{array}
Initial program 59.3%
Taylor expanded in s around 0
*-commutativeN/A
log-recN/A
distribute-lft-neg-outN/A
distribute-rgt-neg-inN/A
lower-*.f32N/A
cancel-sign-sub-invN/A
metadata-evalN/A
lower-log1p.f32N/A
*-commutativeN/A
lower-*.f32N/A
lower-neg.f3299.4
Applied rewrites99.4%
(FPCore (s u) :precision binary32 (* s (fma (fma u (fma u 64.0 21.333333333333332) 8.0) (* u u) (* u 4.0))))
float code(float s, float u) {
return s * fmaf(fmaf(u, fmaf(u, 64.0f, 21.333333333333332f), 8.0f), (u * u), (u * 4.0f));
}
function code(s, u) return Float32(s * fma(fma(u, fma(u, Float32(64.0), Float32(21.333333333333332)), Float32(8.0)), Float32(u * u), Float32(u * Float32(4.0)))) end
\begin{array}{l}
\\
s \cdot \mathsf{fma}\left(\mathsf{fma}\left(u, \mathsf{fma}\left(u, 64, 21.333333333333332\right), 8\right), u \cdot u, u \cdot 4\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3293.6
Applied rewrites93.6%
lift-fma.f32N/A
lift-fma.f32N/A
distribute-rgt-inN/A
*-commutativeN/A
associate-*l*N/A
*-commutativeN/A
lower-fma.f32N/A
lower-*.f32N/A
lower-*.f3293.9
Applied rewrites93.9%
(FPCore (s u) :precision binary32 (* u (* s (fma u (fma u (fma u 64.0 21.333333333333332) 8.0) 4.0))))
float code(float s, float u) {
return u * (s * fmaf(u, fmaf(u, fmaf(u, 64.0f, 21.333333333333332f), 8.0f), 4.0f));
}
function code(s, u) return Float32(u * Float32(s * fma(u, fma(u, fma(u, Float32(64.0), Float32(21.333333333333332)), Float32(8.0)), Float32(4.0)))) end
\begin{array}{l}
\\
u \cdot \left(s \cdot \mathsf{fma}\left(u, \mathsf{fma}\left(u, \mathsf{fma}\left(u, 64, 21.333333333333332\right), 8\right), 4\right)\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3293.6
Applied rewrites93.6%
lift-fma.f32N/A
lift-fma.f32N/A
lift-fma.f32N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f3293.7
Applied rewrites93.7%
Final simplification93.7%
(FPCore (s u) :precision binary32 (* s (* u (fma u (fma u (fma u 64.0 21.333333333333332) 8.0) 4.0))))
float code(float s, float u) {
return s * (u * fmaf(u, fmaf(u, fmaf(u, 64.0f, 21.333333333333332f), 8.0f), 4.0f));
}
function code(s, u) return Float32(s * Float32(u * fma(u, fma(u, fma(u, Float32(64.0), Float32(21.333333333333332)), Float32(8.0)), Float32(4.0)))) end
\begin{array}{l}
\\
s \cdot \left(u \cdot \mathsf{fma}\left(u, \mathsf{fma}\left(u, \mathsf{fma}\left(u, 64, 21.333333333333332\right), 8\right), 4\right)\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3293.6
Applied rewrites93.6%
(FPCore (s u) :precision binary32 (* s (fma (fma u 21.333333333333332 8.0) (* u u) (* u 4.0))))
float code(float s, float u) {
return s * fmaf(fmaf(u, 21.333333333333332f, 8.0f), (u * u), (u * 4.0f));
}
function code(s, u) return Float32(s * fma(fma(u, Float32(21.333333333333332), Float32(8.0)), Float32(u * u), Float32(u * Float32(4.0)))) end
\begin{array}{l}
\\
s \cdot \mathsf{fma}\left(\mathsf{fma}\left(u, 21.333333333333332, 8\right), u \cdot u, u \cdot 4\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3292.0
Applied rewrites92.0%
lift-fma.f32N/A
distribute-rgt-inN/A
*-commutativeN/A
*-commutativeN/A
associate-*l*N/A
lower-fma.f32N/A
lower-*.f32N/A
lower-*.f3292.2
Applied rewrites92.2%
(FPCore (s u) :precision binary32 (* u (* s (fma u (fma u 21.333333333333332 8.0) 4.0))))
float code(float s, float u) {
return u * (s * fmaf(u, fmaf(u, 21.333333333333332f, 8.0f), 4.0f));
}
function code(s, u) return Float32(u * Float32(s * fma(u, fma(u, Float32(21.333333333333332), Float32(8.0)), Float32(4.0)))) end
\begin{array}{l}
\\
u \cdot \left(s \cdot \mathsf{fma}\left(u, \mathsf{fma}\left(u, 21.333333333333332, 8\right), 4\right)\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3292.0
Applied rewrites92.0%
lift-fma.f32N/A
lift-fma.f32N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f3292.0
Applied rewrites92.0%
Final simplification92.0%
(FPCore (s u) :precision binary32 (* s (* u (fma u (fma u 21.333333333333332 8.0) 4.0))))
float code(float s, float u) {
return s * (u * fmaf(u, fmaf(u, 21.333333333333332f, 8.0f), 4.0f));
}
function code(s, u) return Float32(s * Float32(u * fma(u, fma(u, Float32(21.333333333333332), Float32(8.0)), Float32(4.0)))) end
\begin{array}{l}
\\
s \cdot \left(u \cdot \mathsf{fma}\left(u, \mathsf{fma}\left(u, 21.333333333333332, 8\right), 4\right)\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3292.0
Applied rewrites92.0%
(FPCore (s u) :precision binary32 (* u (fma (* u s) 8.0 (* s 4.0))))
float code(float s, float u) {
return u * fmaf((u * s), 8.0f, (s * 4.0f));
}
function code(s, u) return Float32(u * fma(Float32(u * s), Float32(8.0), Float32(s * Float32(4.0)))) end
\begin{array}{l}
\\
u \cdot \mathsf{fma}\left(u \cdot s, 8, s \cdot 4\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3288.2
Applied rewrites88.2%
lift-fma.f32N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f3288.3
Applied rewrites88.3%
distribute-lft-inN/A
*-commutativeN/A
associate-*r*N/A
*-commutativeN/A
lift-*.f32N/A
lower-fma.f32N/A
lower-*.f3288.4
Applied rewrites88.4%
Final simplification88.4%
(FPCore (s u) :precision binary32 (* s (fma (* u u) 8.0 (* u 4.0))))
float code(float s, float u) {
return s * fmaf((u * u), 8.0f, (u * 4.0f));
}
function code(s, u) return Float32(s * fma(Float32(u * u), Float32(8.0), Float32(u * Float32(4.0)))) end
\begin{array}{l}
\\
s \cdot \mathsf{fma}\left(u \cdot u, 8, u \cdot 4\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3288.2
Applied rewrites88.2%
distribute-lft-inN/A
associate-*r*N/A
lower-fma.f32N/A
lower-*.f32N/A
lower-*.f3288.4
Applied rewrites88.4%
(FPCore (s u) :precision binary32 (* u (* s (fma u 8.0 4.0))))
float code(float s, float u) {
return u * (s * fmaf(u, 8.0f, 4.0f));
}
function code(s, u) return Float32(u * Float32(s * fma(u, Float32(8.0), Float32(4.0)))) end
\begin{array}{l}
\\
u \cdot \left(s \cdot \mathsf{fma}\left(u, 8, 4\right)\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3288.2
Applied rewrites88.2%
lift-fma.f32N/A
*-commutativeN/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f3288.3
Applied rewrites88.3%
Final simplification88.3%
(FPCore (s u) :precision binary32 (* s (* u (fma u 8.0 4.0))))
float code(float s, float u) {
return s * (u * fmaf(u, 8.0f, 4.0f));
}
function code(s, u) return Float32(s * Float32(u * fma(u, Float32(8.0), Float32(4.0)))) end
\begin{array}{l}
\\
s \cdot \left(u \cdot \mathsf{fma}\left(u, 8, 4\right)\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f3288.2
Applied rewrites88.2%
(FPCore (s u) :precision binary32 (* s (* u 4.0)))
float code(float s, float u) {
return s * (u * 4.0f);
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * (u * 4.0e0)
end function
function code(s, u) return Float32(s * Float32(u * Float32(4.0))) end
function tmp = code(s, u) tmp = s * (u * single(4.0)); end
\begin{array}{l}
\\
s \cdot \left(u \cdot 4\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f3275.7
Applied rewrites75.7%
Final simplification75.7%
(FPCore (s u) :precision binary32 (* 4.0 (* u s)))
float code(float s, float u) {
return 4.0f * (u * s);
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = 4.0e0 * (u * s)
end function
function code(s, u) return Float32(Float32(4.0) * Float32(u * s)) end
function tmp = code(s, u) tmp = single(4.0) * (u * s); end
\begin{array}{l}
\\
4 \cdot \left(u \cdot s\right)
\end{array}
Initial program 59.3%
Taylor expanded in u around 0
lower-*.f32N/A
*-commutativeN/A
lower-*.f3275.4
Applied rewrites75.4%
herbie shell --seed 2024219
(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))))))