Average Error: 12.4 → 0.2
Time: 6.3s
Precision: binary32
\[\left(0 \leq s \land s \leq 256\right) \land \left(2.328306437 \cdot 10^{-10} \leq u \land u \leq 0.25\right)\]
\[s \cdot \log \left(\frac{1}{1 - 4 \cdot u}\right) \]
↓
\[\begin{array}{l} t_0 := \mathsf{log1p}\left(u \cdot -4\right)\\ s \cdot \left(-\sqrt[3]{t_0 \cdot \left(t_0 \cdot t_0\right)}\right) \end{array} \]
s \cdot \log \left(\frac{1}{1 - 4 \cdot u}\right)
↓
\begin{array}{l}
t_0 := \mathsf{log1p}\left(u \cdot -4\right)\\
s \cdot \left(-\sqrt[3]{t_0 \cdot \left(t_0 \cdot t_0\right)}\right)
\end{array}

(FPCore (s u) :precision binary32 (* s (log (/ 1.0 (- 1.0 (* 4.0 u))))))
↓
(FPCore (s u)
 :precision binary32
 (let* ((t_0 (log1p (* u -4.0)))) (* s (- (cbrt (* t_0 (* t_0 t_0)))))))
float code(float s, float u) {
	return s * logf(1.0f / (1.0f - (4.0f * u)));
}
↓
float code(float s, float u) {
	float t_0 = log1pf(u * -4.0f);
	return s * -cbrtf(t_0 * (t_0 * t_0));
}

Error

Bits error versus s

Bits error versus u

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 12.4

    \[s \cdot \log \left(\frac{1}{1 - 4 \cdot u}\right) \]

  2. Simplified0.2

    \[\leadsto \color{blue}{s \cdot \left(-\mathsf{log1p}\left(u \cdot -4\right)\right)} \]

  3. Applied add-cbrt-cube_binary320.2

    \[\leadsto s \cdot \left(-\color{blue}{\sqrt[3]{\left(\mathsf{log1p}\left(u \cdot -4\right) \cdot \mathsf{log1p}\left(u \cdot -4\right)\right) \cdot \mathsf{log1p}\left(u \cdot -4\right)}}\right) \]

  4. Final simplification0.2

    \[\leadsto s \cdot \left(-\sqrt[3]{\mathsf{log1p}\left(u \cdot -4\right) \cdot \left(\mathsf{log1p}\left(u \cdot -4\right) \cdot \mathsf{log1p}\left(u \cdot -4\right)\right)}\right) \]

Reproduce

herbie shell --seed 2022077 
(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))))))