
(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 8 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
(if (<= (* 4.0 u) 0.05000000074505806)
(*
s
(*
(+ (/ (+ (/ (+ (/ 4.0 u) 8.0) u) 21.333333333333332) u) 64.0)
(pow u 4.0)))
(* s (log (/ 1.0 (- 1.0 (* 4.0 u)))))))
float code(float s, float u) {
float tmp;
if ((4.0f * u) <= 0.05000000074505806f) {
tmp = s * (((((((4.0f / u) + 8.0f) / u) + 21.333333333333332f) / u) + 64.0f) * powf(u, 4.0f));
} else {
tmp = s * logf((1.0f / (1.0f - (4.0f * u))));
}
return tmp;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
real(4) :: tmp
if ((4.0e0 * u) <= 0.05000000074505806e0) then
tmp = s * (((((((4.0e0 / u) + 8.0e0) / u) + 21.333333333333332e0) / u) + 64.0e0) * (u ** 4.0e0))
else
tmp = s * log((1.0e0 / (1.0e0 - (4.0e0 * u))))
end if
code = tmp
end function
function code(s, u) tmp = Float32(0.0) if (Float32(Float32(4.0) * u) <= Float32(0.05000000074505806)) tmp = Float32(s * Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(4.0) / u) + Float32(8.0)) / u) + Float32(21.333333333333332)) / u) + Float32(64.0)) * (u ^ Float32(4.0)))); else tmp = Float32(s * log(Float32(Float32(1.0) / Float32(Float32(1.0) - Float32(Float32(4.0) * u))))); end return tmp end
function tmp_2 = code(s, u) tmp = single(0.0); if ((single(4.0) * u) <= single(0.05000000074505806)) tmp = s * (((((((single(4.0) / u) + single(8.0)) / u) + single(21.333333333333332)) / u) + single(64.0)) * (u ^ single(4.0))); else tmp = s * log((single(1.0) / (single(1.0) - (single(4.0) * u)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;4 \cdot u \leq 0.05000000074505806:\\
\;\;\;\;s \cdot \left(\left(\frac{\frac{\frac{4}{u} + 8}{u} + 21.333333333333332}{u} + 64\right) \cdot {u}^{4}\right)\\
\mathbf{else}:\\
\;\;\;\;s \cdot \log \left(\frac{1}{1 - 4 \cdot u}\right)\\
\end{array}
\end{array}
if (*.f32 #s(literal 4 binary32) u) < 0.0500000007Initial program 56.1%
lift-log.f32N/A
lift-/.f32N/A
log-divN/A
metadata-evalN/A
flip--N/A
+-lft-identityN/A
lower-/.f32N/A
Applied rewrites50.2%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3279.7
Applied rewrites79.7%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
lower-fma.f3280.2
Applied rewrites79.8%
Taylor expanded in u around inf
Applied rewrites98.3%
if 0.0500000007 < (*.f32 #s(literal 4 binary32) u) Initial program 96.5%
(FPCore (s u)
:precision binary32
(if (<= (* 4.0 u) 0.004600000102072954)
(*
s
(/
(* (* (- (* (- (* -234.66666666666666 u) 64.0) u) 16.0) u) u)
(* (- (* -8.0 u) 4.0) u)))
(* (log (* (- (/ 1.0 u) 4.0) u)) (- s))))
float code(float s, float u) {
float tmp;
if ((4.0f * u) <= 0.004600000102072954f) {
tmp = s * (((((((-234.66666666666666f * u) - 64.0f) * u) - 16.0f) * u) * u) / (((-8.0f * u) - 4.0f) * u));
} else {
tmp = logf((((1.0f / u) - 4.0f) * u)) * -s;
}
return tmp;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
real(4) :: tmp
if ((4.0e0 * u) <= 0.004600000102072954e0) then
tmp = s * ((((((((-234.66666666666666e0) * u) - 64.0e0) * u) - 16.0e0) * u) * u) / ((((-8.0e0) * u) - 4.0e0) * u))
else
tmp = log((((1.0e0 / u) - 4.0e0) * u)) * -s
end if
code = tmp
end function
function code(s, u) tmp = Float32(0.0) if (Float32(Float32(4.0) * u) <= Float32(0.004600000102072954)) tmp = Float32(s * Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-234.66666666666666) * u) - Float32(64.0)) * u) - Float32(16.0)) * u) * u) / Float32(Float32(Float32(Float32(-8.0) * u) - Float32(4.0)) * u))); else tmp = Float32(log(Float32(Float32(Float32(Float32(1.0) / u) - Float32(4.0)) * u)) * Float32(-s)); end return tmp end
function tmp_2 = code(s, u) tmp = single(0.0); if ((single(4.0) * u) <= single(0.004600000102072954)) tmp = s * (((((((single(-234.66666666666666) * u) - single(64.0)) * u) - single(16.0)) * u) * u) / (((single(-8.0) * u) - single(4.0)) * u)); else tmp = log((((single(1.0) / u) - single(4.0)) * u)) * -s; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;4 \cdot u \leq 0.004600000102072954:\\
\;\;\;\;s \cdot \frac{\left(\left(\left(-234.66666666666666 \cdot u - 64\right) \cdot u - 16\right) \cdot u\right) \cdot u}{\left(-8 \cdot u - 4\right) \cdot u}\\
\mathbf{else}:\\
\;\;\;\;\log \left(\left(\frac{1}{u} - 4\right) \cdot u\right) \cdot \left(-s\right)\\
\end{array}
\end{array}
if (*.f32 #s(literal 4 binary32) u) < 0.0046000001Initial program 52.3%
lift-log.f32N/A
lift-/.f32N/A
log-divN/A
metadata-evalN/A
flip--N/A
+-lft-identityN/A
lower-/.f32N/A
Applied rewrites54.6%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3283.5
Applied rewrites83.5%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3296.7
Applied rewrites96.7%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3297.1
Applied rewrites97.1%
if 0.0046000001 < (*.f32 #s(literal 4 binary32) u) Initial program 92.9%
lift--.f32N/A
lift-*.f32N/A
fp-cancel-sub-sign-invN/A
+-commutativeN/A
flip-+N/A
distribute-lft-neg-inN/A
lift-*.f32N/A
distribute-lft-neg-inN/A
lift-*.f32N/A
sqr-neg-revN/A
distribute-lft-neg-inN/A
lift-*.f32N/A
lower-/.f32N/A
Applied rewrites92.1%
Taylor expanded in u around inf
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-/.f3292.3
Applied rewrites92.3%
lift-*.f32N/A
*-commutativeN/A
lower-*.f3292.3
lift-log.f32N/A
lift-/.f32N/A
log-recN/A
lower-neg.f32N/A
lower-log.f3293.2
Applied rewrites93.2%
Final simplification96.1%
(FPCore (s u)
:precision binary32
(if (<= (* 4.0 u) 0.004999999888241291)
(*
s
(/
(* (* (- (* (- (* -234.66666666666666 u) 64.0) u) 16.0) u) u)
(* (- (* -8.0 u) 4.0) u)))
(* s (log (/ 1.0 (- 1.0 (* 4.0 u)))))))
float code(float s, float u) {
float tmp;
if ((4.0f * u) <= 0.004999999888241291f) {
tmp = s * (((((((-234.66666666666666f * u) - 64.0f) * u) - 16.0f) * u) * u) / (((-8.0f * u) - 4.0f) * u));
} else {
tmp = s * logf((1.0f / (1.0f - (4.0f * u))));
}
return tmp;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
real(4) :: tmp
if ((4.0e0 * u) <= 0.004999999888241291e0) then
tmp = s * ((((((((-234.66666666666666e0) * u) - 64.0e0) * u) - 16.0e0) * u) * u) / ((((-8.0e0) * u) - 4.0e0) * u))
else
tmp = s * log((1.0e0 / (1.0e0 - (4.0e0 * u))))
end if
code = tmp
end function
function code(s, u) tmp = Float32(0.0) if (Float32(Float32(4.0) * u) <= Float32(0.004999999888241291)) tmp = Float32(s * Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-234.66666666666666) * u) - Float32(64.0)) * u) - Float32(16.0)) * u) * u) / Float32(Float32(Float32(Float32(-8.0) * u) - Float32(4.0)) * u))); else tmp = Float32(s * log(Float32(Float32(1.0) / Float32(Float32(1.0) - Float32(Float32(4.0) * u))))); end return tmp end
function tmp_2 = code(s, u) tmp = single(0.0); if ((single(4.0) * u) <= single(0.004999999888241291)) tmp = s * (((((((single(-234.66666666666666) * u) - single(64.0)) * u) - single(16.0)) * u) * u) / (((single(-8.0) * u) - single(4.0)) * u)); else tmp = s * log((single(1.0) / (single(1.0) - (single(4.0) * u)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;4 \cdot u \leq 0.004999999888241291:\\
\;\;\;\;s \cdot \frac{\left(\left(\left(-234.66666666666666 \cdot u - 64\right) \cdot u - 16\right) \cdot u\right) \cdot u}{\left(-8 \cdot u - 4\right) \cdot u}\\
\mathbf{else}:\\
\;\;\;\;s \cdot \log \left(\frac{1}{1 - 4 \cdot u}\right)\\
\end{array}
\end{array}
if (*.f32 #s(literal 4 binary32) u) < 0.00499999989Initial program 52.4%
lift-log.f32N/A
lift-/.f32N/A
log-divN/A
metadata-evalN/A
flip--N/A
+-lft-identityN/A
lower-/.f32N/A
Applied rewrites55.1%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3283.4
Applied rewrites83.4%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3296.6
Applied rewrites96.6%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3297.0
Applied rewrites97.0%
if 0.00499999989 < (*.f32 #s(literal 4 binary32) u) Initial program 93.2%
(FPCore (s u) :precision binary32 (* s (/ (* (* (- (* (- (* -234.66666666666666 u) 64.0) u) 16.0) u) u) (* (- (* -8.0 u) 4.0) u))))
float code(float s, float u) {
return s * (((((((-234.66666666666666f * u) - 64.0f) * u) - 16.0f) * u) * u) / (((-8.0f * u) - 4.0f) * u));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * ((((((((-234.66666666666666e0) * u) - 64.0e0) * u) - 16.0e0) * u) * u) / ((((-8.0e0) * u) - 4.0e0) * u))
end function
function code(s, u) return Float32(s * Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-234.66666666666666) * u) - Float32(64.0)) * u) - Float32(16.0)) * u) * u) / Float32(Float32(Float32(Float32(-8.0) * u) - Float32(4.0)) * u))) end
function tmp = code(s, u) tmp = s * (((((((single(-234.66666666666666) * u) - single(64.0)) * u) - single(16.0)) * u) * u) / (((single(-8.0) * u) - single(4.0)) * u)); end
\begin{array}{l}
\\
s \cdot \frac{\left(\left(\left(-234.66666666666666 \cdot u - 64\right) \cdot u - 16\right) \cdot u\right) \cdot u}{\left(-8 \cdot u - 4\right) \cdot u}
\end{array}
Initial program 62.1%
lift-log.f32N/A
lift-/.f32N/A
log-divN/A
metadata-evalN/A
flip--N/A
+-lft-identityN/A
lower-/.f32N/A
Applied rewrites46.1%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3273.6
Applied rewrites73.6%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3285.8
Applied rewrites85.8%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3287.1
Applied rewrites87.1%
(FPCore (s u) :precision binary32 (* s (/ (* (* (- (* -64.0 u) 16.0) u) u) (* (- (* -8.0 u) 4.0) u))))
float code(float s, float u) {
return s * (((((-64.0f * u) - 16.0f) * u) * u) / (((-8.0f * u) - 4.0f) * u));
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * ((((((-64.0e0) * u) - 16.0e0) * u) * u) / ((((-8.0e0) * u) - 4.0e0) * u))
end function
function code(s, u) return Float32(s * Float32(Float32(Float32(Float32(Float32(Float32(-64.0) * u) - Float32(16.0)) * u) * u) / Float32(Float32(Float32(Float32(-8.0) * u) - Float32(4.0)) * u))) end
function tmp = code(s, u) tmp = s * (((((single(-64.0) * u) - single(16.0)) * u) * u) / (((single(-8.0) * u) - single(4.0)) * u)); end
\begin{array}{l}
\\
s \cdot \frac{\left(\left(-64 \cdot u - 16\right) \cdot u\right) \cdot u}{\left(-8 \cdot u - 4\right) \cdot u}
\end{array}
Initial program 62.1%
lift-log.f32N/A
lift-/.f32N/A
log-divN/A
metadata-evalN/A
flip--N/A
+-lft-identityN/A
lower-/.f32N/A
Applied rewrites45.3%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3273.6
Applied rewrites73.6%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3285.8
Applied rewrites85.8%
(FPCore (s u) :precision binary32 (* s (+ (* (* (fma (fma 64.0 u 21.333333333333332) u 8.0) u) u) (* 4.0 u))))
float code(float s, float u) {
return s * (((fmaf(fmaf(64.0f, u, 21.333333333333332f), u, 8.0f) * u) * u) + (4.0f * u));
}
function code(s, u) return Float32(s * Float32(Float32(Float32(fma(fma(Float32(64.0), u, Float32(21.333333333333332)), u, Float32(8.0)) * u) * u) + Float32(Float32(4.0) * u))) end
\begin{array}{l}
\\
s \cdot \left(\left(\mathsf{fma}\left(\mathsf{fma}\left(64, u, 21.333333333333332\right), u, 8\right) \cdot u\right) \cdot u + 4 \cdot u\right)
\end{array}
Initial program 62.1%
lift-log.f32N/A
lift-/.f32N/A
log-divN/A
metadata-evalN/A
flip--N/A
+-lft-identityN/A
lower-/.f32N/A
Applied rewrites46.0%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3273.6
Applied rewrites73.6%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
lower-fma.f3273.6
Applied rewrites73.2%
Applied rewrites87.0%
(FPCore (s u) :precision binary32 (* s (* (+ (* (fma (fma 64.0 u 21.333333333333332) u 8.0) u) 4.0) u)))
float code(float s, float u) {
return s * (((fmaf(fmaf(64.0f, u, 21.333333333333332f), u, 8.0f) * u) + 4.0f) * u);
}
function code(s, u) return Float32(s * Float32(Float32(Float32(fma(fma(Float32(64.0), u, Float32(21.333333333333332)), u, Float32(8.0)) * u) + Float32(4.0)) * u)) end
\begin{array}{l}
\\
s \cdot \left(\left(\mathsf{fma}\left(\mathsf{fma}\left(64, u, 21.333333333333332\right), u, 8\right) \cdot u + 4\right) \cdot u\right)
\end{array}
Initial program 62.1%
lift-log.f32N/A
lift-/.f32N/A
log-divN/A
metadata-evalN/A
flip--N/A
+-lft-identityN/A
lower-/.f32N/A
Applied rewrites46.0%
Taylor expanded in u around 0
*-commutativeN/A
unpow2N/A
associate-*r*N/A
lower-*.f32N/A
lower-*.f32N/A
lower--.f32N/A
lower-*.f3273.6
Applied rewrites73.6%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
*-commutativeN/A
lower-fma.f32N/A
+-commutativeN/A
lower-fma.f3273.6
Applied rewrites73.2%
Applied rewrites86.9%
(FPCore (s u) :precision binary32 (* s (* 4.0 u)))
float code(float s, float u) {
return s * (4.0f * u);
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = s * (4.0e0 * u)
end function
function code(s, u) return Float32(s * Float32(Float32(4.0) * u)) end
function tmp = code(s, u) tmp = s * (single(4.0) * u); end
\begin{array}{l}
\\
s \cdot \left(4 \cdot u\right)
\end{array}
Initial program 62.1%
Taylor expanded in u around 0
lower-*.f3273.6
Applied rewrites73.6%
herbie shell --seed 2024329
(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))))))