
(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 (* s (- (log1p (* u -4.0)))))
float code(float s, float u) {
return s * -log1pf((u * -4.0f));
}
function code(s, u) return Float32(s * Float32(-log1p(Float32(u * Float32(-4.0))))) end
\begin{array}{l}
\\
s \cdot \left(-\mathsf{log1p}\left(u \cdot -4\right)\right)
\end{array}
Initial program 64.4%
log-rec66.9%
sub-neg66.9%
distribute-rgt-neg-out66.9%
log1p-def99.5%
distribute-rgt-neg-in99.5%
*-commutative99.5%
distribute-rgt-neg-in99.5%
metadata-eval99.5%
Simplified99.5%
Final simplification99.5%
(FPCore (s u) :precision binary32 (* s (* u (+ 4.0 (* u (- 8.0 (* u -21.333333333333332)))))))
float code(float s, float u) {
return s * (u * (4.0f + (u * (8.0f - (u * -21.333333333333332f)))));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * (u * (4.0e0 + (u * (8.0e0 - (u * (-21.333333333333332e0))))))
end function
function code(s, u) return Float32(s * Float32(u * Float32(Float32(4.0) + Float32(u * Float32(Float32(8.0) - Float32(u * Float32(-21.333333333333332))))))) end
function tmp = code(s, u) tmp = s * (u * (single(4.0) + (u * (single(8.0) - (u * single(-21.333333333333332)))))); end
\begin{array}{l}
\\
s \cdot \left(u \cdot \left(4 + u \cdot \left(8 - u \cdot -21.333333333333332\right)\right)\right)
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Taylor expanded in u around 0 90.5%
associate-+r+90.6%
+-commutative90.6%
*-commutative90.6%
unpow390.6%
unpow290.6%
associate-*r*90.6%
*-commutative90.6%
*-commutative90.6%
unpow290.6%
associate-*l*90.6%
distribute-lft-out90.6%
distribute-lft-out90.4%
+-commutative90.4%
*-commutative90.4%
unpow290.4%
associate-*r*90.4%
distribute-rgt-out90.4%
*-commutative90.4%
Simplified90.4%
Final simplification90.4%
(FPCore (s u) :precision binary32 (/ (* 16.0 (* s u)) (+ 4.0 (* u -8.0))))
float code(float s, float u) {
return (16.0f * (s * u)) / (4.0f + (u * -8.0f));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = (16.0e0 * (s * u)) / (4.0e0 + (u * (-8.0e0)))
end function
function code(s, u) return Float32(Float32(Float32(16.0) * Float32(s * u)) / Float32(Float32(4.0) + Float32(u * Float32(-8.0)))) end
function tmp = code(s, u) tmp = (single(16.0) * (s * u)) / (single(4.0) + (u * single(-8.0))); end
\begin{array}{l}
\\
\frac{16 \cdot \left(s \cdot u\right)}{4 + u \cdot -8}
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Taylor expanded in u around 0 84.8%
unpow284.8%
associate-*r*84.8%
*-commutative84.8%
associate-*r*84.9%
distribute-rgt-out84.7%
*-commutative84.7%
*-commutative84.7%
Simplified84.7%
*-commutative84.7%
flip-+84.7%
associate-*l/84.9%
metadata-eval84.9%
*-commutative84.9%
*-commutative84.9%
swap-sqr84.9%
metadata-eval84.9%
unpow284.9%
*-commutative84.9%
cancel-sign-sub-inv84.9%
metadata-eval84.9%
*-commutative84.9%
Applied egg-rr84.9%
Taylor expanded in u around 0 87.1%
Final simplification87.1%
(FPCore (s u) :precision binary32 (/ (* s (* u 16.0)) (+ 4.0 (* u -8.0))))
float code(float s, float u) {
return (s * (u * 16.0f)) / (4.0f + (u * -8.0f));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = (s * (u * 16.0e0)) / (4.0e0 + (u * (-8.0e0)))
end function
function code(s, u) return Float32(Float32(s * Float32(u * Float32(16.0))) / Float32(Float32(4.0) + Float32(u * Float32(-8.0)))) end
function tmp = code(s, u) tmp = (s * (u * single(16.0))) / (single(4.0) + (u * single(-8.0))); end
\begin{array}{l}
\\
\frac{s \cdot \left(u \cdot 16\right)}{4 + u \cdot -8}
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Taylor expanded in u around 0 84.8%
unpow284.8%
associate-*r*84.8%
*-commutative84.8%
associate-*r*84.9%
distribute-rgt-out84.7%
*-commutative84.7%
*-commutative84.7%
Simplified84.7%
*-commutative84.7%
flip-+84.7%
associate-*l/84.9%
metadata-eval84.9%
*-commutative84.9%
*-commutative84.9%
swap-sqr84.9%
metadata-eval84.9%
unpow284.9%
*-commutative84.9%
cancel-sign-sub-inv84.9%
metadata-eval84.9%
*-commutative84.9%
Applied egg-rr84.9%
Taylor expanded in u around 0 87.1%
*-commutative87.1%
associate-*l*87.4%
Simplified87.4%
Final simplification87.4%
(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.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Taylor expanded in u around 0 84.8%
unpow284.8%
associate-*r*84.8%
*-commutative84.8%
associate-*r*84.9%
distribute-rgt-out84.7%
*-commutative84.7%
*-commutative84.7%
Simplified84.7%
Taylor expanded in s around 0 85.1%
Final simplification85.1%
(FPCore (s u) :precision binary32 (if (<= s 4.000000094968912e-32) (* s 0.0) (* s 0.5)))
float code(float s, float u) {
float tmp;
if (s <= 4.000000094968912e-32f) {
tmp = s * 0.0f;
} else {
tmp = s * 0.5f;
}
return tmp;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
real(4) :: tmp
if (s <= 4.000000094968912e-32) then
tmp = s * 0.0e0
else
tmp = s * 0.5e0
end if
code = tmp
end function
function code(s, u) tmp = Float32(0.0) if (s <= Float32(4.000000094968912e-32)) tmp = Float32(s * Float32(0.0)); else tmp = Float32(s * Float32(0.5)); end return tmp end
function tmp_2 = code(s, u) tmp = single(0.0); if (s <= single(4.000000094968912e-32)) tmp = s * single(0.0); else tmp = s * single(0.5); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;s \leq 4.000000094968912 \cdot 10^{-32}:\\
\;\;\;\;s \cdot 0\\
\mathbf{else}:\\
\;\;\;\;s \cdot 0.5\\
\end{array}
\end{array}
if s < 4.00000009e-32Initial program 80.6%
log-rec83.4%
remove-double-neg83.4%
cancel-sign-sub-inv83.4%
remove-double-neg83.4%
metadata-eval83.4%
Simplified83.4%
Applied egg-rr48.9%
if 4.00000009e-32 < s Initial program 60.5%
log-rec62.9%
remove-double-neg62.9%
cancel-sign-sub-inv62.9%
remove-double-neg62.9%
metadata-eval62.9%
Simplified62.9%
Applied egg-rr18.2%
Final simplification24.2%
(FPCore (s u) :precision binary32 (* 4.0 (* s u)))
float code(float s, float u) {
return 4.0f * (s * u);
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = 4.0e0 * (s * u)
end function
function code(s, u) return Float32(Float32(4.0) * Float32(s * u)) end
function tmp = code(s, u) tmp = single(4.0) * (s * u); end
\begin{array}{l}
\\
4 \cdot \left(s \cdot u\right)
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Taylor expanded in u around 0 71.8%
*-commutative71.8%
Simplified71.8%
Final simplification71.8%
(FPCore (s u) :precision binary32 (* u (* s 4.0)))
float code(float s, float u) {
return u * (s * 4.0f);
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = u * (s * 4.0e0)
end function
function code(s, u) return Float32(u * Float32(s * Float32(4.0))) end
function tmp = code(s, u) tmp = u * (s * single(4.0)); end
\begin{array}{l}
\\
u \cdot \left(s \cdot 4\right)
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Taylor expanded in u around 0 71.8%
associate-*r*72.0%
*-commutative72.0%
Simplified72.0%
Final simplification72.0%
(FPCore (s u) :precision binary32 (* s 8.0))
float code(float s, float u) {
return s * 8.0f;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * 8.0e0
end function
function code(s, u) return Float32(s * Float32(8.0)) end
function tmp = code(s, u) tmp = s * single(8.0); end
\begin{array}{l}
\\
s \cdot 8
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Applied egg-rr16.6%
Final simplification16.6%
(FPCore (s u) :precision binary32 (* s 4.0))
float code(float s, float u) {
return s * 4.0f;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * 4.0e0
end function
function code(s, u) return Float32(s * Float32(4.0)) end
function tmp = code(s, u) tmp = s * single(4.0); end
\begin{array}{l}
\\
s \cdot 4
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Applied egg-rr17.2%
Final simplification17.2%
(FPCore (s u) :precision binary32 (* s 2.0))
float code(float s, float u) {
return s * 2.0f;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * 2.0e0
end function
function code(s, u) return Float32(s * Float32(2.0)) end
function tmp = code(s, u) tmp = s * single(2.0); end
\begin{array}{l}
\\
s \cdot 2
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Applied egg-rr17.6%
Final simplification17.6%
(FPCore (s u) :precision binary32 (* s 0.5))
float code(float s, float u) {
return s * 0.5f;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * 0.5e0
end function
function code(s, u) return Float32(s * Float32(0.5)) end
function tmp = code(s, u) tmp = s * single(0.5); end
\begin{array}{l}
\\
s \cdot 0.5
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Applied egg-rr18.8%
Final simplification18.8%
(FPCore (s u) :precision binary32 s)
float code(float s, float u) {
return s;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s
end function
function code(s, u) return s end
function tmp = code(s, u) tmp = s; end
\begin{array}{l}
\\
s
\end{array}
Initial program 64.4%
log-rec66.9%
remove-double-neg66.9%
cancel-sign-sub-inv66.9%
remove-double-neg66.9%
metadata-eval66.9%
Simplified66.9%
Applied egg-rr18.2%
Final simplification18.2%
herbie shell --seed 2023301
(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))))))