
(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 6 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 64.5%
*-commutative64.5%
log-rec66.8%
distribute-lft-neg-out66.8%
distribute-rgt-neg-in66.8%
sub-neg66.8%
log1p-def99.6%
*-commutative99.6%
distribute-rgt-neg-in99.6%
metadata-eval99.6%
Simplified99.6%
Final simplification99.6%
(FPCore (s u) :precision binary32 (* s (+ (* 8.0 (* u u)) (* u 4.0))))
float code(float s, float u) {
return s * ((8.0f * (u * u)) + (u * 4.0f));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * ((8.0e0 * (u * u)) + (u * 4.0e0))
end function
function code(s, u) return Float32(s * Float32(Float32(Float32(8.0) * Float32(u * u)) + Float32(u * Float32(4.0)))) end
function tmp = code(s, u) tmp = s * ((single(8.0) * (u * u)) + (u * single(4.0))); end
\begin{array}{l}
\\
s \cdot \left(8 \cdot \left(u \cdot u\right) + u \cdot 4\right)
\end{array}
Initial program 64.5%
Taylor expanded in u around 0 84.8%
fma-def84.8%
unpow284.8%
Simplified84.8%
fma-udef84.8%
Applied egg-rr84.8%
Final simplification84.8%
(FPCore (s u) :precision binary32 (* s (* u (+ 4.0 (* u 8.0)))))
float code(float s, float u) {
return s * (u * (4.0f + (u * 8.0f)));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * (u * (4.0e0 + (u * 8.0e0)))
end function
function code(s, u) return Float32(s * Float32(u * Float32(Float32(4.0) + Float32(u * Float32(8.0))))) end
function tmp = code(s, u) tmp = s * (u * (single(4.0) + (u * single(8.0)))); end
\begin{array}{l}
\\
s \cdot \left(u \cdot \left(4 + u \cdot 8\right)\right)
\end{array}
Initial program 64.5%
flip3--64.2%
associate-/r/64.1%
log-prod64.2%
metadata-eval64.2%
*-commutative64.2%
unpow-prod-down64.2%
metadata-eval64.2%
metadata-eval64.2%
log1p-udef95.5%
*-un-lft-identity95.5%
distribute-lft1-in95.6%
fma-def95.6%
Applied egg-rr95.6%
+-commutative95.6%
log-rec96.5%
sub-neg96.5%
log1p-def99.1%
unsub-neg99.1%
*-commutative99.1%
associate-*l*99.1%
distribute-rgt-neg-in99.1%
metadata-eval99.1%
Simplified99.1%
Taylor expanded in u around 0 84.3%
+-commutative84.3%
*-commutative84.3%
associate-*r*84.6%
*-commutative84.6%
associate-*l*84.7%
distribute-rgt-in84.8%
+-commutative84.8%
unpow284.8%
associate-*r*84.8%
distribute-rgt-out84.7%
*-commutative84.7%
Simplified84.7%
Final simplification84.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 64.5%
Taylor expanded in u around 0 71.8%
*-commutative71.8%
Simplified71.8%
Final simplification71.8%
(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 64.5%
Taylor expanded in u around 0 72.0%
Final simplification72.0%
(FPCore (s u) :precision binary32 (* s 0.0))
float code(float s, float u) {
return s * 0.0f;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * 0.0e0
end function
function code(s, u) return Float32(s * Float32(0.0)) end
function tmp = code(s, u) tmp = s * single(0.0); end
\begin{array}{l}
\\
s \cdot 0
\end{array}
Initial program 64.5%
Applied egg-rr18.1%
+-inverses18.1%
Simplified18.1%
Final simplification18.1%
herbie shell --seed 2023257
(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))))))