
(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 9 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 (<= (- 1.0 (* u 4.0)) 0.9599999785423279)
(* (log (/ 1.0 (- 1.0 (/ 1.0 (/ -1.0 (* -4.0 u)))))) s)
(*
(*
(*
(+
(+ (/ 21.333333333333332 u) (+ (/ 8.0 (* u u)) (/ 4.0 (pow u 3.0))))
64.0)
(pow u 3.0))
s)
u)))
float code(float s, float u) {
float tmp;
if ((1.0f - (u * 4.0f)) <= 0.9599999785423279f) {
tmp = logf((1.0f / (1.0f - (1.0f / (-1.0f / (-4.0f * u)))))) * s;
} else {
tmp = (((((21.333333333333332f / u) + ((8.0f / (u * u)) + (4.0f / powf(u, 3.0f)))) + 64.0f) * powf(u, 3.0f)) * s) * u;
}
return tmp;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
real(4) :: tmp
if ((1.0e0 - (u * 4.0e0)) <= 0.9599999785423279e0) then
tmp = log((1.0e0 / (1.0e0 - (1.0e0 / ((-1.0e0) / ((-4.0e0) * u)))))) * s
else
tmp = (((((21.333333333333332e0 / u) + ((8.0e0 / (u * u)) + (4.0e0 / (u ** 3.0e0)))) + 64.0e0) * (u ** 3.0e0)) * s) * u
end if
code = tmp
end function
function code(s, u) tmp = Float32(0.0) if (Float32(Float32(1.0) - Float32(u * Float32(4.0))) <= Float32(0.9599999785423279)) tmp = Float32(log(Float32(Float32(1.0) / Float32(Float32(1.0) - Float32(Float32(1.0) / Float32(Float32(-1.0) / Float32(Float32(-4.0) * u)))))) * s); else tmp = Float32(Float32(Float32(Float32(Float32(Float32(Float32(21.333333333333332) / u) + Float32(Float32(Float32(8.0) / Float32(u * u)) + Float32(Float32(4.0) / (u ^ Float32(3.0))))) + Float32(64.0)) * (u ^ Float32(3.0))) * s) * u); end return tmp end
function tmp_2 = code(s, u) tmp = single(0.0); if ((single(1.0) - (u * single(4.0))) <= single(0.9599999785423279)) tmp = log((single(1.0) / (single(1.0) - (single(1.0) / (single(-1.0) / (single(-4.0) * u)))))) * s; else tmp = (((((single(21.333333333333332) / u) + ((single(8.0) / (u * u)) + (single(4.0) / (u ^ single(3.0))))) + single(64.0)) * (u ^ single(3.0))) * s) * u; end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 - u \cdot 4 \leq 0.9599999785423279:\\
\;\;\;\;\log \left(\frac{1}{1 - \frac{1}{\frac{-1}{-4 \cdot u}}}\right) \cdot s\\
\mathbf{else}:\\
\;\;\;\;\left(\left(\left(\left(\frac{21.333333333333332}{u} + \left(\frac{8}{u \cdot u} + \frac{4}{{u}^{3}}\right)\right) + 64\right) \cdot {u}^{3}\right) \cdot s\right) \cdot u\\
\end{array}
\end{array}
if (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 4 binary32) u)) < 0.959999979Initial program 96.5%
/-rgt-identityN/A
clear-numN/A
lower-/.f32N/A
frac-2negN/A
metadata-evalN/A
lower-/.f32N/A
lift-*.f32N/A
distribute-lft-neg-inN/A
lower-*.f32N/A
metadata-eval96.5
Applied rewrites96.5%
if 0.959999979 < (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 4 binary32) u)) Initial program 54.0%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
Applied rewrites82.3%
Taylor expanded in u around inf
Applied rewrites98.6%
Final simplification98.3%
(FPCore (s u)
:precision binary32
(if (<= (- 1.0 (* u 4.0)) 0.984000027179718)
(* (log (/ 1.0 (- 1.0 (/ 1.0 (/ -1.0 (* -4.0 u)))))) s)
(+
(* (* s 4.0) u)
(* (* (+ (* 8.0 s) (* (* s u) 21.333333333333332)) u) u))))
float code(float s, float u) {
float tmp;
if ((1.0f - (u * 4.0f)) <= 0.984000027179718f) {
tmp = logf((1.0f / (1.0f - (1.0f / (-1.0f / (-4.0f * u)))))) * s;
} else {
tmp = ((s * 4.0f) * u) + ((((8.0f * s) + ((s * u) * 21.333333333333332f)) * u) * u);
}
return tmp;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
real(4) :: tmp
if ((1.0e0 - (u * 4.0e0)) <= 0.984000027179718e0) then
tmp = log((1.0e0 / (1.0e0 - (1.0e0 / ((-1.0e0) / ((-4.0e0) * u)))))) * s
else
tmp = ((s * 4.0e0) * u) + ((((8.0e0 * s) + ((s * u) * 21.333333333333332e0)) * u) * u)
end if
code = tmp
end function
function code(s, u) tmp = Float32(0.0) if (Float32(Float32(1.0) - Float32(u * Float32(4.0))) <= Float32(0.984000027179718)) tmp = Float32(log(Float32(Float32(1.0) / Float32(Float32(1.0) - Float32(Float32(1.0) / Float32(Float32(-1.0) / Float32(Float32(-4.0) * u)))))) * s); else tmp = Float32(Float32(Float32(s * Float32(4.0)) * u) + Float32(Float32(Float32(Float32(Float32(8.0) * s) + Float32(Float32(s * u) * Float32(21.333333333333332))) * u) * u)); end return tmp end
function tmp_2 = code(s, u) tmp = single(0.0); if ((single(1.0) - (u * single(4.0))) <= single(0.984000027179718)) tmp = log((single(1.0) / (single(1.0) - (single(1.0) / (single(-1.0) / (single(-4.0) * u)))))) * s; else tmp = ((s * single(4.0)) * u) + ((((single(8.0) * s) + ((s * u) * single(21.333333333333332))) * u) * u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;1 - u \cdot 4 \leq 0.984000027179718:\\
\;\;\;\;\log \left(\frac{1}{1 - \frac{1}{\frac{-1}{-4 \cdot u}}}\right) \cdot s\\
\mathbf{else}:\\
\;\;\;\;\left(s \cdot 4\right) \cdot u + \left(\left(8 \cdot s + \left(s \cdot u\right) \cdot 21.333333333333332\right) \cdot u\right) \cdot u\\
\end{array}
\end{array}
if (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 4 binary32) u)) < 0.984000027Initial program 94.3%
/-rgt-identityN/A
clear-numN/A
lower-/.f32N/A
frac-2negN/A
metadata-evalN/A
lower-/.f32N/A
lift-*.f32N/A
distribute-lft-neg-inN/A
lower-*.f32N/A
metadata-eval94.4
Applied rewrites94.4%
if 0.984000027 < (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 4 binary32) u)) Initial program 52.0%
Applied rewrites69.5%
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-*.f32N/A
lower-*.f32N/A
lower-*.f3284.4
Applied rewrites84.4%
Applied rewrites97.3%
Applied rewrites99.2%
Final simplification98.3%
(FPCore (s u)
:precision binary32
(let* ((t_0 (- 1.0 (* u 4.0))))
(if (<= t_0 0.984000027179718)
(* (log (/ 1.0 t_0)) s)
(+
(* (* s 4.0) u)
(* (* (+ (* 8.0 s) (* (* s u) 21.333333333333332)) u) u)))))
float code(float s, float u) {
float t_0 = 1.0f - (u * 4.0f);
float tmp;
if (t_0 <= 0.984000027179718f) {
tmp = logf((1.0f / t_0)) * s;
} else {
tmp = ((s * 4.0f) * u) + ((((8.0f * s) + ((s * u) * 21.333333333333332f)) * u) * u);
}
return tmp;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
real(4) :: t_0
real(4) :: tmp
t_0 = 1.0e0 - (u * 4.0e0)
if (t_0 <= 0.984000027179718e0) then
tmp = log((1.0e0 / t_0)) * s
else
tmp = ((s * 4.0e0) * u) + ((((8.0e0 * s) + ((s * u) * 21.333333333333332e0)) * u) * u)
end if
code = tmp
end function
function code(s, u) t_0 = Float32(Float32(1.0) - Float32(u * Float32(4.0))) tmp = Float32(0.0) if (t_0 <= Float32(0.984000027179718)) tmp = Float32(log(Float32(Float32(1.0) / t_0)) * s); else tmp = Float32(Float32(Float32(s * Float32(4.0)) * u) + Float32(Float32(Float32(Float32(Float32(8.0) * s) + Float32(Float32(s * u) * Float32(21.333333333333332))) * u) * u)); end return tmp end
function tmp_2 = code(s, u) t_0 = single(1.0) - (u * single(4.0)); tmp = single(0.0); if (t_0 <= single(0.984000027179718)) tmp = log((single(1.0) / t_0)) * s; else tmp = ((s * single(4.0)) * u) + ((((single(8.0) * s) + ((s * u) * single(21.333333333333332))) * u) * u); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 1 - u \cdot 4\\
\mathbf{if}\;t\_0 \leq 0.984000027179718:\\
\;\;\;\;\log \left(\frac{1}{t\_0}\right) \cdot s\\
\mathbf{else}:\\
\;\;\;\;\left(s \cdot 4\right) \cdot u + \left(\left(8 \cdot s + \left(s \cdot u\right) \cdot 21.333333333333332\right) \cdot u\right) \cdot u\\
\end{array}
\end{array}
if (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 4 binary32) u)) < 0.984000027Initial program 94.3%
if 0.984000027 < (-.f32 #s(literal 1 binary32) (*.f32 #s(literal 4 binary32) u)) Initial program 52.0%
Applied rewrites69.5%
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-*.f32N/A
lower-*.f32N/A
lower-*.f3284.4
Applied rewrites84.4%
Applied rewrites97.3%
Applied rewrites99.2%
Final simplification98.3%
(FPCore (s u) :precision binary32 (* (* (- (* 64.0 s) (/ (* (- -21.333333333333332 (/ (+ (/ 4.0 u) 8.0) u)) s) u)) (* u u)) (* u u)))
float code(float s, float u) {
return (((64.0f * s) - (((-21.333333333333332f - (((4.0f / u) + 8.0f) / u)) * s) / u)) * (u * u)) * (u * u);
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = (((64.0e0 * s) - ((((-21.333333333333332e0) - (((4.0e0 / u) + 8.0e0) / u)) * s) / u)) * (u * u)) * (u * u)
end function
function code(s, u) return Float32(Float32(Float32(Float32(Float32(64.0) * s) - Float32(Float32(Float32(Float32(-21.333333333333332) - Float32(Float32(Float32(Float32(4.0) / u) + Float32(8.0)) / u)) * s) / u)) * Float32(u * u)) * Float32(u * u)) end
function tmp = code(s, u) tmp = (((single(64.0) * s) - (((single(-21.333333333333332) - (((single(4.0) / u) + single(8.0)) / u)) * s) / u)) * (u * u)) * (u * u); end
\begin{array}{l}
\\
\left(\left(64 \cdot s - \frac{\left(-21.333333333333332 - \frac{\frac{4}{u} + 8}{u}\right) \cdot s}{u}\right) \cdot \left(u \cdot u\right)\right) \cdot \left(u \cdot u\right)
\end{array}
Initial program 59.8%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
Applied rewrites75.9%
Taylor expanded in u around inf
Applied rewrites93.0%
Taylor expanded in u around -inf
Applied rewrites92.8%
Applied rewrites92.5%
Final simplification92.5%
(FPCore (s u) :precision binary32 (+ (* (* s 4.0) u) (* (* (+ (* 8.0 s) (* (* s u) 21.333333333333332)) u) u)))
float code(float s, float u) {
return ((s * 4.0f) * u) + ((((8.0f * s) + ((s * u) * 21.333333333333332f)) * u) * u);
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = ((s * 4.0e0) * u) + ((((8.0e0 * s) + ((s * u) * 21.333333333333332e0)) * u) * u)
end function
function code(s, u) return Float32(Float32(Float32(s * Float32(4.0)) * u) + Float32(Float32(Float32(Float32(Float32(8.0) * s) + Float32(Float32(s * u) * Float32(21.333333333333332))) * u) * u)) end
function tmp = code(s, u) tmp = ((s * single(4.0)) * u) + ((((single(8.0) * s) + ((s * u) * single(21.333333333333332))) * u) * u); end
\begin{array}{l}
\\
\left(s \cdot 4\right) \cdot u + \left(\left(8 \cdot s + \left(s \cdot u\right) \cdot 21.333333333333332\right) \cdot u\right) \cdot u
\end{array}
Initial program 59.8%
Applied rewrites56.3%
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-*.f32N/A
lower-*.f32N/A
lower-*.f3275.9
Applied rewrites75.9%
Applied rewrites88.4%
Applied rewrites91.7%
Final simplification91.7%
(FPCore (s u) :precision binary32 (* (+ (* u 4.0) (* (* 8.0 u) u)) s))
float code(float s, float u) {
return ((u * 4.0f) + ((8.0f * u) * u)) * s;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = ((u * 4.0e0) + ((8.0e0 * u) * u)) * s
end function
function code(s, u) return Float32(Float32(Float32(u * Float32(4.0)) + Float32(Float32(Float32(8.0) * u) * u)) * s) end
function tmp = code(s, u) tmp = ((u * single(4.0)) + ((single(8.0) * u) * u)) * s; end
\begin{array}{l}
\\
\left(u \cdot 4 + \left(8 \cdot u\right) \cdot u\right) \cdot s
\end{array}
Initial program 59.8%
Applied rewrites56.3%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
+-commutativeN/A
lower-fma.f3275.9
Applied rewrites75.9%
Applied rewrites88.4%
Final simplification88.4%
(FPCore (s u) :precision binary32 (* (* (+ (* 8.0 u) 4.0) u) s))
float code(float s, float u) {
return (((8.0f * u) + 4.0f) * u) * s;
}
real(4) function code(s, u)
real(4), intent (in) :: s
real(4), intent (in) :: u
code = (((8.0e0 * u) + 4.0e0) * u) * s
end function
function code(s, u) return Float32(Float32(Float32(Float32(Float32(8.0) * u) + Float32(4.0)) * u) * s) end
function tmp = code(s, u) tmp = (((single(8.0) * u) + single(4.0)) * u) * s; end
\begin{array}{l}
\\
\left(\left(8 \cdot u + 4\right) \cdot u\right) \cdot s
\end{array}
Initial program 59.8%
Applied rewrites56.3%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
+-commutativeN/A
lower-fma.f3275.9
Applied rewrites75.9%
Applied rewrites88.2%
Final simplification88.2%
(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 59.8%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f3275.9
Applied rewrites75.9%
Final simplification75.9%
(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(Float32(s * u) * Float32(4.0)) end
function tmp = code(s, u) tmp = (s * u) * single(4.0); end
\begin{array}{l}
\\
\left(s \cdot u\right) \cdot 4
\end{array}
Initial program 59.8%
Applied rewrites56.3%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
+-commutativeN/A
lower-fma.f3275.9
Applied rewrites75.9%
Applied rewrites88.2%
Taylor expanded in u around 0
*-commutativeN/A
lower-*.f32N/A
*-commutativeN/A
lower-*.f3275.7
Applied rewrites75.7%
Final simplification75.7%
herbie shell --seed 2024249
(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))))))