Disney BSSRDF, PDF of scattering profile

Percentage Accurate: 99.6% → 99.6%
Time: 9.6s
Alternatives: 15
Speedup: N/A×

Specification

?
\[\left(0 \leq s \land s \leq 256\right) \land \left(10^{-6} < r \land r < 1000000\right)\]
\[\begin{array}{l} \\ \frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \end{array} \]
(FPCore (s r)
 :precision binary32
 (+
  (/ (* 0.25 (exp (/ (- r) s))) (* (* (* 2.0 (PI)) s) r))
  (/ (* 0.75 (exp (/ (- r) (* 3.0 s)))) (* (* (* 6.0 (PI)) s) r))))
\begin{array}{l}

\\
\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}
\end{array}

Sampling outcomes in binary32 precision:

Local Percentage Accuracy vs ?

The average percentage accuracy by input value. Horizontal axis shows value of an input variable; the variable is choosen in the title. Vertical axis is accuracy; higher is better. Red represent the original program, while blue represents Herbie's suggestion. These can be toggled with buttons below the plot. The line is an average while dots represent individual samples.

Accuracy vs Speed?

Herbie found 15 alternatives:

AlternativeAccuracySpeedup
The accuracy (vertical axis) and speed (horizontal axis) of each alternatives. Up and to the right is better. The red square shows the initial program, and each blue circle shows an alternative.The line shows the best available speed-accuracy tradeoffs.

Initial Program: 99.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \end{array} \]
(FPCore (s r)
 :precision binary32
 (+
  (/ (* 0.25 (exp (/ (- r) s))) (* (* (* 2.0 (PI)) s) r))
  (/ (* 0.75 (exp (/ (- r) (* 3.0 s)))) (* (* (* 6.0 (PI)) s) r))))
\begin{array}{l}

\\
\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}
\end{array}

Alternative 1: 99.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{r}{-3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \end{array} \]
(FPCore (s r)
 :precision binary32
 (+
  (* 0.125 (/ (exp (/ (- r) s)) (* (* (PI) s) r)))
  (/ (* 0.75 (exp (/ r (* -3.0 s)))) (* (* (* 6.0 (PI)) s) r))))
\begin{array}{l}

\\
0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{r}{-3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot e^{\frac{-r}{s}}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    3. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    4. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)} \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    5. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    6. associate-*l*N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(2 \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)\right)} \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    7. associate-*l*N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{2 \cdot \left(\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r\right)}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    8. times-fracN/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4}}{2} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    9. lower-*.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4}}{2} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    10. metadata-evalN/A

      \[\leadsto \color{blue}{\frac{1}{8}} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    11. lower-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \color{blue}{\frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    12. lower-*.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    13. lower-*.f3299.8

      \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right)} \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  4. Applied rewrites99.8%

    \[\leadsto \color{blue}{0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  5. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\color{blue}{\frac{-r}{3 \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    2. frac-2negN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\color{blue}{\frac{\mathsf{neg}\left(\left(-r\right)\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    3. lift-neg.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(r\right)\right)}\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    4. remove-double-negN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{\color{blue}{r}}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    5. lower-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\color{blue}{\frac{r}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    6. lift-*.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{r}{\mathsf{neg}\left(\color{blue}{3 \cdot s}\right)}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    7. distribute-lft-neg-inN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{r}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    8. metadata-evalN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{r}{\color{blue}{-3} \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    9. lower-*.f3299.8

      \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{r}{\color{blue}{-3 \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  6. Applied rewrites99.8%

    \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\color{blue}{\frac{r}{-3 \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  7. Add Preprocessing

Alternative 2: 99.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{\mathsf{fma}\left(\frac{e^{\frac{\frac{r}{-3}}{s}}}{\mathsf{PI}\left(\right)}, 0.125, \frac{e^{\frac{-r}{s}}}{\mathsf{PI}\left(\right)} \cdot 0.125\right)}{s \cdot r} \end{array} \]
(FPCore (s r)
 :precision binary32
 (/
  (fma
   (/ (exp (/ (/ r -3.0) s)) (PI))
   0.125
   (* (/ (exp (/ (- r) s)) (PI)) 0.125))
  (* s r)))
\begin{array}{l}

\\
\frac{\mathsf{fma}\left(\frac{e^{\frac{\frac{r}{-3}}{s}}}{\mathsf{PI}\left(\right)}, 0.125, \frac{e^{\frac{-r}{s}}}{\mathsf{PI}\left(\right)} \cdot 0.125\right)}{s \cdot r}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-+.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} \]
    2. +-commutativeN/A

      \[\leadsto \color{blue}{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} \]
    3. lift-/.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    4. lift-*.f32N/A

      \[\leadsto \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    5. lift-*.f32N/A

      \[\leadsto \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)} \cdot r} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    6. associate-*l*N/A

      \[\leadsto \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\color{blue}{\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot \left(s \cdot r\right)}} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    7. associate-/r*N/A

      \[\leadsto \color{blue}{\frac{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{6 \cdot \mathsf{PI}\left(\right)}}{s \cdot r}} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    8. lift-/.f32N/A

      \[\leadsto \frac{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{6 \cdot \mathsf{PI}\left(\right)}}{s \cdot r} + \color{blue}{\frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} \]
    9. lift-*.f32N/A

      \[\leadsto \frac{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{6 \cdot \mathsf{PI}\left(\right)}}{s \cdot r} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} \]
    10. lift-*.f32N/A

      \[\leadsto \frac{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{6 \cdot \mathsf{PI}\left(\right)}}{s \cdot r} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)} \cdot r} \]
    11. associate-*l*N/A

      \[\leadsto \frac{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{6 \cdot \mathsf{PI}\left(\right)}}{s \cdot r} + \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot \left(s \cdot r\right)}} \]
    12. associate-/r*N/A

      \[\leadsto \frac{\frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{6 \cdot \mathsf{PI}\left(\right)}}{s \cdot r} + \color{blue}{\frac{\frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{2 \cdot \mathsf{PI}\left(\right)}}{s \cdot r}} \]
  4. Applied rewrites99.7%

    \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{e^{\frac{\frac{r}{-3}}{s}}}{\mathsf{PI}\left(\right)}, 0.125, \frac{e^{\frac{-r}{s}}}{\mathsf{PI}\left(\right)} \cdot 0.125\right)}{s \cdot r}} \]
  5. Add Preprocessing

