Beckmann Sample, near normal, slope_x

Percentage Accurate: 58.0% → 98.6%
Time: 9.2s
Alternatives: 12
Speedup: 11.0×

Specification

?
\[\left(\left(cosTheta\_i > 0.9999 \land cosTheta\_i \leq 1\right) \land \left(2.328306437 \cdot 10^{-10} \leq u1 \land u1 \leq 1\right)\right) \land \left(2.328306437 \cdot 10^{-10} \leq u2 \land u2 \leq 1\right)\]
\[\begin{array}{l} \\ \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \end{array} \]
(FPCore (cosTheta_i u1 u2)
 :precision binary32
 (* (sqrt (- (log (- 1.0 u1)))) (cos (* (* 2.0 (PI)) u2))))
\begin{array}{l}

\\
\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)
\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 12 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: 58.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \end{array} \]
(FPCore (cosTheta_i u1 u2)
 :precision binary32
 (* (sqrt (- (log (- 1.0 u1)))) (cos (* (* 2.0 (PI)) u2))))
\begin{array}{l}

\\
\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)
\end{array}

Alternative 1: 98.6% accurate, 0.4× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt[3]{\mathsf{PI}\left(\right)}\\ \mathbf{if}\;u1 \leq 0.03500000014901161:\\ \;\;\;\;\sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)\\ \mathbf{else}:\\ \;\;\;\;\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({t\_0}^{2} \cdot \left(\left(t\_0 \cdot u2\right) \cdot 2\right)\right)\\ \end{array} \end{array} \]
(FPCore (cosTheta_i u1 u2)
 :precision binary32
 (let* ((t_0 (cbrt (PI))))
   (if (<= u1 0.03500000014901161)
     (*
      (sqrt
       (-
        (*
         (- (* (- (* (- (* -0.25 u1) 0.3333333333333333) u1) 0.5) u1) 1.0)
         u1)))
      (cos (* (* 2.0 (PI)) u2)))
     (*
      (sqrt (- (log (- 1.0 u1))))
      (cos (* (pow t_0 2.0) (* (* t_0 u2) 2.0)))))))
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \sqrt[3]{\mathsf{PI}\left(\right)}\\
\mathbf{if}\;u1 \leq 0.03500000014901161:\\
\;\;\;\;\sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)\\

\mathbf{else}:\\
\;\;\;\;\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({t\_0}^{2} \cdot \left(\left(t\_0 \cdot u2\right) \cdot 2\right)\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if u1 < 0.0350000001

    1. Initial program 53.1%

      \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. Add Preprocessing
    3. Taylor expanded in u1 around 0

      \[\leadsto \sqrt{-\color{blue}{u1 \cdot \left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    4. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      2. lower-*.f32N/A

        \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      3. lower--.f32N/A

        \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      4. *-commutativeN/A

        \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      5. lower-*.f32N/A

        \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      6. lower--.f32N/A

        \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right)} \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      7. *-commutativeN/A

        \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      8. lower-*.f32N/A

        \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      9. metadata-evalN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right)} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      10. distribute-lft-neg-inN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right)} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      11. lower--.f32N/A

        \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right) - \frac{1}{3}\right)} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      12. distribute-lft-neg-inN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot u1} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      13. metadata-evalN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\frac{-1}{4}} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      14. lower-*.f3299.0

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{-0.25 \cdot u1} - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    5. Applied rewrites99.0%

      \[\leadsto \sqrt{-\color{blue}{\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]

    if 0.0350000001 < u1

    1. Initial program 98.0%

      \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-*.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)} \]
      2. lift-*.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} \cdot u2\right) \]
      3. associate-*l*N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \color{blue}{\left(2 \cdot \left(\mathsf{PI}\left(\right) \cdot u2\right)\right)} \]
      4. *-commutativeN/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \color{blue}{\left(\left(\mathsf{PI}\left(\right) \cdot u2\right) \cdot 2\right)} \]
      5. lift-PI.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(\color{blue}{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right) \]
      6. add-cube-cbrtN/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(\color{blue}{\left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right) \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right)} \cdot u2\right) \cdot 2\right) \]
      7. associate-*l*N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\color{blue}{\left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right) \cdot \left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right)\right)} \cdot 2\right) \]
      8. associate-*l*N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \color{blue}{\left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right) \cdot \left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)\right)} \]
      9. lower-*.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \color{blue}{\left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right) \cdot \left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)\right)} \]
      10. pow2N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2}} \cdot \left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)\right) \]
      11. lower-pow.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2}} \cdot \left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)\right) \]
      12. lift-PI.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({\left(\sqrt[3]{\color{blue}{\mathsf{PI}\left(\right)}}\right)}^{2} \cdot \left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)\right) \]
      13. lower-cbrt.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({\color{blue}{\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}}^{2} \cdot \left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)\right) \]
      14. lower-*.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2} \cdot \color{blue}{\left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)}\right) \]
      15. lower-*.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2} \cdot \left(\color{blue}{\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right)} \cdot 2\right)\right) \]
      16. lift-PI.f32N/A

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2} \cdot \left(\left(\sqrt[3]{\color{blue}{\mathsf{PI}\left(\right)}} \cdot u2\right) \cdot 2\right)\right) \]
      17. lower-cbrt.f3298.1

        \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \left({\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2} \cdot \left(\left(\color{blue}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot u2\right) \cdot 2\right)\right) \]
    4. Applied rewrites98.1%

      \[\leadsto \sqrt{-\log \left(1 - u1\right)} \cdot \cos \color{blue}{\left({\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2} \cdot \left(\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot u2\right) \cdot 2\right)\right)} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 2: 98.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)\\ \mathbf{if}\;u1 \leq 0.04500000178813934:\\ \;\;\;\;\sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot t\_0\\ \mathbf{else}:\\ \;\;\;\;\sqrt{-\log \left(1 - u1\right)} \cdot t\_0\\ \end{array} \end{array} \]
