Disney BSSRDF, PDF of scattering profile

Percentage Accurate: 99.6% → 99.6%
Time: 17.1s
Alternatives: 14
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 14 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} \\ \frac{e^{\frac{-r}{3 \cdot s}} \cdot 0.75}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{e^{\frac{-r}{s}} \cdot 0.25}{\left(s \cdot r\right) \cdot \left(2 \cdot \mathsf{PI}\left(\right)\right)} \end{array} \]
(FPCore (s r)
 :precision binary32
 (+
  (/ (* (exp (/ (- r) (* 3.0 s))) 0.75) (* (* (* 6.0 (PI)) s) r))
  (/ (* (exp (/ (- r) s)) 0.25) (* (* s r) (* 2.0 (PI))))))
\begin{array}{l}

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

    \[\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 \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} \]
    2. 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} \]
    3. associate-*l*N/A

      \[\leadsto \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)}} + \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. lower-*.f32N/A

      \[\leadsto \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)}} + \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}}}{\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} \cdot \left(s \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} \]
    6. *-commutativeN/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} \cdot \left(s \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} \]
    7. lower-*.f32N/A

      \[\leadsto \frac{\frac{1}{4} \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} \cdot \left(s \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. lower-*.f3299.7

      \[\leadsto \frac{0.25 \cdot e^{\frac{-r}{s}}}{\left(\mathsf{PI}\left(\right) \cdot 2\right) \cdot \color{blue}{\left(s \cdot r\right)}} + \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.7%

    \[\leadsto \frac{0.25 \cdot e^{\frac{-r}{s}}}{\color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right) \cdot \left(s \cdot r\right)}} + \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. Final simplification99.7%

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

Alternative 2: 45.2% accurate, 0.7× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{e^{\frac{-r}{s}} \cdot 0.25}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{e^{\frac{-r}{3 \cdot s}} \cdot 0.75}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \leq 0:\\ \;\;\;\;\mathsf{fma}\left(0.25, \frac{\frac{\frac{1}{\mathsf{PI}\left(\right)}}{r}}{s}, \frac{\frac{\frac{\frac{\frac{\mathsf{fma}\left(r \cdot r, -0.021604938271604937, \mathsf{fma}\left(0.06944444444444445, r, -0.16666666666666666 \cdot s\right) \cdot s\right)}{s}}{s}}{\mathsf{PI}\left(\right)}}{s}}{s}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\frac{-0.16666666666666666}{\mathsf{PI}\left(\right)} - \frac{\frac{-0.06944444444444445}{\mathsf{PI}\left(\right)} \cdot r}{s}}{s} - \frac{-0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}\\ \end{array} \end{array} \]
(FPCore (s r)
 :precision binary32
 (if (<=
      (+
       (/ (* (exp (/ (- r) s)) 0.25) (* (* (* 2.0 (PI)) s) r))
       (/ (* (exp (/ (- r) (* 3.0 s))) 0.75) (* (* (* 6.0 (PI)) s) r)))
      0.0)
   (fma
    0.25
    (/ (/ (/ 1.0 (PI)) r) s)
    (/
     (/
      (/
       (/
        (/
         (fma
          (* r r)
          -0.021604938271604937
          (* (fma 0.06944444444444445 r (* -0.16666666666666666 s)) s))
         s)
        s)
       (PI))
      s)
     s))
   (/
    (-
     (/
      (-
       (/ -0.16666666666666666 (PI))
       (/ (* (/ -0.06944444444444445 (PI)) r) s))
      s)
     (/ -0.25 (* (PI) r)))
    s)))
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;\frac{e^{\frac{-r}{s}} \cdot 0.25}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{e^{\frac{-r}{3 \cdot s}} \cdot 0.75}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \leq 0:\\
\;\;\;\;\mathsf{fma}\left(0.25, \frac{\frac{\frac{1}{\mathsf{PI}\left(\right)}}{r}}{s}, \frac{\frac{\frac{\frac{\frac{\mathsf{fma}\left(r \cdot r, -0.021604938271604937, \mathsf{fma}\left(0.06944444444444445, r, -0.16666666666666666 \cdot s\right) \cdot s\right)}{s}}{s}}{\mathsf{PI}\left(\right)}}{s}}{s}\right)\\

\mathbf{else}:\\
\;\;\;\;\frac{\frac{\frac{-0.16666666666666666}{\mathsf{PI}\left(\right)} - \frac{\frac{-0.06944444444444445}{\mathsf{PI}\left(\right)} \cdot r}{s}}{s} - \frac{-0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (+.f32 (/.f32 (*.f32 #s(literal 1/4 binary32) (exp.f32 (/.f32 (neg.f32 r) s))) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (PI.f32)) s) r)) (/.f32 (*.f32 #s(literal 3/4 binary32) (exp.f32 (/.f32 (neg.f32 r) (*.f32 #s(literal 3 binary32) s)))) (*.f32 (*.f32 (*.f32 #s(literal 6 binary32) (PI.f32)) s) r))) < 0.0

    1. Initial program 100.0%

      \[\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 rewrites3.4%

      \[\leadsto \color{blue}{\frac{\frac{\frac{-0.16666666666666666}{\mathsf{PI}\left(\right)} - \frac{r \cdot \left(\frac{-0.06944444444444445}{\mathsf{PI}\left(\right)} - \frac{r}{\mathsf{PI}\left(\right)} \cdot \frac{-0.021604938271604937}{s}\right)}{s}}{s} - \frac{-0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}} \]
    5. Step-by-step derivation
      1. Applied rewrites6.0%

        \[\leadsto \mathsf{fma}\left(\frac{1}{s}, \color{blue}{\frac{\frac{-0.16666666666666666}{\mathsf{PI}\left(\right)} - \frac{-0.06944444444444445 - \frac{-0.021604938271604937}{s} \cdot r}{\mathsf{PI}\left(\right)} \cdot \frac{r}{s}}{s}}, -\frac{\frac{-0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}\right) \]
      2. Applied rewrites13.9%

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

        \[\leadsto \mathsf{fma}\left(\frac{1}{4}, \frac{\frac{\frac{1}{\mathsf{PI}\left(\right)}}{r}}{s}, \frac{\frac{\frac{\frac{s \cdot \left(\frac{-1}{6} \cdot s - \frac{-5}{72} \cdot r\right) - \frac{7}{324} \cdot {r}^{2}}{{s}^{2}}}{\mathsf{PI}\left(\right)}}{s}}{s}\right) \]
      4. Step-by-step derivation
        1. Applied rewrites53.2%

          \[\leadsto \mathsf{fma}\left(0.25, \frac{\frac{\frac{1}{\mathsf{PI}\left(\right)}}{r}}{s}, \frac{\frac{\frac{\frac{\frac{\mathsf{fma}\left(r \cdot r, -0.021604938271604937, \mathsf{fma}\left(0.06944444444444445, r, -0.16666666666666666 \cdot s\right) \cdot s\right)}{s}}{s}}{\mathsf{PI}\left(\right)}}{s}}{s}\right) \]

        if 0.0 < (+.f32 (/.f32 (*.f32 #s(literal 1/4 binary32) (exp.f32 (/.f32 (neg.f32 r) s))) (*.f32 (*.f32 (*.f32 #s(literal 2 binary32) (PI.f32)) s) r)) (/.f32 (*.f32 #s(literal 3/4 binary32) (exp.f32 (/.f32 (neg.f32 r) (*.f32 #s(literal 3 binary32) s)))) (*.f32 (*.f32 (*.f32 #s(literal 6 binary32) (PI.f32)) s) r)))

        1. Initial program 96.9%

          \[\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 rewrites57.2%

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

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

            \[\leadsto \frac{\frac{\frac{-0.16666666666666666}{\mathsf{PI}\left(\right)} - \frac{r \cdot \frac{-0.06944444444444445}{\mathsf{PI}\left(\right)}}{s}}{s} - \frac{-0.25}{\mathsf{PI}\left(\right) \cdot r}}{s} \]
        7. Recombined 2 regimes into one program.
        8. Final simplification51.4%

          \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{e^{\frac{-r}{s}} \cdot 0.25}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} + \frac{e^{\frac{-r}{3 \cdot s}} \cdot 0.75}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \leq 0:\\ \;\;\;\;\mathsf{fma}\left(0.25, \frac{\frac{\frac{1}{\mathsf{PI}\left(\right)}}{r}}{s}, \frac{\frac{\frac{\frac{\frac{\mathsf{fma}\left(r \cdot r, -0.021604938271604937, \mathsf{fma}\left(0.06944444444444445, r, -0.16666666666666666 \cdot s\right) \cdot s\right)}{s}}{s}}{\mathsf{PI}\left(\right)}}{s}}{s}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\frac{\frac{-0.16666666666666666}{\mathsf{PI}\left(\right)} - \frac{\frac{-0.06944444444444445}{\mathsf{PI}\left(\right)} \cdot r}{s}}{s} - \frac{-0.25}{\mathsf{PI}\left(\right) \cdot r}}{s}\\ \end{array} \]
        9. Add Preprocessing

        Alternative 3: 99.6% accurate, 1.0× speedup?

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

          \[\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 \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}}}{\color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} \]
          2. *-commutativeN/A

            \[\leadsto \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}}}{\color{blue}{r \cdot \left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)}} \]
          3. lift-*.f32N/A

            \[\leadsto \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}}}{r \cdot \color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)}} \]
          4. lift-*.f32N/A

            \[\leadsto \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}}}{r \cdot \left(\color{blue}{\left(6 \cdot \mathsf{PI}\left(\right)\right)} \cdot s\right)} \]
          5. associate-*l*N/A

            \[\leadsto \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}}}{r \cdot \color{blue}{\left(6 \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)\right)}} \]
          6. associate-*r*N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          7. lower-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          8. lower-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right)} \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          9. lower-*.f3299.6

            \[\leadsto \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(r \cdot 6\right) \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
        4. Applied rewrites99.6%

          \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
        5. Step-by-step derivation
          1. lift-/.f32N/A

            \[\leadsto \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^{\color{blue}{\frac{-r}{3 \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          2. frac-2negN/A

            \[\leadsto \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^{\color{blue}{\frac{\mathsf{neg}\left(\left(-r\right)\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          3. lift-neg.f32N/A

            \[\leadsto \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{\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(r\right)\right)}\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          4. remove-double-negN/A

            \[\leadsto \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{\color{blue}{r}}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          5. lower-/.f32N/A

            \[\leadsto \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^{\color{blue}{\frac{r}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          6. lift-*.f32N/A

            \[\leadsto \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}{\mathsf{neg}\left(\color{blue}{3 \cdot s}\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          7. distribute-lft-neg-inN/A

            \[\leadsto \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}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          8. lower-*.f32N/A

            \[\leadsto \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}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          9. metadata-eval99.6

            \[\leadsto \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}{\color{blue}{-3} \cdot s}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
        6. Applied rewrites99.6%

          \[\leadsto \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^{\color{blue}{\frac{r}{-3 \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
        7. Step-by-step derivation
          1. lift-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          2. lift-*.f32N/A

            \[\leadsto \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(r \cdot 6\right) \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          3. associate-*r*N/A

            \[\leadsto \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}}}{\color{blue}{\left(\left(r \cdot 6\right) \cdot \mathsf{PI}\left(\right)\right) \cdot s}} \]
          4. lift-*.f32N/A

            \[\leadsto \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(\color{blue}{\left(r \cdot 6\right)} \cdot \mathsf{PI}\left(\right)\right) \cdot s} \]
          5. associate-*l*N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot \left(6 \cdot \mathsf{PI}\left(\right)\right)\right)} \cdot s} \]
          6. lift-*.f32N/A

            \[\leadsto \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(r \cdot \color{blue}{\left(6 \cdot \mathsf{PI}\left(\right)\right)}\right) \cdot s} \]
          7. associate-*r*N/A

            \[\leadsto \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}}}{\color{blue}{r \cdot \left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)}} \]
          8. *-commutativeN/A

            \[\leadsto \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}}}{r \cdot \color{blue}{\left(s \cdot \left(6 \cdot \mathsf{PI}\left(\right)\right)\right)}} \]
          9. associate-*r*N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot s\right) \cdot \left(6 \cdot \mathsf{PI}\left(\right)\right)}} \]
          10. *-commutativeN/A

            \[\leadsto \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}}}{\color{blue}{\left(s \cdot r\right)} \cdot \left(6 \cdot \mathsf{PI}\left(\right)\right)} \]
          11. lower-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(s \cdot r\right) \cdot \left(6 \cdot \mathsf{PI}\left(\right)\right)}} \]
          12. lower-*.f3299.6

            \[\leadsto \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}}}{\color{blue}{\left(s \cdot r\right)} \cdot \left(6 \cdot \mathsf{PI}\left(\right)\right)} \]
        8. Applied rewrites99.6%

          \[\leadsto \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}}}{\color{blue}{\left(s \cdot r\right) \cdot \left(6 \cdot \mathsf{PI}\left(\right)\right)}} \]
        9. Final simplification99.6%

          \[\leadsto \frac{e^{\frac{r}{-3 \cdot s}} \cdot 0.75}{\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot \left(s \cdot r\right)} + \frac{e^{\frac{-r}{s}} \cdot 0.25}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
        10. Add Preprocessing

        Alternative 4: 99.5% accurate, 1.0× speedup?

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

          \[\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 \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}}}{\color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} \]
          2. *-commutativeN/A

            \[\leadsto \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}}}{\color{blue}{r \cdot \left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)}} \]
          3. lift-*.f32N/A

            \[\leadsto \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}}}{r \cdot \color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)}} \]
          4. lift-*.f32N/A

            \[\leadsto \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}}}{r \cdot \left(\color{blue}{\left(6 \cdot \mathsf{PI}\left(\right)\right)} \cdot s\right)} \]
          5. associate-*l*N/A

            \[\leadsto \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}}}{r \cdot \color{blue}{\left(6 \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)\right)}} \]
          6. associate-*r*N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          7. lower-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          8. lower-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right)} \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          9. lower-*.f3299.6

            \[\leadsto \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(r \cdot 6\right) \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
        4. Applied rewrites99.6%

          \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
        5. Step-by-step derivation
          1. lift-/.f32N/A

            \[\leadsto \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^{\color{blue}{\frac{-r}{3 \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          2. frac-2negN/A

            \[\leadsto \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^{\color{blue}{\frac{\mathsf{neg}\left(\left(-r\right)\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          3. lift-neg.f32N/A

            \[\leadsto \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{\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(r\right)\right)}\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          4. remove-double-negN/A

            \[\leadsto \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{\color{blue}{r}}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          5. lower-/.f32N/A

            \[\leadsto \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^{\color{blue}{\frac{r}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          6. lift-*.f32N/A

            \[\leadsto \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}{\mathsf{neg}\left(\color{blue}{3 \cdot s}\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          7. distribute-lft-neg-inN/A

            \[\leadsto \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}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          8. lower-*.f32N/A

            \[\leadsto \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}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          9. metadata-eval99.6

            \[\leadsto \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}{\color{blue}{-3} \cdot s}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
        6. Applied rewrites99.6%

          \[\leadsto \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^{\color{blue}{\frac{r}{-3 \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
        7. Final simplification99.6%

          \[\leadsto \frac{e^{\frac{r}{-3 \cdot s}} \cdot 0.75}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot \left(6 \cdot r\right)} + \frac{e^{\frac{-r}{s}} \cdot 0.25}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \]
        8. Add Preprocessing

        Alternative 5: 97.6% accurate, 1.0× speedup?

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

          \[\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 \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}}}{\color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r}} \]
          2. *-commutativeN/A

            \[\leadsto \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}}}{\color{blue}{r \cdot \left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)}} \]
          3. lift-*.f32N/A

            \[\leadsto \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}}}{r \cdot \color{blue}{\left(\left(6 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right)}} \]
          4. lift-*.f32N/A

            \[\leadsto \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}}}{r \cdot \left(\color{blue}{\left(6 \cdot \mathsf{PI}\left(\right)\right)} \cdot s\right)} \]
          5. associate-*l*N/A

            \[\leadsto \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}}}{r \cdot \color{blue}{\left(6 \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)\right)}} \]
          6. associate-*r*N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          7. lower-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
          8. lower-*.f32N/A

            \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right)} \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          9. lower-*.f3299.6

            \[\leadsto \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(r \cdot 6\right) \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
        4. Applied rewrites99.6%

          \[\leadsto \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}}}{\color{blue}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)}} \]
        5. Step-by-step derivation
          1. lift-/.f32N/A

            \[\leadsto \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^{\color{blue}{\frac{-r}{3 \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          2. frac-2negN/A

            \[\leadsto \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^{\color{blue}{\frac{\mathsf{neg}\left(\left(-r\right)\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          3. lift-neg.f32N/A

            \[\leadsto \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{\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(r\right)\right)}\right)}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          4. remove-double-negN/A

            \[\leadsto \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{\color{blue}{r}}{\mathsf{neg}\left(3 \cdot s\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          5. lower-/.f32N/A

            \[\leadsto \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^{\color{blue}{\frac{r}{\mathsf{neg}\left(3 \cdot s\right)}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          6. lift-*.f32N/A

            \[\leadsto \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}{\mathsf{neg}\left(\color{blue}{3 \cdot s}\right)}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          7. distribute-lft-neg-inN/A

            \[\leadsto \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}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          8. lower-*.f32N/A

            \[\leadsto \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}{\color{blue}{\left(\mathsf{neg}\left(3\right)\right) \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          9. metadata-eval99.6

            \[\leadsto \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}{\color{blue}{-3} \cdot s}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
        6. Applied rewrites99.6%

          \[\leadsto \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^{\color{blue}{\frac{r}{-3 \cdot s}}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
        7. 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(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          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(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          3. *-commutativeN/A

            \[\leadsto \frac{\color{blue}{e^{\frac{-r}{s}} \cdot \frac{1}{4}}}{\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(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          4. associate-/l*N/A

            \[\leadsto \color{blue}{e^{\frac{-r}{s}} \cdot \frac{\frac{1}{4}}{\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(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          5. lower-*.f32N/A

            \[\leadsto \color{blue}{e^{\frac{-r}{s}} \cdot \frac{\frac{1}{4}}{\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(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          6. lower-/.f3297.7

            \[\leadsto e^{\frac{-r}{s}} \cdot \color{blue}{\frac{0.25}{\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(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          7. lift-*.f32N/A

            \[\leadsto e^{\frac{-r}{s}} \cdot \frac{\frac{1}{4}}{\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(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
          8. *-commutativeN/A

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

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

          \[\leadsto \color{blue}{e^{\frac{-r}{s}} \cdot \frac{0.25}{\left(\left(\mathsf{PI}\left(\right) \cdot 2\right) \cdot s\right) \cdot r}} + \frac{0.75 \cdot e^{\frac{r}{-3 \cdot s}}}{\left(r \cdot 6\right) \cdot \left(\mathsf{PI}\left(\right) \cdot s\right)} \]
        9. Final simplification97.7%

          \[\leadsto \frac{0.25}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot s\right) \cdot r} \cdot e^{\frac{-r}{s}} + \frac{e^{\frac{r}{-3 \cdot s}} \cdot 0.75}{\left(\mathsf{PI}\left(\right) \cdot s\right) \cdot \left(6 \cdot r\right)} \]
        10. Add Preprocessing

        Alternative 6: 10.0% accurate, 3.6× speedup?

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

          \[\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.9%

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

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

            \[\leadsto \frac{\frac{\frac{-0.16666666666666666}{\mathsf{PI}\left(\right)} - \frac{r \cdot \frac{-0.06944444444444445}{\mathsf{PI}\left(\right)}}{s}}{s} - \frac{-0.25}{\mathsf{PI}\left(\right) \cdot r}}{s} \]
          2. Final simplification10.2%

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

          Alternative 7: 9.0% accurate, 5.6× speedup?

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

            \[\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. associate-/l/N/A

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \color{blue}{\frac{\frac{0.25}{\mathsf{PI}\left(\right) \cdot s}}{r}} \]
          6. Taylor expanded in s around inf

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

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

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

              \[\leadsto \color{blue}{\frac{\frac{1}{4} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)} - \frac{\frac{1}{6}}{s \cdot \mathsf{PI}\left(\right)}}{s}} \]
          8. Applied rewrites9.3%

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

          Alternative 8: 9.0% accurate, 6.3× speedup?

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

            \[\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} \cdot \frac{1}{r \cdot \mathsf{PI}\left(\right)} - \frac{1}{6} \cdot \frac{1}{s \cdot \mathsf{PI}\left(\right)}}{s}} \]
          4. Step-by-step derivation
            1. lower-/.f32N/A

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

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

          Alternative 9: 9.0% accurate, 6.6× speedup?

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

            \[\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. associate-/l/N/A

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

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

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

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

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

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

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

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

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

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

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

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

            Alternative 10: 9.0% accurate, 7.6× speedup?

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

              \[\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. associate-/l/N/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                  Alternative 11: 9.0% accurate, 10.6× speedup?

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

                    \[\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. associate-/l/N/A

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

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

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

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

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

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

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

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

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

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

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

                  Alternative 12: 9.0% 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.6%

                    \[\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. associate-/l/N/A

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

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

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

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

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

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

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

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

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

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

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

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

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

                      Alternative 13: 9.0% accurate, 13.5× speedup?

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

                        \[\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. associate-/l/N/A

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

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

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

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

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

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

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

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

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

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

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

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

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

                          Alternative 14: 9.0% 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.6%

                            \[\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. associate-/l/N/A

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

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

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

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

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

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

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

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

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

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

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

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

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

                              Reproduce

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