Alternative 3: 99.6% accurate, 1.1× speedup?

\[\begin{array}{l} \\ \frac{e^{\frac{\frac{r}{-3}}{s}} + e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} \cdot 0.125 \end{array} \]
(FPCore (s r)
 :precision binary32
 (* (/ (+ (exp (/ (/ r -3.0) s)) (exp (/ (- r) s))) (* (* (PI) s) r)) 0.125))
\begin{array}{l}

\\
\frac{e^{\frac{\frac{r}{-3}}{s}} + e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} \cdot 0.125
\end{array}
Derivation
  1. Initial program 99.8%

    \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot e^{\frac{-r}{s}}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    3. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    4. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)} \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    5. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    6. associate-*l*N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(2 \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)\right)} \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    7. associate-*l*N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{2 \cdot \left(\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r\right)}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    8. times-fracN/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4}}{2} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    9. lower-*.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4}}{2} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    10. metadata-evalN/A

      \[\leadsto \color{blue}{\frac{1}{8}} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    11. lower-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \color{blue}{\frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    12. lower-*.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    13. lower-*.f3299.8

      \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right)} \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  4. Applied rewrites99.8%

    \[\leadsto \color{blue}{0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  5. Applied rewrites99.7%

    \[\leadsto \color{blue}{\frac{e^{\frac{\frac{r}{-3}}{s}} + e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} \cdot 0.125} \]
  6. Add Preprocessing

Alternative 4: 10.5% accurate, 1.5× speedup?

\[\begin{array}{l} \\ 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\mathsf{fma}\left(0.041666666666666664, \frac{r}{s}, -0.25\right)}{s}, r, 0.75\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \end{array} \]
(FPCore (s r)
 :precision binary32
 (+
  (* 0.125 (/ (exp (/ (- r) s)) (* (* (PI) s) r)))
  (/
   (fma (/ (fma 0.041666666666666664 (/ r s) -0.25) s) r 0.75)
   (* (* (* 6.0 (PI)) s) r))))
\begin{array}{l}

\\
0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\mathsf{fma}\left(0.041666666666666664, \frac{r}{s}, -0.25\right)}{s}, r, 0.75\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot e^{\frac{-r}{s}}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    3. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    4. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)} \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    5. lift-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    6. associate-*l*N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(2 \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)\right)} \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    7. associate-*l*N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{2 \cdot \left(\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r\right)}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    8. times-fracN/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4}}{2} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    9. lower-*.f32N/A

      \[\leadsto \color{blue}{\frac{\frac{1}{4}}{2} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    10. metadata-evalN/A

      \[\leadsto \color{blue}{\frac{1}{8}} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    11. lower-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \color{blue}{\frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    12. lower-*.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{\frac{3}{4} \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    13. lower-*.f3299.8

      \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right)} \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  4. Applied rewrites99.8%

    \[\leadsto \color{blue}{0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  5. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\color{blue}{\frac{-r}{3 \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    2. frac-2negN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\color{blue}{\frac{\mathsf{neg}\left(\left(-r\right)\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    3. lift-neg.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(r\right)\right)}\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    4. remove-double-negN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{\color{blue}{r}}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    5. lower-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\color{blue}{\frac{r}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    6. lift-*.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{r}{\mathsf{neg}\left(\color{blue}{3 \cdot s}\right)}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    7. distribute-lft-neg-inN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{r}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    8. metadata-evalN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\frac{3}{4} \cdot e^{\frac{r}{\color{blue}{-3} \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    9. lower-*.f3299.8

      \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{r}{\color{blue}{-3 \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  6. Applied rewrites99.8%

    \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\color{blue}{\frac{r}{-3 \cdot s}}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  7. Taylor expanded in r around 0

    \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\color{blue}{\frac{3}{4} + r \cdot \left(\frac{1}{24} \cdot \frac{r}{{s}^{2}} - \frac{1}{4} \cdot \frac{1}{s}\right)}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  8. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\color{blue}{r \cdot \left(\frac{1}{24} \cdot \frac{r}{{s}^{2}} - \frac{1}{4} \cdot \frac{1}{s}\right) + \frac{3}{4}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    2. *-commutativeN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\color{blue}{\left(\frac{1}{24} \cdot \frac{r}{{s}^{2}} - \frac{1}{4} \cdot \frac{1}{s}\right) \cdot r} + \frac{3}{4}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    3. lower-fma.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\color{blue}{\mathsf{fma}\left(\frac{1}{24} \cdot \frac{r}{{s}^{2}} - \frac{1}{4} \cdot \frac{1}{s}, r, \frac{3}{4}\right)}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    4. fp-cancel-sub-sign-invN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\color{blue}{\frac{1}{24} \cdot \frac{r}{{s}^{2}} + \left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot \frac{1}{s}}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    5. associate-*r/N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\color{blue}{\frac{\frac{1}{24} \cdot r}{{s}^{2}}} + \left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot \frac{1}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    6. unpow2N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\frac{1}{24} \cdot r}{\color{blue}{s \cdot s}} + \left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot \frac{1}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    7. associate-/r*N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\color{blue}{\frac{\frac{\frac{1}{24} \cdot r}{s}}{s}} + \left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot \frac{1}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    8. associate-*r/N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\color{blue}{\frac{1}{24} \cdot \frac{r}{s}}}{s} + \left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot \frac{1}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    9. metadata-evalN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\color{blue}{\left(\mathsf{neg}\left(\frac{-1}{24}\right)\right)} \cdot \frac{r}{s}}{s} + \left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot \frac{1}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    10. metadata-evalN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\left(\mathsf{neg}\left(\frac{-1}{24}\right)\right) \cdot \frac{r}{s}}{s} + \color{blue}{\frac{-1}{4}} \cdot \frac{1}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    11. associate-*r/N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\left(\mathsf{neg}\left(\frac{-1}{24}\right)\right) \cdot \frac{r}{s}}{s} + \color{blue}{\frac{\frac{-1}{4} \cdot 1}{s}}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    12. metadata-evalN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\left(\mathsf{neg}\left(\frac{-1}{24}\right)\right) \cdot \frac{r}{s}}{s} + \frac{\color{blue}{\frac{-1}{4}}}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    13. div-add-revN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\color{blue}{\frac{\left(\mathsf{neg}\left(\frac{-1}{24}\right)\right) \cdot \frac{r}{s} + \frac{-1}{4}}{s}}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    14. lower-/.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\color{blue}{\frac{\left(\mathsf{neg}\left(\frac{-1}{24}\right)\right) \cdot \frac{r}{s} + \frac{-1}{4}}{s}}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    15. metadata-evalN/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\color{blue}{\frac{1}{24}} \cdot \frac{r}{s} + \frac{-1}{4}}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    16. lower-fma.f32N/A

      \[\leadsto \frac{1}{8} \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\color{blue}{\mathsf{fma}\left(\frac{1}{24}, \frac{r}{s}, \frac{-1}{4}\right)}}{s}, r, \frac{3}{4}\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    17. lower-/.f329.9

      \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{\mathsf{fma}\left(0.041666666666666664, \color{blue}{\frac{r}{s}}, -0.25\right)}{s}, r, 0.75\right)}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  9. Applied rewrites9.9%

    \[\leadsto 0.125 \cdot \frac{e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r} + \frac{\color{blue}{\mathsf{fma}\left(\frac{\mathsf{fma}\left(0.041666666666666664, \frac{r}{s}, -0.25\right)}{s}, r, 0.75\right)}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  10. Add Preprocessing

Alternative 5: 9.9% accurate, 3.3× speedup?

\[\begin{array}{l} \\ \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{r}{\left(s \cdot s\right) \cdot \mathsf{PI}\left(\right)}, -0.06944444444444445, \frac{\frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{s}\right), r, \frac{-0.25}{\mathsf{PI}\left(\right)}\right)}{r}}{-s} \end{array} \]
(FPCore (s r)
 :precision binary32
 (/
  (/
   (fma
    (fma
     (/ r (* (* s s) (PI)))
     -0.06944444444444445
     (/ (/ 0.16666666666666666 (PI)) s))
    r
    (/ -0.25 (PI)))
   r)
  (- s)))
\begin{array}{l}

\\
\frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{r}{\left(s \cdot s\right) \cdot \mathsf{PI}\left(\right)}, -0.06944444444444445, \frac{\frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{s}\right), r, \frac{-0.25}{\mathsf{PI}\left(\right)}\right)}{r}}{-s}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
  2. Add Preprocessing
  3. Taylor expanded in s around -inf

    \[\leadsto \color{blue}{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{\frac{-1}{48} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)} + \frac{-1}{1296} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)}}{s} + \left(\frac{-1}{16} \cdot \frac{r}{\mathsf{PI}\left(\right)} + \frac{-1}{144} \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s} - \frac{1}{6} \cdot \frac{1}{\mathsf{PI}\left(\right)}}{s} - \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}}{s}} \]
  4. Applied rewrites9.1%

    \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(-0.06944444444444445, \frac{r}{\mathsf{PI}\left(\right)}, \frac{0.021604938271604937 \cdot \left(r \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s}\right)}{-s} - \frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{-s} - \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{-s}} \]
  5. Taylor expanded in r around 0

    \[\leadsto \frac{\frac{r \cdot \left(\frac{-5}{72} \cdot \frac{r}{{s}^{2} \cdot \mathsf{PI}\left(\right)} + \frac{1}{6} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}\right) - \frac{1}{4} \cdot \frac{1}{\mathsf{PI}\left(\right)}}{r}}{-\color{blue}{s}} \]
  6. Step-by-step derivation
    1. Applied rewrites9.4%

      \[\leadsto \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{r}{\left(s \cdot s\right) \cdot \mathsf{PI}\left(\right)}, -0.06944444444444445, \frac{\frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{s}\right), r, \frac{-0.25}{\mathsf{PI}\left(\right)}\right)}{r}}{-\color{blue}{s}} \]
    2. Add Preprocessing

    Alternative 6: 9.9% accurate, 3.9× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \mathsf{PI}\left(\right) \cdot s\\ \frac{\frac{\mathsf{fma}\left(\frac{0.25}{\mathsf{PI}\left(\right)}, t\_0, r \cdot \mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)\right)}{t\_0 \cdot r}}{s} \end{array} \end{array} \]
    (FPCore (s r)
     :precision binary32
     (let* ((t_0 (* (PI) s)))
       (/
        (/
         (fma
          (/ 0.25 (PI))
          t_0
          (* r (fma (/ 0.06944444444444445 s) r -0.16666666666666666)))
         (* t_0 r))
        s)))
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \mathsf{PI}\left(\right) \cdot s\\
    \frac{\frac{\mathsf{fma}\left(\frac{0.25}{\mathsf{PI}\left(\right)}, t\_0, r \cdot \mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)\right)}{t\_0 \cdot r}}{s}
    \end{array}
    \end{array}
    
    Derivation
    1. Initial program 99.8%

      \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
    2. Add Preprocessing
    3. Taylor expanded in s around -inf

      \[\leadsto \color{blue}{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{\frac{-1}{48} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)} + \frac{-1}{1296} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)}}{s} + \left(\frac{-1}{16} \cdot \frac{r}{\mathsf{PI}\left(\right)} + \frac{-1}{144} \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s} - \frac{1}{6} \cdot \frac{1}{\mathsf{PI}\left(\right)}}{s} - \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}}{s}} \]
    4. Applied rewrites9.1%

      \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(-0.06944444444444445, \frac{r}{\mathsf{PI}\left(\right)}, \frac{0.021604938271604937 \cdot \left(r \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s}\right)}{-s} - \frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{-s} - \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{-s}} \]
    5. Taylor expanded in s around inf

      \[\leadsto \frac{\left(\frac{5}{72} \cdot \frac{r}{{s}^{2} \cdot \mathsf{PI}\left(\right)} + \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}\right) - \frac{\frac{1}{6}}{s \cdot \mathsf{PI}\left(\right)}}{\color{blue}{s}} \]
    6. Applied rewrites9.4%

      \[\leadsto \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, \frac{r}{\mathsf{PI}\left(\right)}, \frac{-0.16666666666666666}{\mathsf{PI}\left(\right)}\right)}{s}}{\color{blue}{s}} \]
    7. Step-by-step derivation
      1. Applied rewrites9.4%

        \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)}{\mathsf{PI}\left(\right)}}{s} + \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}} \]
      2. Step-by-step derivation
        1. Applied rewrites9.4%

          \[\leadsto \frac{\frac{\mathsf{fma}\left(\frac{0.25}{\mathsf{PI}\left(\right)}, \mathsf{PI}\left(\right) \cdot s, r \cdot \mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)\right)}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}}{s} \]
        2. Add Preprocessing

        Alternative 7: 9.9% accurate, 4.0× speedup?

        \[\begin{array}{l} \\ \frac{\frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)}{\mathsf{PI}\left(\right)}}{s \cdot s} + \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{s} \end{array} \]
        (FPCore (s r)
         :precision binary32
         (+
          (/ (/ (fma (/ 0.06944444444444445 s) r -0.16666666666666666) (PI)) (* s s))
          (/ (/ 0.25 (* (PI) r)) s)))
        \begin{array}{l}
        
        \\
        \frac{\frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)}{\mathsf{PI}\left(\right)}}{s \cdot s} + \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}
        \end{array}
        
        Derivation
        1. Initial program 99.8%

          \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
        2. Add Preprocessing
        3. Taylor expanded in s around -inf

          \[\leadsto \color{blue}{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{\frac{-1}{48} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)} + \frac{-1}{1296} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)}}{s} + \left(\frac{-1}{16} \cdot \frac{r}{\mathsf{PI}\left(\right)} + \frac{-1}{144} \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s} - \frac{1}{6} \cdot \frac{1}{\mathsf{PI}\left(\right)}}{s} - \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}}{s}} \]
        4. Applied rewrites9.1%

          \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(-0.06944444444444445, \frac{r}{\mathsf{PI}\left(\right)}, \frac{0.021604938271604937 \cdot \left(r \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s}\right)}{-s} - \frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{-s} - \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{-s}} \]
        5. Taylor expanded in s around inf

          \[\leadsto \frac{\left(\frac{5}{72} \cdot \frac{r}{{s}^{2} \cdot \mathsf{PI}\left(\right)} + \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}\right) - \frac{\frac{1}{6}}{s \cdot \mathsf{PI}\left(\right)}}{\color{blue}{s}} \]
        6. Applied rewrites9.4%

          \[\leadsto \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, \frac{r}{\mathsf{PI}\left(\right)}, \frac{-0.16666666666666666}{\mathsf{PI}\left(\right)}\right)}{s}}{\color{blue}{s}} \]
        7. Step-by-step derivation
          1. Applied rewrites9.4%

            \[\leadsto \frac{\frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)}{\mathsf{PI}\left(\right)}}{s \cdot s} + \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{\color{blue}{s}} \]
          2. Add Preprocessing

          Alternative 8: 9.9% accurate, 4.1× speedup?

          \[\begin{array}{l} \\ \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\frac{-0.16666666666666666 + \frac{0.06944444444444445}{s} \cdot r}{\mathsf{PI}\left(\right)}}{s}}{s} \end{array} \]
          (FPCore (s r)
           :precision binary32
           (/
            (+
             (/ 0.25 (* (PI) r))
             (/ (/ (+ -0.16666666666666666 (* (/ 0.06944444444444445 s) r)) (PI)) s))
            s))
          \begin{array}{l}
          
          \\
          \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\frac{-0.16666666666666666 + \frac{0.06944444444444445}{s} \cdot r}{\mathsf{PI}\left(\right)}}{s}}{s}
          \end{array}
          
          Derivation
          1. Initial program 99.8%

            \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
          2. Add Preprocessing
          3. Taylor expanded in s around -inf

            \[\leadsto \color{blue}{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{\frac{-1}{48} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)} + \frac{-1}{1296} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)}}{s} + \left(\frac{-1}{16} \cdot \frac{r}{\mathsf{PI}\left(\right)} + \frac{-1}{144} \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s} - \frac{1}{6} \cdot \frac{1}{\mathsf{PI}\left(\right)}}{s} - \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}}{s}} \]
          4. Applied rewrites9.1%

            \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(-0.06944444444444445, \frac{r}{\mathsf{PI}\left(\right)}, \frac{0.021604938271604937 \cdot \left(r \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s}\right)}{-s} - \frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{-s} - \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{-s}} \]
          5. Taylor expanded in s around inf

            \[\leadsto \frac{\left(\frac{5}{72} \cdot \frac{r}{{s}^{2} \cdot \mathsf{PI}\left(\right)} + \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}\right) - \frac{\frac{1}{6}}{s \cdot \mathsf{PI}\left(\right)}}{\color{blue}{s}} \]
          6. Applied rewrites9.4%

            \[\leadsto \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, \frac{r}{\mathsf{PI}\left(\right)}, \frac{-0.16666666666666666}{\mathsf{PI}\left(\right)}\right)}{s}}{\color{blue}{s}} \]
          7. Step-by-step derivation
            1. Applied rewrites9.4%

              \[\leadsto \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\frac{-0.16666666666666666 + \frac{0.06944444444444445}{s} \cdot r}{\mathsf{PI}\left(\right)}}{s}}{s} \]
            2. Add Preprocessing

            Alternative 9: 9.9% accurate, 4.2× speedup?

            \[\begin{array}{l} \\ \frac{\frac{\frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)}{\mathsf{PI}\left(\right)}}{s} + \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{s} \end{array} \]
            (FPCore (s r)
             :precision binary32
             (/
              (+
               (/ (/ (fma (/ 0.06944444444444445 s) r -0.16666666666666666) (PI)) s)
               (/ 0.25 (* (PI) r)))
              s))
            \begin{array}{l}
            
            \\
            \frac{\frac{\frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)}{\mathsf{PI}\left(\right)}}{s} + \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}
            \end{array}
            
            Derivation
            1. Initial program 99.8%

              \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
            2. Add Preprocessing
            3. Taylor expanded in s around -inf

              \[\leadsto \color{blue}{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{\frac{-1}{48} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)} + \frac{-1}{1296} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)}}{s} + \left(\frac{-1}{16} \cdot \frac{r}{\mathsf{PI}\left(\right)} + \frac{-1}{144} \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s} - \frac{1}{6} \cdot \frac{1}{\mathsf{PI}\left(\right)}}{s} - \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}}{s}} \]
            4. Applied rewrites9.1%

              \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(-0.06944444444444445, \frac{r}{\mathsf{PI}\left(\right)}, \frac{0.021604938271604937 \cdot \left(r \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s}\right)}{-s} - \frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{-s} - \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{-s}} \]
            5. Taylor expanded in s around inf

              \[\leadsto \frac{\left(\frac{5}{72} \cdot \frac{r}{{s}^{2} \cdot \mathsf{PI}\left(\right)} + \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}\right) - \frac{\frac{1}{6}}{s \cdot \mathsf{PI}\left(\right)}}{\color{blue}{s}} \]
            6. Applied rewrites9.4%

              \[\leadsto \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, \frac{r}{\mathsf{PI}\left(\right)}, \frac{-0.16666666666666666}{\mathsf{PI}\left(\right)}\right)}{s}}{\color{blue}{s}} \]
            7. Step-by-step derivation
              1. Applied rewrites9.4%

                \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, r, -0.16666666666666666\right)}{\mathsf{PI}\left(\right)}}{s} + \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}} \]
              2. Add Preprocessing

              Alternative 10: 9.9% accurate, 4.3× speedup?

              \[\begin{array}{l} \\ \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\frac{\mathsf{fma}\left(0.06944444444444445, r, -0.16666666666666666 \cdot s\right)}{\mathsf{PI}\left(\right) \cdot s}}{s}}{s} \end{array} \]
              (FPCore (s r)
               :precision binary32
               (/
                (+
                 (/ 0.25 (* (PI) r))
                 (/ (/ (fma 0.06944444444444445 r (* -0.16666666666666666 s)) (* (PI) s)) s))
                s))
              \begin{array}{l}
              
              \\
              \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\frac{\mathsf{fma}\left(0.06944444444444445, r, -0.16666666666666666 \cdot s\right)}{\mathsf{PI}\left(\right) \cdot s}}{s}}{s}
              \end{array}
              
              Derivation
              1. Initial program 99.8%

                \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
              2. Add Preprocessing
              3. Taylor expanded in s around -inf

                \[\leadsto \color{blue}{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{-1 \cdot \frac{\frac{-1}{48} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)} + \frac{-1}{1296} \cdot \frac{{r}^{2}}{\mathsf{PI}\left(\right)}}{s} + \left(\frac{-1}{16} \cdot \frac{r}{\mathsf{PI}\left(\right)} + \frac{-1}{144} \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s} - \frac{1}{6} \cdot \frac{1}{\mathsf{PI}\left(\right)}}{s} - \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}}{s}} \]
              4. Applied rewrites9.1%

                \[\leadsto \color{blue}{\frac{\frac{\frac{\mathsf{fma}\left(-0.06944444444444445, \frac{r}{\mathsf{PI}\left(\right)}, \frac{0.021604938271604937 \cdot \left(r \cdot \frac{r}{\mathsf{PI}\left(\right)}\right)}{s}\right)}{-s} - \frac{0.16666666666666666}{\mathsf{PI}\left(\right)}}{-s} - \frac{0.25}{\mathsf{PI}\left(\right) \cdot r}}{-s}} \]
              5. Taylor expanded in s around inf

                \[\leadsto \frac{\left(\frac{5}{72} \cdot \frac{r}{{s}^{2} \cdot \mathsf{PI}\left(\right)} + \frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)}\right) - \frac{\frac{1}{6}}{s \cdot \mathsf{PI}\left(\right)}}{\color{blue}{s}} \]
              6. Applied rewrites9.4%

                \[\leadsto \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\mathsf{fma}\left(\frac{0.06944444444444445}{s}, \frac{r}{\mathsf{PI}\left(\right)}, \frac{-0.16666666666666666}{\mathsf{PI}\left(\right)}\right)}{s}}{\color{blue}{s}} \]
              7. Taylor expanded in s around 0

                \[\leadsto \frac{\frac{\frac{1}{4}}{\mathsf{PI}\left(\right) \cdot r} + \frac{\frac{\frac{-1}{6} \cdot \frac{s}{\mathsf{PI}\left(\right)} + \frac{5}{72} \cdot \frac{r}{\mathsf{PI}\left(\right)}}{s}}{s}}{s} \]
              8. Step-by-step derivation
                1. Applied rewrites9.4%

                  \[\leadsto \frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot r} + \frac{\frac{\mathsf{fma}\left(0.06944444444444445, r, -0.16666666666666666 \cdot s\right)}{\mathsf{PI}\left(\right) \cdot s}}{s}}{s} \]
                2. Add Preprocessing

                Alternative 11: 8.9% accurate, 5.0× speedup?

                \[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{\mathsf{PI}\left(\right)}\\ \frac{\frac{\frac{0.25}{s \cdot r}}{t\_0}}{t\_0} \end{array} \end{array} \]
                (FPCore (s r)
                 :precision binary32
                 (let* ((t_0 (sqrt (PI)))) (/ (/ (/ 0.25 (* s r)) t_0) t_0)))
                \begin{array}{l}
                
                \\
                \begin{array}{l}
                t_0 := \sqrt{\mathsf{PI}\left(\right)}\\
                \frac{\frac{\frac{0.25}{s \cdot r}}{t\_0}}{t\_0}
                \end{array}
                \end{array}
                
                Derivation
                1. Initial program 99.8%

                  \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
                2. Add Preprocessing
                3. Taylor expanded in s around inf

                  \[\leadsto \color{blue}{\frac{\frac{1}{4}}{r \cdot \left(s \cdot \mathsf{PI}\left(\right)\right)}} \]
                4. Step-by-step derivation
                  1. *-commutativeN/A

                    \[\leadsto \frac{\frac{1}{4}}{\color{blue}{\left(s \cdot \mathsf{PI}\left(\right)\right) \cdot r}} \]
                  2. associate-/r*N/A

                    \[\leadsto \color{blue}{\frac{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                  3. metadata-evalN/A

                    \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4} \cdot 1}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                  4. associate-*r/N/A

                    \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                  5. lower-/.f32N/A

                    \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                  6. associate-*r/N/A

                    \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4} \cdot 1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                  7. metadata-evalN/A

                    \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4}}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                  8. lower-/.f32N/A

                    \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                  9. *-commutativeN/A

                    \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                  10. lower-*.f32N/A

                    \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                  11. lower-PI.f328.6

                    \[\leadsto \frac{\frac{0.25}{\color{blue}{\mathsf{PI}\left(\right)} \cdot s}}{r} \]
                5. Applied rewrites8.6%

                  \[\leadsto \color{blue}{\frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot s}}{r}} \]
                6. Step-by-step derivation
                  1. Applied rewrites8.6%

                    \[\leadsto \frac{0.25}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} \]
                  2. Step-by-step derivation
                    1. Applied rewrites8.6%

                      \[\leadsto \frac{0.25}{\left(s \cdot r\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}} \]
                    2. Step-by-step derivation
                      1. Applied rewrites8.6%

                        \[\leadsto \frac{\frac{\frac{0.25}{s \cdot r}}{\sqrt{\mathsf{PI}\left(\right)}}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}} \]
                      2. Add Preprocessing

                      Alternative 12: 8.9% accurate, 5.6× speedup?

                      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{\mathsf{PI}\left(\right)}\\ \frac{\frac{0.25}{\left(s \cdot t\_0\right) \cdot t\_0}}{r} \end{array} \end{array} \]
                      (FPCore (s r)
                       :precision binary32
                       (let* ((t_0 (sqrt (PI)))) (/ (/ 0.25 (* (* s t_0) t_0)) r)))
                      \begin{array}{l}
                      
                      \\
                      \begin{array}{l}
                      t_0 := \sqrt{\mathsf{PI}\left(\right)}\\
                      \frac{\frac{0.25}{\left(s \cdot t\_0\right) \cdot t\_0}}{r}
                      \end{array}
                      \end{array}
                      
                      Derivation
                      1. Initial program 99.8%

                        \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
                      2. Add Preprocessing
                      3. Taylor expanded in s around inf

                        \[\leadsto \color{blue}{\frac{\frac{1}{4}}{r \cdot \left(s \cdot \mathsf{PI}\left(\right)\right)}} \]
                      4. Step-by-step derivation
                        1. *-commutativeN/A

                          \[\leadsto \frac{\frac{1}{4}}{\color{blue}{\left(s \cdot \mathsf{PI}\left(\right)\right) \cdot r}} \]
                        2. associate-/r*N/A

                          \[\leadsto \color{blue}{\frac{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                        3. metadata-evalN/A

                          \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4} \cdot 1}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                        4. associate-*r/N/A

                          \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                        5. lower-/.f32N/A

                          \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                        6. associate-*r/N/A

                          \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4} \cdot 1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                        7. metadata-evalN/A

                          \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4}}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                        8. lower-/.f32N/A

                          \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                        9. *-commutativeN/A

                          \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                        10. lower-*.f32N/A

                          \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                        11. lower-PI.f328.6

                          \[\leadsto \frac{\frac{0.25}{\color{blue}{\mathsf{PI}\left(\right)} \cdot s}}{r} \]
                      5. Applied rewrites8.6%

                        \[\leadsto \color{blue}{\frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot s}}{r}} \]
                      6. Step-by-step derivation
                        1. Applied rewrites8.6%

                          \[\leadsto \frac{\frac{0.25}{\left(s \cdot \sqrt{\mathsf{PI}\left(\right)}\right) \cdot \sqrt{\mathsf{PI}\left(\right)}}}{r} \]
                        2. Add Preprocessing

                        Alternative 13: 8.9% accurate, 10.6× speedup?

                        \[\begin{array}{l} \\ \frac{\frac{0.25}{s}}{\mathsf{PI}\left(\right) \cdot r} \end{array} \]
                        (FPCore (s r) :precision binary32 (/ (/ 0.25 s) (* (PI) r)))
                        \begin{array}{l}
                        
                        \\
                        \frac{\frac{0.25}{s}}{\mathsf{PI}\left(\right) \cdot r}
                        \end{array}
                        
                        Derivation
                        1. Initial program 99.8%

                          \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
                        2. Add Preprocessing
                        3. Taylor expanded in s around inf

                          \[\leadsto \color{blue}{\frac{\frac{1}{4}}{r \cdot \left(s \cdot \mathsf{PI}\left(\right)\right)}} \]
                        4. Step-by-step derivation
                          1. *-commutativeN/A

                            \[\leadsto \frac{\frac{1}{4}}{\color{blue}{\left(s \cdot \mathsf{PI}\left(\right)\right) \cdot r}} \]
                          2. associate-/r*N/A

                            \[\leadsto \color{blue}{\frac{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                          3. metadata-evalN/A

                            \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4} \cdot 1}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                          4. associate-*r/N/A

                            \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                          5. lower-/.f32N/A

                            \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                          6. associate-*r/N/A

                            \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4} \cdot 1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                          7. metadata-evalN/A

                            \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4}}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                          8. lower-/.f32N/A

                            \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                          9. *-commutativeN/A

                            \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                          10. lower-*.f32N/A

                            \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                          11. lower-PI.f328.6

                            \[\leadsto \frac{\frac{0.25}{\color{blue}{\mathsf{PI}\left(\right)} \cdot s}}{r} \]
                        5. Applied rewrites8.6%

                          \[\leadsto \color{blue}{\frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot s}}{r}} \]
                        6. Step-by-step derivation
                          1. Applied rewrites8.6%

                            \[\leadsto \frac{0.25}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} \]
                          2. Step-by-step derivation
                            1. Applied rewrites8.6%

                              \[\leadsto \frac{0.25}{\left(s \cdot r\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}} \]
                            2. Step-by-step derivation
                              1. Applied rewrites8.6%

                                \[\leadsto \frac{\frac{0.25}{s}}{\color{blue}{\mathsf{PI}\left(\right) \cdot r}} \]
                              2. Add Preprocessing

                              Alternative 14: 8.9% accurate, 13.5× speedup?

                              \[\begin{array}{l} \\ \frac{0.25}{\left(\mathsf{PI}\left(\right) \cdot r\right) \cdot s} \end{array} \]
                              (FPCore (s r) :precision binary32 (/ 0.25 (* (* (PI) r) s)))
                              \begin{array}{l}
                              
                              \\
                              \frac{0.25}{\left(\mathsf{PI}\left(\right) \cdot r\right) \cdot s}
                              \end{array}
                              
                              Derivation
                              1. Initial program 99.8%

                                \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
                              2. Add Preprocessing
                              3. Taylor expanded in s around inf

                                \[\leadsto \color{blue}{\frac{\frac{1}{4}}{r \cdot \left(s \cdot \mathsf{PI}\left(\right)\right)}} \]
                              4. Step-by-step derivation
                                1. *-commutativeN/A

                                  \[\leadsto \frac{\frac{1}{4}}{\color{blue}{\left(s \cdot \mathsf{PI}\left(\right)\right) \cdot r}} \]
                                2. associate-/r*N/A

                                  \[\leadsto \color{blue}{\frac{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                                3. metadata-evalN/A

                                  \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4} \cdot 1}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                                4. associate-*r/N/A

                                  \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                                5. lower-/.f32N/A

                                  \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                                6. associate-*r/N/A

                                  \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4} \cdot 1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                                7. metadata-evalN/A

                                  \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4}}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                                8. lower-/.f32N/A

                                  \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                                9. *-commutativeN/A

                                  \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                                10. lower-*.f32N/A

                                  \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                                11. lower-PI.f328.6

                                  \[\leadsto \frac{\frac{0.25}{\color{blue}{\mathsf{PI}\left(\right)} \cdot s}}{r} \]
                              5. Applied rewrites8.6%

                                \[\leadsto \color{blue}{\frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot s}}{r}} \]
                              6. Step-by-step derivation
                                1. Applied rewrites8.6%

                                  \[\leadsto \frac{0.25}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} \]
                                2. Step-by-step derivation
                                  1. Applied rewrites8.6%

                                    \[\leadsto \frac{0.25}{\left(\mathsf{PI}\left(\right) \cdot r\right) \cdot \color{blue}{s}} \]
                                  2. Add Preprocessing

                                  Alternative 15: 8.9% accurate, 13.5× speedup?

                                  \[\begin{array}{l} \\ \frac{0.25}{\left(s \cdot r\right) \cdot \mathsf{PI}\left(\right)} \end{array} \]
                                  (FPCore (s r) :precision binary32 (/ 0.25 (* (* s r) (PI))))
                                  \begin{array}{l}
                                  
                                  \\
                                  \frac{0.25}{\left(s \cdot r\right) \cdot \mathsf{PI}\left(\right)}
                                  \end{array}
                                  
                                  Derivation
                                  1. Initial program 99.8%

                                    \[\frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{0.75 \cdot e^{\frac{-r}{3 \cdot s}}}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
                                  2. Add Preprocessing
                                  3. Taylor expanded in s around inf

                                    \[\leadsto \color{blue}{\frac{\frac{1}{4}}{r \cdot \left(s \cdot \mathsf{PI}\left(\right)\right)}} \]
                                  4. Step-by-step derivation
                                    1. *-commutativeN/A

                                      \[\leadsto \frac{\frac{1}{4}}{\color{blue}{\left(s \cdot \mathsf{PI}\left(\right)\right) \cdot r}} \]
                                    2. associate-/r*N/A

                                      \[\leadsto \color{blue}{\frac{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                                    3. metadata-evalN/A

                                      \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4} \cdot 1}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                                    4. associate-*r/N/A

                                      \[\leadsto \frac{\color{blue}{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                                    5. lower-/.f32N/A

                                      \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}{r}} \]
                                    6. associate-*r/N/A

                                      \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4} \cdot 1}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                                    7. metadata-evalN/A

                                      \[\leadsto \frac{\frac{\color{blue}{\frac{1}{4}}}{s \cdot \mathsf{PI}\left(\right)}}{r} \]
                                    8. lower-/.f32N/A

                                      \[\leadsto \frac{\color{blue}{\frac{\frac{1}{4}}{s \cdot \mathsf{PI}\left(\right)}}}{r} \]
                                    9. *-commutativeN/A

                                      \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                                    10. lower-*.f32N/A

                                      \[\leadsto \frac{\frac{\frac{1}{4}}{\color{blue}{\mathsf{PI}\left(\right) \cdot s}}}{r} \]
                                    11. lower-PI.f328.6

                                      \[\leadsto \frac{\frac{0.25}{\color{blue}{\mathsf{PI}\left(\right)} \cdot s}}{r} \]
                                  5. Applied rewrites8.6%

                                    \[\leadsto \color{blue}{\frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot s}}{r}} \]
                                  6. Step-by-step derivation
                                    1. Applied rewrites8.6%

                                      \[\leadsto \frac{0.25}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot r}} \]
                                    2. Step-by-step derivation
                                      1. Applied rewrites8.6%

                                        \[\leadsto \frac{0.25}{\left(s \cdot r\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}} \]
                                      2. Add Preprocessing

                                      Reproduce

                                      ?
                                      herbie shell --seed 2025016 
                                      (FPCore (s r)
                                        :name "Disney BSSRDF, PDF of scattering profile"
                                        :precision binary32
                                        :pre (and (and (<= 0.0 s) (<= s 256.0)) (and (< 1e-6 r) (< r 1000000.0)))
                                        (+ (/ (* 0.25 (exp (/ (- r) s))) (* (* (* 2.0 (PI)) s) r)) (/ (* 0.75 (exp (/ (- r) (* 3.0 s)))) (* (* (* 6.0 (PI)) s) r))))