(FPCore (cosTheta_i u1 u2)
 :precision binary32
 (let* ((t_0 (cos (* (* 2.0 (PI)) u2))))
   (if (<= u1 0.04500000178813934)
     (*
      (sqrt
       (-
        (*
         (- (* (- (* (- (* -0.25 u1) 0.3333333333333333) u1) 0.5) u1) 1.0)
         u1)))
      t_0)
     (* (sqrt (- (log (- 1.0 u1)))) t_0))))
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)\\
\mathbf{if}\;u1 \leq 0.04500000178813934:\\
\;\;\;\;\sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot t\_0\\

\mathbf{else}:\\
\;\;\;\;\sqrt{-\log \left(1 - u1\right)} \cdot t\_0\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if u1 < 0.0450000018

    1. Initial program 53.5%

      \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. Add Preprocessing
    3. Taylor expanded in u1 around 0

      \[\leadsto \sqrt{-\color{blue}{u1 \cdot \left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    4. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      2. lower-*.f32N/A

        \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      3. lower--.f32N/A

        \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      4. *-commutativeN/A

        \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      5. lower-*.f32N/A

        \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      6. lower--.f32N/A

        \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right)} \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      7. *-commutativeN/A

        \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      8. lower-*.f32N/A

        \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      9. metadata-evalN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right)} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      10. distribute-lft-neg-inN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right)} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      11. lower--.f32N/A

        \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right) - \frac{1}{3}\right)} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      12. distribute-lft-neg-inN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot u1} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      13. metadata-evalN/A

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\frac{-1}{4}} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      14. lower-*.f3299.0

        \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{-0.25 \cdot u1} - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    5. Applied rewrites99.0%

      \[\leadsto \sqrt{-\color{blue}{\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]

    if 0.0450000018 < u1

    1. Initial program 98.3%

      \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. Add Preprocessing
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 3: 93.5% accurate, 1.5× speedup?

\[\begin{array}{l} \\ \sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \end{array} \]
(FPCore (cosTheta_i u1 u2)
 :precision binary32
 (*
  (sqrt
   (-
    (* (- (* (- (* (- (* -0.25 u1) 0.3333333333333333) u1) 0.5) u1) 1.0) u1)))
  (cos (* (* 2.0 (PI)) u2))))
\begin{array}{l}

\\
\sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)
\end{array}
Derivation
  1. Initial program 59.2%

    \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  2. Add Preprocessing
  3. Taylor expanded in u1 around 0

    \[\leadsto \sqrt{-\color{blue}{u1 \cdot \left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  4. Step-by-step derivation
    1. *-commutativeN/A

      \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. lower-*.f32N/A

      \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    3. lower--.f32N/A

      \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    4. *-commutativeN/A

      \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    5. lower-*.f32N/A

      \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    6. lower--.f32N/A

      \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right)} \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    7. *-commutativeN/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    8. lower-*.f32N/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    9. metadata-evalN/A

      \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right)} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    10. distribute-lft-neg-inN/A

      \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right)} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    11. lower--.f32N/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right) - \frac{1}{3}\right)} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    12. distribute-lft-neg-inN/A

      \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot u1} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    13. metadata-evalN/A

      \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\frac{-1}{4}} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    14. lower-*.f3294.0

      \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{-0.25 \cdot u1} - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  5. Applied rewrites94.0%

    \[\leadsto \sqrt{-\color{blue}{\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  6. Add Preprocessing

Alternative 4: 91.7% accurate, 1.6× speedup?

\[\begin{array}{l} \\ \sqrt{-\left(\left(-0.3333333333333333 \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \end{array} \]
(FPCore (cosTheta_i u1 u2)
 :precision binary32
 (*
  (sqrt (- (* (- (* (- (* -0.3333333333333333 u1) 0.5) u1) 1.0) u1)))
  (cos (* (* 2.0 (PI)) u2))))
\begin{array}{l}

\\
\sqrt{-\left(\left(-0.3333333333333333 \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)
\end{array}
Derivation
  1. Initial program 59.2%

    \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  2. Add Preprocessing
  3. Taylor expanded in u1 around 0

    \[\leadsto \sqrt{-\color{blue}{u1 \cdot \left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  4. Step-by-step derivation
    1. *-commutativeN/A

      \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. lower-*.f32N/A

      \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    3. lower--.f32N/A

      \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    4. *-commutativeN/A

      \[\leadsto \sqrt{-\left(\color{blue}{\left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    5. lower-*.f32N/A

      \[\leadsto \sqrt{-\left(\color{blue}{\left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    6. metadata-evalN/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{3}\right)\right)} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    7. distribute-lft-neg-inN/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{3} \cdot u1\right)\right)} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{-\left(\left(\left(\mathsf{neg}\left(\color{blue}{u1 \cdot \frac{1}{3}}\right)\right) - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    9. distribute-lft-neg-inN/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(u1\right)\right) \cdot \frac{1}{3}} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    10. lower--.f32N/A

      \[\leadsto \sqrt{-\left(\color{blue}{\left(\left(\mathsf{neg}\left(u1\right)\right) \cdot \frac{1}{3} - \frac{1}{2}\right)} \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    11. distribute-lft-neg-inN/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(u1 \cdot \frac{1}{3}\right)\right)} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    12. *-commutativeN/A

      \[\leadsto \sqrt{-\left(\left(\left(\mathsf{neg}\left(\color{blue}{\frac{1}{3} \cdot u1}\right)\right) - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    13. distribute-lft-neg-inN/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{3}\right)\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    14. metadata-evalN/A

      \[\leadsto \sqrt{-\left(\left(\color{blue}{\frac{-1}{3}} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    15. lower-*.f3292.4

      \[\leadsto \sqrt{-\left(\left(\color{blue}{-0.3333333333333333 \cdot u1} - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  5. Applied rewrites92.4%

    \[\leadsto \sqrt{-\color{blue}{\left(\left(-0.3333333333333333 \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  6. Add Preprocessing

Alternative 5: 88.0% accurate, 1.7× speedup?

\[\begin{array}{l} \\ \sqrt{\left(0.5 \cdot u1\right) \cdot u1 + u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \end{array} \]
(FPCore (cosTheta_i u1 u2)
 :precision binary32
 (* (sqrt (+ (* (* 0.5 u1) u1) u1)) (cos (* (* 2.0 (PI)) u2))))
\begin{array}{l}

\\
\sqrt{\left(0.5 \cdot u1\right) \cdot u1 + u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)
\end{array}
Derivation
  1. Initial program 59.2%

    \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  2. Add Preprocessing
  3. Taylor expanded in u1 around 0

    \[\leadsto \sqrt{\color{blue}{u1 \cdot \left(1 + \frac{1}{2} \cdot u1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  4. Step-by-step derivation
    1. *-commutativeN/A

      \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. lower-*.f32N/A

      \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    3. +-commutativeN/A

      \[\leadsto \sqrt{\color{blue}{\left(\frac{1}{2} \cdot u1 + 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    4. lower-fma.f3258.0

      \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  5. Applied rewrites58.3%

    \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
  6. Step-by-step derivation
    1. Applied rewrites88.7%

      \[\leadsto \sqrt{\left(0.5 \cdot u1\right) \cdot u1 + \color{blue}{u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
    2. Add Preprocessing

    Alternative 6: 86.8% accurate, 1.7× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;u2 \leq 0.0008200000156648457:\\ \;\;\;\;\sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot 1\\ \mathbf{else}:\\ \;\;\;\;\sqrt{u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)\\ \end{array} \end{array} \]
    (FPCore (cosTheta_i u1 u2)
     :precision binary32
     (if (<= u2 0.0008200000156648457)
       (*
        (sqrt
         (-
          (*
           (- (* (- (* (- (* -0.25 u1) 0.3333333333333333) u1) 0.5) u1) 1.0)
           u1)))
        1.0)
       (* (sqrt u1) (cos (* (* 2.0 (PI)) u2)))))
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    \mathbf{if}\;u2 \leq 0.0008200000156648457:\\
    \;\;\;\;\sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot 1\\
    
    \mathbf{else}:\\
    \;\;\;\;\sqrt{u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right)\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if u2 < 8.20000016e-4

      1. Initial program 59.7%

        \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      2. Add Preprocessing
      3. Taylor expanded in u1 around 0

        \[\leadsto \sqrt{-\color{blue}{u1 \cdot \left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      4. Step-by-step derivation
        1. *-commutativeN/A

          \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        2. lower-*.f32N/A

          \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        3. lower--.f32N/A

          \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        4. *-commutativeN/A

          \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        5. lower-*.f32N/A

          \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        6. lower--.f32N/A

          \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right)} \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        7. *-commutativeN/A

          \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        8. lower-*.f32N/A

          \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        9. metadata-evalN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right)} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        10. distribute-lft-neg-inN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right)} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        11. lower--.f32N/A

          \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right) - \frac{1}{3}\right)} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        12. distribute-lft-neg-inN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot u1} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        13. metadata-evalN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\frac{-1}{4}} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        14. lower-*.f3294.5

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{-0.25 \cdot u1} - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      5. Applied rewrites94.5%

        \[\leadsto \sqrt{-\color{blue}{\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      6. Taylor expanded in u2 around 0

        \[\leadsto \sqrt{-\left(\left(\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \color{blue}{1} \]
      7. Step-by-step derivation
        1. Applied rewrites93.3%

          \[\leadsto \sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \color{blue}{1} \]

        if 8.20000016e-4 < u2

        1. Initial program 58.3%

          \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-log.f32N/A

            \[\leadsto \sqrt{-\color{blue}{\log \left(1 - u1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          2. lift--.f32N/A

            \[\leadsto \sqrt{-\log \color{blue}{\left(1 - u1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          3. flip--N/A

            \[\leadsto \sqrt{-\log \color{blue}{\left(\frac{1 \cdot 1 - u1 \cdot u1}{1 + u1}\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          4. log-divN/A

            \[\leadsto \sqrt{-\color{blue}{\left(\log \left(1 \cdot 1 - u1 \cdot u1\right) - \log \left(1 + u1\right)\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          5. lower--.f32N/A

            \[\leadsto \sqrt{-\color{blue}{\left(\log \left(1 \cdot 1 - u1 \cdot u1\right) - \log \left(1 + u1\right)\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          6. metadata-evalN/A

            \[\leadsto \sqrt{-\left(\log \left(\color{blue}{1} - u1 \cdot u1\right) - \log \left(1 + u1\right)\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          7. fp-cancel-sub-sign-invN/A

            \[\leadsto \sqrt{-\left(\log \color{blue}{\left(1 + \left(\mathsf{neg}\left(u1\right)\right) \cdot u1\right)} - \log \left(1 + u1\right)\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          8. lower-log1p.f32N/A

            \[\leadsto \sqrt{-\left(\color{blue}{\mathsf{log1p}\left(\left(\mathsf{neg}\left(u1\right)\right) \cdot u1\right)} - \log \left(1 + u1\right)\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          9. lower-*.f32N/A

            \[\leadsto \sqrt{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u1\right)\right) \cdot u1}\right) - \log \left(1 + u1\right)\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          10. lower-neg.f32N/A

            \[\leadsto \sqrt{-\left(\mathsf{log1p}\left(\color{blue}{\left(-u1\right)} \cdot u1\right) - \log \left(1 + u1\right)\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          11. lower-log1p.f3210.1

            \[\leadsto \sqrt{-\left(\mathsf{log1p}\left(\left(-u1\right) \cdot u1\right) - \color{blue}{\mathsf{log1p}\left(u1\right)}\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        4. Applied rewrites10.2%

          \[\leadsto \sqrt{-\color{blue}{\left(\mathsf{log1p}\left(\left(-u1\right) \cdot u1\right) - \mathsf{log1p}\left(u1\right)\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        5. Taylor expanded in u1 around 0

          \[\leadsto \color{blue}{\sqrt{u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        6. Step-by-step derivation
          1. lower-sqrt.f3274.9

            \[\leadsto \color{blue}{\sqrt{u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        7. Applied rewrites74.9%

          \[\leadsto \color{blue}{\sqrt{u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      8. Recombined 2 regimes into one program.
      9. Add Preprocessing

      Alternative 7: 75.7% accurate, 4.9× speedup?

      \[\begin{array}{l} \\ \sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot 1 \end{array} \]
      (FPCore (cosTheta_i u1 u2)
       :precision binary32
       (*
        (sqrt
         (-
          (* (- (* (- (* (- (* -0.25 u1) 0.3333333333333333) u1) 0.5) u1) 1.0) u1)))
        1.0))
      float code(float cosTheta_i, float u1, float u2) {
      	return sqrtf(-(((((((-0.25f * u1) - 0.3333333333333333f) * u1) - 0.5f) * u1) - 1.0f) * u1)) * 1.0f;
      }
      
      module fmin_fmax_functions
          implicit none
          private
          public fmax
          public fmin
      
          interface fmax
              module procedure fmax88
              module procedure fmax44
              module procedure fmax84
              module procedure fmax48
          end interface
          interface fmin
              module procedure fmin88
              module procedure fmin44
              module procedure fmin84
              module procedure fmin48
          end interface
      contains
          real(8) function fmax88(x, y) result (res)
              real(8), intent (in) :: x
              real(8), intent (in) :: y
              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
          end function
          real(4) function fmax44(x, y) result (res)
              real(4), intent (in) :: x
              real(4), intent (in) :: y
              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
          end function
          real(8) function fmax84(x, y) result(res)
              real(8), intent (in) :: x
              real(4), intent (in) :: y
              res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
          end function
          real(8) function fmax48(x, y) result(res)
              real(4), intent (in) :: x
              real(8), intent (in) :: y
              res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
          end function
          real(8) function fmin88(x, y) result (res)
              real(8), intent (in) :: x
              real(8), intent (in) :: y
              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
          end function
          real(4) function fmin44(x, y) result (res)
              real(4), intent (in) :: x
              real(4), intent (in) :: y
              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
          end function
          real(8) function fmin84(x, y) result(res)
              real(8), intent (in) :: x
              real(4), intent (in) :: y
              res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
          end function
          real(8) function fmin48(x, y) result(res)
              real(4), intent (in) :: x
              real(8), intent (in) :: y
              res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
          end function
      end module
      
      real(4) function code(costheta_i, u1, u2)
      use fmin_fmax_functions
          real(4), intent (in) :: costheta_i
          real(4), intent (in) :: u1
          real(4), intent (in) :: u2
          code = sqrt(-((((((((-0.25e0) * u1) - 0.3333333333333333e0) * u1) - 0.5e0) * u1) - 1.0e0) * u1)) * 1.0e0
      end function
      
      function code(cosTheta_i, u1, u2)
      	return Float32(sqrt(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-0.25) * u1) - Float32(0.3333333333333333)) * u1) - Float32(0.5)) * u1) - Float32(1.0)) * u1))) * Float32(1.0))
      end
      
      function tmp = code(cosTheta_i, u1, u2)
      	tmp = sqrt(-(((((((single(-0.25) * u1) - single(0.3333333333333333)) * u1) - single(0.5)) * u1) - single(1.0)) * u1)) * single(1.0);
      end
      
      \begin{array}{l}
      
      \\
      \sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot 1
      \end{array}
      
      Derivation
      1. Initial program 59.2%

        \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      2. Add Preprocessing
      3. Taylor expanded in u1 around 0

        \[\leadsto \sqrt{-\color{blue}{u1 \cdot \left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      4. Step-by-step derivation
        1. *-commutativeN/A

          \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        2. lower-*.f32N/A

          \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        3. lower--.f32N/A

          \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        4. *-commutativeN/A

          \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        5. lower-*.f32N/A

          \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        6. lower--.f32N/A

          \[\leadsto \sqrt{-\left(\color{blue}{\left(u1 \cdot \left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) - \frac{1}{2}\right)} \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        7. *-commutativeN/A

          \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        8. lower-*.f32N/A

          \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        9. metadata-evalN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right)} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        10. distribute-lft-neg-inN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right)} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        11. lower--.f32N/A

          \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\left(\mathsf{neg}\left(\frac{1}{4} \cdot u1\right)\right) - \frac{1}{3}\right)} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        12. distribute-lft-neg-inN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{4}\right)\right) \cdot u1} - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        13. metadata-evalN/A

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{\frac{-1}{4}} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        14. lower-*.f3294.0

          \[\leadsto \sqrt{-\left(\left(\left(\color{blue}{-0.25 \cdot u1} - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      5. Applied rewrites94.0%

        \[\leadsto \sqrt{-\color{blue}{\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
      6. Taylor expanded in u2 around 0

        \[\leadsto \sqrt{-\left(\left(\left(\frac{-1}{4} \cdot u1 - \frac{1}{3}\right) \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \color{blue}{1} \]
      7. Step-by-step derivation
        1. Applied rewrites76.4%

          \[\leadsto \sqrt{-\left(\left(\left(-0.25 \cdot u1 - 0.3333333333333333\right) \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \color{blue}{1} \]
        2. Add Preprocessing

        Alternative 8: 74.5% accurate, 5.9× speedup?

        \[\begin{array}{l} \\ \sqrt{-\left(\left(-0.3333333333333333 \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot 1 \end{array} \]
        (FPCore (cosTheta_i u1 u2)
         :precision binary32
         (* (sqrt (- (* (- (* (- (* -0.3333333333333333 u1) 0.5) u1) 1.0) u1))) 1.0))
        float code(float cosTheta_i, float u1, float u2) {
        	return sqrtf(-(((((-0.3333333333333333f * u1) - 0.5f) * u1) - 1.0f) * u1)) * 1.0f;
        }
        
        module fmin_fmax_functions
            implicit none
            private
            public fmax
            public fmin
        
            interface fmax
                module procedure fmax88
                module procedure fmax44
                module procedure fmax84
                module procedure fmax48
            end interface
            interface fmin
                module procedure fmin88
                module procedure fmin44
                module procedure fmin84
                module procedure fmin48
            end interface
        contains
            real(8) function fmax88(x, y) result (res)
                real(8), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
            end function
            real(4) function fmax44(x, y) result (res)
                real(4), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
            end function
            real(8) function fmax84(x, y) result(res)
                real(8), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
            end function
            real(8) function fmax48(x, y) result(res)
                real(4), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
            end function
            real(8) function fmin88(x, y) result (res)
                real(8), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
            end function
            real(4) function fmin44(x, y) result (res)
                real(4), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
            end function
            real(8) function fmin84(x, y) result(res)
                real(8), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
            end function
            real(8) function fmin48(x, y) result(res)
                real(4), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
            end function
        end module
        
        real(4) function code(costheta_i, u1, u2)
        use fmin_fmax_functions
            real(4), intent (in) :: costheta_i
            real(4), intent (in) :: u1
            real(4), intent (in) :: u2
            code = sqrt(-((((((-0.3333333333333333e0) * u1) - 0.5e0) * u1) - 1.0e0) * u1)) * 1.0e0
        end function
        
        function code(cosTheta_i, u1, u2)
        	return Float32(sqrt(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(-0.3333333333333333) * u1) - Float32(0.5)) * u1) - Float32(1.0)) * u1))) * Float32(1.0))
        end
        
        function tmp = code(cosTheta_i, u1, u2)
        	tmp = sqrt(-(((((single(-0.3333333333333333) * u1) - single(0.5)) * u1) - single(1.0)) * u1)) * single(1.0);
        end
        
        \begin{array}{l}
        
        \\
        \sqrt{-\left(\left(-0.3333333333333333 \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot 1
        \end{array}
        
        Derivation
        1. Initial program 59.2%

          \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        2. Add Preprocessing
        3. Taylor expanded in u1 around 0

          \[\leadsto \sqrt{-\color{blue}{u1 \cdot \left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        4. Step-by-step derivation
          1. *-commutativeN/A

            \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          2. lower-*.f32N/A

            \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          3. lower--.f32N/A

            \[\leadsto \sqrt{-\color{blue}{\left(u1 \cdot \left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) - 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          4. *-commutativeN/A

            \[\leadsto \sqrt{-\left(\color{blue}{\left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          5. lower-*.f32N/A

            \[\leadsto \sqrt{-\left(\color{blue}{\left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) \cdot u1} - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          6. metadata-evalN/A

            \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{3}\right)\right)} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          7. distribute-lft-neg-inN/A

            \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{3} \cdot u1\right)\right)} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          8. *-commutativeN/A

            \[\leadsto \sqrt{-\left(\left(\left(\mathsf{neg}\left(\color{blue}{u1 \cdot \frac{1}{3}}\right)\right) - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          9. distribute-lft-neg-inN/A

            \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(u1\right)\right) \cdot \frac{1}{3}} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          10. lower--.f32N/A

            \[\leadsto \sqrt{-\left(\color{blue}{\left(\left(\mathsf{neg}\left(u1\right)\right) \cdot \frac{1}{3} - \frac{1}{2}\right)} \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          11. distribute-lft-neg-inN/A

            \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(u1 \cdot \frac{1}{3}\right)\right)} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          12. *-commutativeN/A

            \[\leadsto \sqrt{-\left(\left(\left(\mathsf{neg}\left(\color{blue}{\frac{1}{3} \cdot u1}\right)\right) - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          13. distribute-lft-neg-inN/A

            \[\leadsto \sqrt{-\left(\left(\color{blue}{\left(\mathsf{neg}\left(\frac{1}{3}\right)\right) \cdot u1} - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          14. metadata-evalN/A

            \[\leadsto \sqrt{-\left(\left(\color{blue}{\frac{-1}{3}} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          15. lower-*.f3292.4

            \[\leadsto \sqrt{-\left(\left(\color{blue}{-0.3333333333333333 \cdot u1} - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        5. Applied rewrites92.4%

          \[\leadsto \sqrt{-\color{blue}{\left(\left(-0.3333333333333333 \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
        6. Taylor expanded in u2 around 0

          \[\leadsto \sqrt{-\left(\left(\frac{-1}{3} \cdot u1 - \frac{1}{2}\right) \cdot u1 - 1\right) \cdot u1} \cdot \color{blue}{1} \]
        7. Step-by-step derivation
          1. Applied rewrites75.3%

            \[\leadsto \sqrt{-\left(\left(-0.3333333333333333 \cdot u1 - 0.5\right) \cdot u1 - 1\right) \cdot u1} \cdot \color{blue}{1} \]
          2. Add Preprocessing

          Alternative 9: 72.0% accurate, 8.0× speedup?

          \[\begin{array}{l} \\ \sqrt{\left(0.5 \cdot u1\right) \cdot u1 + u1} \cdot 1 \end{array} \]
          (FPCore (cosTheta_i u1 u2)
           :precision binary32
           (* (sqrt (+ (* (* 0.5 u1) u1) u1)) 1.0))
          float code(float cosTheta_i, float u1, float u2) {
          	return sqrtf((((0.5f * u1) * u1) + u1)) * 1.0f;
          }
          
          module fmin_fmax_functions
              implicit none
              private
              public fmax
              public fmin
          
              interface fmax
                  module procedure fmax88
                  module procedure fmax44
                  module procedure fmax84
                  module procedure fmax48
              end interface
              interface fmin
                  module procedure fmin88
                  module procedure fmin44
                  module procedure fmin84
                  module procedure fmin48
              end interface
          contains
              real(8) function fmax88(x, y) result (res)
                  real(8), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
              end function
              real(4) function fmax44(x, y) result (res)
                  real(4), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
              end function
              real(8) function fmax84(x, y) result(res)
                  real(8), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
              end function
              real(8) function fmax48(x, y) result(res)
                  real(4), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
              end function
              real(8) function fmin88(x, y) result (res)
                  real(8), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
              end function
              real(4) function fmin44(x, y) result (res)
                  real(4), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
              end function
              real(8) function fmin84(x, y) result(res)
                  real(8), intent (in) :: x
                  real(4), intent (in) :: y
                  res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
              end function
              real(8) function fmin48(x, y) result(res)
                  real(4), intent (in) :: x
                  real(8), intent (in) :: y
                  res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
              end function
          end module
          
          real(4) function code(costheta_i, u1, u2)
          use fmin_fmax_functions
              real(4), intent (in) :: costheta_i
              real(4), intent (in) :: u1
              real(4), intent (in) :: u2
              code = sqrt((((0.5e0 * u1) * u1) + u1)) * 1.0e0
          end function
          
          function code(cosTheta_i, u1, u2)
          	return Float32(sqrt(Float32(Float32(Float32(Float32(0.5) * u1) * u1) + u1)) * Float32(1.0))
          end
          
          function tmp = code(cosTheta_i, u1, u2)
          	tmp = sqrt((((single(0.5) * u1) * u1) + u1)) * single(1.0);
          end
          
          \begin{array}{l}
          
          \\
          \sqrt{\left(0.5 \cdot u1\right) \cdot u1 + u1} \cdot 1
          \end{array}
          
          Derivation
          1. Initial program 59.2%

            \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          2. Add Preprocessing
          3. Taylor expanded in u1 around 0

            \[\leadsto \sqrt{\color{blue}{u1 \cdot \left(1 + \frac{1}{2} \cdot u1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          4. Step-by-step derivation
            1. *-commutativeN/A

              \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
            2. lower-*.f32N/A

              \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
            3. +-commutativeN/A

              \[\leadsto \sqrt{\color{blue}{\left(\frac{1}{2} \cdot u1 + 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
            4. lower-fma.f3258.4

              \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          5. Applied rewrites58.6%

            \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
          6. Taylor expanded in u2 around 0

            \[\leadsto \sqrt{\mathsf{fma}\left(\frac{1}{2}, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
          7. Step-by-step derivation
            1. Applied rewrites65.0%

              \[\leadsto \sqrt{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
            2. Step-by-step derivation
              1. Applied rewrites73.3%

                \[\leadsto \sqrt{\left(0.5 \cdot u1\right) \cdot u1 + \color{blue}{u1}} \cdot 1 \]
              2. Add Preprocessing

              Alternative 10: 72.0% accurate, 8.0× speedup?

              \[\begin{array}{l} \\ \sqrt{\left(1 - -0.5 \cdot u1\right) \cdot u1} \cdot 1 \end{array} \]
              (FPCore (cosTheta_i u1 u2)
               :precision binary32
               (* (sqrt (* (- 1.0 (* -0.5 u1)) u1)) 1.0))
              float code(float cosTheta_i, float u1, float u2) {
              	return sqrtf(((1.0f - (-0.5f * u1)) * u1)) * 1.0f;
              }
              
              module fmin_fmax_functions
                  implicit none
                  private
                  public fmax
                  public fmin
              
                  interface fmax
                      module procedure fmax88
                      module procedure fmax44
                      module procedure fmax84
                      module procedure fmax48
                  end interface
                  interface fmin
                      module procedure fmin88
                      module procedure fmin44
                      module procedure fmin84
                      module procedure fmin48
                  end interface
              contains
                  real(8) function fmax88(x, y) result (res)
                      real(8), intent (in) :: x
                      real(8), intent (in) :: y
                      res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                  end function
                  real(4) function fmax44(x, y) result (res)
                      real(4), intent (in) :: x
                      real(4), intent (in) :: y
                      res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                  end function
                  real(8) function fmax84(x, y) result(res)
                      real(8), intent (in) :: x
                      real(4), intent (in) :: y
                      res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                  end function
                  real(8) function fmax48(x, y) result(res)
                      real(4), intent (in) :: x
                      real(8), intent (in) :: y
                      res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                  end function
                  real(8) function fmin88(x, y) result (res)
                      real(8), intent (in) :: x
                      real(8), intent (in) :: y
                      res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                  end function
                  real(4) function fmin44(x, y) result (res)
                      real(4), intent (in) :: x
                      real(4), intent (in) :: y
                      res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                  end function
                  real(8) function fmin84(x, y) result(res)
                      real(8), intent (in) :: x
                      real(4), intent (in) :: y
                      res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                  end function
                  real(8) function fmin48(x, y) result(res)
                      real(4), intent (in) :: x
                      real(8), intent (in) :: y
                      res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                  end function
              end module
              
              real(4) function code(costheta_i, u1, u2)
              use fmin_fmax_functions
                  real(4), intent (in) :: costheta_i
                  real(4), intent (in) :: u1
                  real(4), intent (in) :: u2
                  code = sqrt(((1.0e0 - ((-0.5e0) * u1)) * u1)) * 1.0e0
              end function
              
              function code(cosTheta_i, u1, u2)
              	return Float32(sqrt(Float32(Float32(Float32(1.0) - Float32(Float32(-0.5) * u1)) * u1)) * Float32(1.0))
              end
              
              function tmp = code(cosTheta_i, u1, u2)
              	tmp = sqrt(((single(1.0) - (single(-0.5) * u1)) * u1)) * single(1.0);
              end
              
              \begin{array}{l}
              
              \\
              \sqrt{\left(1 - -0.5 \cdot u1\right) \cdot u1} \cdot 1
              \end{array}
              
              Derivation
              1. Initial program 59.2%

                \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
              2. Add Preprocessing
              3. Taylor expanded in u1 around 0

                \[\leadsto \sqrt{\color{blue}{u1 \cdot \left(1 + \frac{1}{2} \cdot u1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
              4. Step-by-step derivation
                1. *-commutativeN/A

                  \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                2. lower-*.f32N/A

                  \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                3. +-commutativeN/A

                  \[\leadsto \sqrt{\color{blue}{\left(\frac{1}{2} \cdot u1 + 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                4. lower-fma.f3259.3

                  \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
              5. Applied rewrites58.8%

                \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
              6. Taylor expanded in u2 around 0

                \[\leadsto \sqrt{\mathsf{fma}\left(\frac{1}{2}, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
              7. Step-by-step derivation
                1. Applied rewrites64.7%

                  \[\leadsto \sqrt{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
                2. Step-by-step derivation
                  1. Applied rewrites73.2%

                    \[\leadsto \sqrt{\left(1 - -0.5 \cdot u1\right) \cdot u1} \cdot 1 \]
                  2. Add Preprocessing

                  Alternative 11: 64.1% accurate, 11.0× speedup?

                  \[\begin{array}{l} \\ \sqrt{1 \cdot u1} \cdot 1 \end{array} \]
                  (FPCore (cosTheta_i u1 u2) :precision binary32 (* (sqrt (* 1.0 u1)) 1.0))
                  float code(float cosTheta_i, float u1, float u2) {
                  	return sqrtf((1.0f * u1)) * 1.0f;
                  }
                  
                  module fmin_fmax_functions
                      implicit none
                      private
                      public fmax
                      public fmin
                  
                      interface fmax
                          module procedure fmax88
                          module procedure fmax44
                          module procedure fmax84
                          module procedure fmax48
                      end interface
                      interface fmin
                          module procedure fmin88
                          module procedure fmin44
                          module procedure fmin84
                          module procedure fmin48
                      end interface
                  contains
                      real(8) function fmax88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmax44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmax84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmax48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                      end function
                      real(8) function fmin88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmin44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmin84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmin48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                      end function
                  end module
                  
                  real(4) function code(costheta_i, u1, u2)
                  use fmin_fmax_functions
                      real(4), intent (in) :: costheta_i
                      real(4), intent (in) :: u1
                      real(4), intent (in) :: u2
                      code = sqrt((1.0e0 * u1)) * 1.0e0
                  end function
                  
                  function code(cosTheta_i, u1, u2)
                  	return Float32(sqrt(Float32(Float32(1.0) * u1)) * Float32(1.0))
                  end
                  
                  function tmp = code(cosTheta_i, u1, u2)
                  	tmp = sqrt((single(1.0) * u1)) * single(1.0);
                  end
                  
                  \begin{array}{l}
                  
                  \\
                  \sqrt{1 \cdot u1} \cdot 1
                  \end{array}
                  
                  Derivation
                  1. Initial program 59.2%

                    \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                  2. Add Preprocessing
                  3. Taylor expanded in u1 around 0

                    \[\leadsto \sqrt{\color{blue}{u1 \cdot \left(1 + \frac{1}{2} \cdot u1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                  4. Step-by-step derivation
                    1. *-commutativeN/A

                      \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                    2. lower-*.f32N/A

                      \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                    3. +-commutativeN/A

                      \[\leadsto \sqrt{\color{blue}{\left(\frac{1}{2} \cdot u1 + 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                    4. lower-fma.f3258.4

                      \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                  5. Applied rewrites59.3%

                    \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                  6. Taylor expanded in u2 around 0

                    \[\leadsto \sqrt{\mathsf{fma}\left(\frac{1}{2}, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
                  7. Step-by-step derivation
                    1. Applied rewrites64.7%

                      \[\leadsto \sqrt{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
                    2. Taylor expanded in u1 around 0

                      \[\leadsto \sqrt{1 \cdot u1} \cdot 1 \]
                    3. Step-by-step derivation
                      1. Applied rewrites65.0%

                        \[\leadsto \sqrt{1 \cdot u1} \cdot 1 \]
                      2. Add Preprocessing

                      Alternative 12: 5.1% accurate, 12.8× speedup?

                      \[\begin{array}{l} \\ \left(-\sqrt{u1}\right) \cdot 1 \end{array} \]
                      (FPCore (cosTheta_i u1 u2) :precision binary32 (* (- (sqrt u1)) 1.0))
                      float code(float cosTheta_i, float u1, float u2) {
                      	return -sqrtf(u1) * 1.0f;
                      }
                      
                      module fmin_fmax_functions
                          implicit none
                          private
                          public fmax
                          public fmin
                      
                          interface fmax
                              module procedure fmax88
                              module procedure fmax44
                              module procedure fmax84
                              module procedure fmax48
                          end interface
                          interface fmin
                              module procedure fmin88
                              module procedure fmin44
                              module procedure fmin84
                              module procedure fmin48
                          end interface
                      contains
                          real(8) function fmax88(x, y) result (res)
                              real(8), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                          end function
                          real(4) function fmax44(x, y) result (res)
                              real(4), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                          end function
                          real(8) function fmax84(x, y) result(res)
                              real(8), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                          end function
                          real(8) function fmax48(x, y) result(res)
                              real(4), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                          end function
                          real(8) function fmin88(x, y) result (res)
                              real(8), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                          end function
                          real(4) function fmin44(x, y) result (res)
                              real(4), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                          end function
                          real(8) function fmin84(x, y) result(res)
                              real(8), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                          end function
                          real(8) function fmin48(x, y) result(res)
                              real(4), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                          end function
                      end module
                      
                      real(4) function code(costheta_i, u1, u2)
                      use fmin_fmax_functions
                          real(4), intent (in) :: costheta_i
                          real(4), intent (in) :: u1
                          real(4), intent (in) :: u2
                          code = -sqrt(u1) * 1.0e0
                      end function
                      
                      function code(cosTheta_i, u1, u2)
                      	return Float32(Float32(-sqrt(u1)) * Float32(1.0))
                      end
                      
                      function tmp = code(cosTheta_i, u1, u2)
                      	tmp = -sqrt(u1) * single(1.0);
                      end
                      
                      \begin{array}{l}
                      
                      \\
                      \left(-\sqrt{u1}\right) \cdot 1
                      \end{array}
                      
                      Derivation
                      1. Initial program 59.2%

                        \[\sqrt{-\log \left(1 - u1\right)} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                      2. Add Preprocessing
                      3. Taylor expanded in u1 around 0

                        \[\leadsto \sqrt{\color{blue}{u1 \cdot \left(1 + \frac{1}{2} \cdot u1\right)}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                      4. Step-by-step derivation
                        1. *-commutativeN/A

                          \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                        2. lower-*.f32N/A

                          \[\leadsto \sqrt{\color{blue}{\left(1 + \frac{1}{2} \cdot u1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                        3. +-commutativeN/A

                          \[\leadsto \sqrt{\color{blue}{\left(\frac{1}{2} \cdot u1 + 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                        4. lower-fma.f3258.6

                          \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right)} \cdot u1} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                      5. Applied rewrites58.9%

                        \[\leadsto \sqrt{\color{blue}{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1}} \cdot \cos \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u2\right) \]
                      6. Taylor expanded in u2 around 0

                        \[\leadsto \sqrt{\mathsf{fma}\left(\frac{1}{2}, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
                      7. Step-by-step derivation
                        1. Applied rewrites64.7%

                          \[\leadsto \sqrt{\mathsf{fma}\left(0.5, u1, 1\right) \cdot u1} \cdot \color{blue}{1} \]
                        2. Taylor expanded in u1 around 0

                          \[\leadsto \color{blue}{\left(\sqrt{u1} \cdot {\left(\sqrt{-1}\right)}^{2}\right)} \cdot 1 \]
                        3. Step-by-step derivation
                          1. *-commutativeN/A

                            \[\leadsto \color{blue}{\left({\left(\sqrt{-1}\right)}^{2} \cdot \sqrt{u1}\right)} \cdot 1 \]
                          2. unpow2N/A

                            \[\leadsto \left(\color{blue}{\left(\sqrt{-1} \cdot \sqrt{-1}\right)} \cdot \sqrt{u1}\right) \cdot 1 \]
                          3. rem-square-sqrtN/A

                            \[\leadsto \left(\color{blue}{-1} \cdot \sqrt{u1}\right) \cdot 1 \]
                          4. lower-*.f32N/A

                            \[\leadsto \color{blue}{\left(-1 \cdot \sqrt{u1}\right)} \cdot 1 \]
                          5. lower-sqrt.f325.2

                            \[\leadsto \left(-1 \cdot \color{blue}{\sqrt{u1}}\right) \cdot 1 \]
                        4. Applied rewrites5.2%

                          \[\leadsto \color{blue}{\left(-1 \cdot \sqrt{u1}\right)} \cdot 1 \]
                        5. Taylor expanded in u1 around 0

                          \[\leadsto \color{blue}{\left(\sqrt{u1} \cdot {\left(\sqrt{-1}\right)}^{2}\right)} \cdot 1 \]
                        6. Step-by-step derivation
                          1. *-commutativeN/A

                            \[\leadsto \color{blue}{\left({\left(\sqrt{-1}\right)}^{2} \cdot \sqrt{u1}\right)} \cdot 1 \]
                          2. unpow2N/A

                            \[\leadsto \left(\color{blue}{\left(\sqrt{-1} \cdot \sqrt{-1}\right)} \cdot \sqrt{u1}\right) \cdot 1 \]
                          3. rem-square-sqrtN/A

                            \[\leadsto \left(\color{blue}{-1} \cdot \sqrt{u1}\right) \cdot 1 \]
                          4. mul-1-negN/A

                            \[\leadsto \color{blue}{\left(\mathsf{neg}\left(\sqrt{u1}\right)\right)} \cdot 1 \]
                          5. lower-neg.f32N/A

                            \[\leadsto \color{blue}{\left(-\sqrt{u1}\right)} \cdot 1 \]
                          6. lower-sqrt.f325.2

                            \[\leadsto \left(-\color{blue}{\sqrt{u1}}\right) \cdot 1 \]
                        7. Applied rewrites5.2%

                          \[\leadsto \color{blue}{\left(-\sqrt{u1}\right)} \cdot 1 \]
                        8. Add Preprocessing

                        Reproduce

                        ?
                        herbie shell --seed 2024346 
                        (FPCore (cosTheta_i u1 u2)
                          :name "Beckmann Sample, near normal, slope_x"
                          :precision binary32
                          :pre (and (and (and (> cosTheta_i 0.9999) (<= cosTheta_i 1.0)) (and (<= 2.328306437e-10 u1) (<= u1 1.0))) (and (<= 2.328306437e-10 u2) (<= u2 1.0)))
                          (* (sqrt (- (log (- 1.0 u1)))) (cos (* (* 2.0 (PI)) u2))))