Trowbridge-Reitz Sample, sample surface normal, cosTheta

Percentage Accurate: 99.4% → 99.4%
Time: 19.2s
Alternatives: 7
Speedup: N/A×

Specification

?
\[\left(\left(\left(2.328306437 \cdot 10^{-10} \leq u0 \land u0 \leq 1\right) \land \left(2.328306437 \cdot 10^{-10} \leq u1 \land u1 \leq 0.5\right)\right) \land \left(0.0001 \leq alphax \land alphax \leq 1\right)\right) \land \left(0.0001 \leq alphay \land alphay \leq 1\right)\]
\[\begin{array}{l} \\ \begin{array}{l} t_0 := \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)\\ t_1 := \sin t\_0\\ t_2 := \cos t\_0\\ \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{t\_2 \cdot t\_2}{alphax \cdot alphax} + \frac{t\_1 \cdot t\_1}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \end{array} \end{array} \]
(FPCore (u0 u1 alphax alphay)
 :precision binary32
 (let* ((t_0
         (atan
          (* (/ alphay alphax) (tan (+ (* (* 2.0 (PI)) u1) (* 0.5 (PI)))))))
        (t_1 (sin t_0))
        (t_2 (cos t_0)))
   (/
    1.0
    (sqrt
     (+
      1.0
      (/
       (*
        (/
         1.0
         (+
          (/ (* t_2 t_2) (* alphax alphax))
          (/ (* t_1 t_1) (* alphay alphay))))
        u0)
       (- 1.0 u0)))))))
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)\\
t_1 := \sin t\_0\\
t_2 := \cos t\_0\\
\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{t\_2 \cdot t\_2}{alphax \cdot alphax} + \frac{t\_1 \cdot t\_1}{alphay \cdot alphay}} \cdot u0}{1 - u0}}}
\end{array}
\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 7 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.4% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)\\ t_1 := \sin t\_0\\ t_2 := \cos t\_0\\ \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{t\_2 \cdot t\_2}{alphax \cdot alphax} + \frac{t\_1 \cdot t\_1}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \end{array} \end{array} \]
(FPCore (u0 u1 alphax alphay)
 :precision binary32
 (let* ((t_0
         (atan
          (* (/ alphay alphax) (tan (+ (* (* 2.0 (PI)) u1) (* 0.5 (PI)))))))
        (t_1 (sin t_0))
        (t_2 (cos t_0)))
   (/
    1.0
    (sqrt
     (+
      1.0
      (/
       (*
        (/
         1.0
         (+
          (/ (* t_2 t_2) (* alphax alphax))
          (/ (* t_1 t_1) (* alphay alphay))))
        u0)
       (- 1.0 u0)))))))
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)\\
t_1 := \sin t\_0\\
t_2 := \cos t\_0\\
\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{t\_2 \cdot t\_2}{alphax \cdot alphax} + \frac{t\_1 \cdot t\_1}{alphay \cdot alphay}} \cdot u0}{1 - u0}}}
\end{array}
\end{array}

Alternative 1: 99.4% accurate, 1.5× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(0.5 \cdot \mathsf{PI}\left(\right) + \left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1\right)\right)\\ \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\cos t\_0}{alphax}\right)}^{2} + {\left(\frac{\sin t\_0}{alphay}\right)}^{2}} + 1}} \end{array} \end{array} \]
(FPCore (u0 u1 alphax alphay)
 :precision binary32
 (let* ((t_0
         (atan
          (* (/ alphay alphax) (tan (+ (* 0.5 (PI)) (* (* 2.0 (PI)) u1)))))))
   (/
    1.0
    (sqrt
     (+
      (/
       (/ u0 (- 1.0 u0))
       (+ (pow (/ (cos t_0) alphax) 2.0) (pow (/ (sin t_0) alphay) 2.0)))
      1.0)))))
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(0.5 \cdot \mathsf{PI}\left(\right) + \left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1\right)\right)\\
\frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\cos t\_0}{alphax}\right)}^{2} + {\left(\frac{\sin t\_0}{alphay}\right)}^{2}} + 1}}
\end{array}
\end{array}
Derivation
  1. Initial program 99.5%

    \[\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
  2. Add Preprocessing
  3. Applied rewrites87.8%

    \[\leadsto \color{blue}{\frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\mathsf{fma}\left(0.5, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(0.5, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}}} \]
  4. Step-by-step derivation
    1. lift-fma.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \color{blue}{\left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\color{blue}{\frac{1}{2} \cdot \mathsf{PI}\left(\right)} + u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    3. +-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \color{blue}{\left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    4. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\color{blue}{u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    5. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    6. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    7. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    8. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    9. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    10. lift-+.f3293.0

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(0.5, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    11. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    12. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\color{blue}{u1 \cdot \left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    13. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    14. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    15. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(\frac{1}{2}, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    16. lift-*.f3293.0

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(\color{blue}{u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)} + 0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(0.5, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
  5. Applied rewrites93.0%

    \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \color{blue}{\left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + 0.5 \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \left(\mathsf{fma}\left(0.5, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
  6. Step-by-step derivation
    1. lift-fma.f32N/A

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \color{blue}{\left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    2. lift-*.f32N/A

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

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \color{blue}{\left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
    4. lift-+.f3299.5

      \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + 0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \color{blue}{\left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + 0.5 \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
  7. Applied rewrites99.5%

    \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\sin \tan^{-1} \left(\tan \left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + 0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}{alphay}\right)}^{2} + {\left(\frac{\cos \tan^{-1} \left(\tan \color{blue}{\left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + 0.5 \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}{alphax}\right)}^{2}} + 1}} \]
  8. Final simplification99.5%

    \[\leadsto \frac{1}{\sqrt{\frac{\frac{u0}{1 - u0}}{{\left(\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(0.5 \cdot \mathsf{PI}\left(\right) + \left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1\right)\right)}{alphax}\right)}^{2} + {\left(\frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(0.5 \cdot \mathsf{PI}\left(\right) + \left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1\right)\right)}{alphay}\right)}^{2}} + 1}} \]
  9. Add Preprocessing

Alternative 2: 98.3% accurate, 2.1× speedup?

\[\begin{array}{l} \\ \frac{1}{\sqrt{\frac{\frac{1}{\frac{1 - \cos \left(\tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right) \cdot 2\right)}{\left(alphay \cdot alphay\right) \cdot 2} + \frac{\frac{1}{{\left(\frac{alphay}{alphax} \cdot \tan \left(0.5 \cdot \mathsf{PI}\left(\right) + \left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1\right)\right)}^{2} + 1}}{alphax \cdot alphax}} \cdot u0}{1 - u0} + 1}} \end{array} \]
(FPCore (u0 u1 alphax alphay)
 :precision binary32
 (/
  1.0
  (sqrt
   (+
    (/
     (*
      (/
       1.0
       (+
        (/
         (-
          1.0
          (cos
           (*
            (atan (* (tan (* (fma u1 2.0 0.5) (PI))) (/ alphay alphax)))
            2.0)))
         (* (* alphay alphay) 2.0))
        (/
         (/
          1.0
          (+
           (pow
            (* (/ alphay alphax) (tan (+ (* 0.5 (PI)) (* (* 2.0 (PI)) u1))))
            2.0)
           1.0))
         (* alphax alphax))))
      u0)
     (- 1.0 u0))
    1.0))))
\begin{array}{l}

\\
\frac{1}{\sqrt{\frac{\frac{1}{\frac{1 - \cos \left(\tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right) \cdot 2\right)}{\left(alphay \cdot alphay\right) \cdot 2} + \frac{\frac{1}{{\left(\frac{alphay}{alphax} \cdot \tan \left(0.5 \cdot \mathsf{PI}\left(\right) + \left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1\right)\right)}^{2} + 1}}{alphax \cdot alphax}} \cdot u0}{1 - u0} + 1}}
\end{array}
Derivation
  1. Initial program 99.5%

    \[\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\color{blue}{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    2. lift-cos.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\color{blue}{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)} \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    3. lift-atan.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \color{blue}{\tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)} \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    4. cos-atanN/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\color{blue}{\frac{1}{\sqrt{1 + \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}}} \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    5. lift-cos.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{\sqrt{1 + \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}} \cdot \color{blue}{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    6. lift-atan.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{\sqrt{1 + \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}} \cdot \cos \color{blue}{\tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    7. cos-atanN/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{\sqrt{1 + \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}} \cdot \color{blue}{\frac{1}{\sqrt{1 + \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}}}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
  4. Applied rewrites92.7%

    \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\color{blue}{\frac{1}{{\left(\tan \left(\mathsf{fma}\left(0.5, \mathsf{PI}\left(\right), u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
  5. Step-by-step derivation
    1. lift-fma.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \color{blue}{\left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right)} \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(\color{blue}{\frac{1}{2} \cdot \mathsf{PI}\left(\right)} + u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    3. +-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \color{blue}{\left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    4. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(\color{blue}{u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    5. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    6. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    7. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    8. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    9. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    10. lift-+.f3299.5

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \color{blue}{\left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    11. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(\color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    12. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(\color{blue}{u1 \cdot \left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    13. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \color{blue}{\left(2 \cdot \mathsf{PI}\left(\right)\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    14. *-commutativeN/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    15. lift-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \color{blue}{\left(\mathsf{PI}\left(\right) \cdot 2\right)} + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
    16. lift-*.f3299.5

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(\color{blue}{u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right)} + 0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
  6. Applied rewrites99.5%

    \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \color{blue}{\left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + 0.5 \cdot \mathsf{PI}\left(\right)\right)} \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
  7. Step-by-step derivation
    1. lift-/.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \color{blue}{\frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + \frac{1}{2} \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}}} \cdot u0}{1 - u0}}} \]
  8. Applied rewrites70.8%

    \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\frac{1}{{\left(\tan \left(u1 \cdot \left(\mathsf{PI}\left(\right) \cdot 2\right) + 0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{2} + 1}}{alphax \cdot alphax} + \color{blue}{\frac{1 - \cos \left(\tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right) \cdot 2\right)}{\left(alphay \cdot alphay\right) \cdot 2}}} \cdot u0}{1 - u0}}} \]
  9. Final simplification98.5%

    \[\leadsto \frac{1}{\sqrt{\frac{\frac{1}{\frac{1 - \cos \left(\tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right) \cdot 2\right)}{\left(alphay \cdot alphay\right) \cdot 2} + \frac{\frac{1}{{\left(\frac{alphay}{alphax} \cdot \tan \left(0.5 \cdot \mathsf{PI}\left(\right) + \left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1\right)\right)}^{2} + 1}}{alphax \cdot alphax}} \cdot u0}{1 - u0} + 1}} \]
  10. Add Preprocessing

Alternative 3: 98.3% accurate, 2.4× speedup?

\[\begin{array}{l} \\ \frac{1}{\sqrt{\frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}}{\cos \left(\left(2 \cdot u1 + 0.5\right) \cdot \mathsf{PI}\left(\right)\right)}\right)}^{2}}}{1 - u0} + 1}} \end{array} \]
(FPCore (u0 u1 alphax alphay)
 :precision binary32
 (/
  1.0
  (sqrt
   (+
    (/
     (/
      (* (* alphay alphay) u0)
      (pow
       (sin
        (atan
         (/
          (* (sin (* 0.5 (PI))) (/ alphay alphax))
          (cos (* (+ (* 2.0 u1) 0.5) (PI))))))
       2.0))
     (- 1.0 u0))
    1.0))))
\begin{array}{l}

\\
\frac{1}{\sqrt{\frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}}{\cos \left(\left(2 \cdot u1 + 0.5\right) \cdot \mathsf{PI}\left(\right)\right)}\right)}^{2}}}{1 - u0} + 1}}
\end{array}
Derivation
  1. Initial program 99.5%

    \[\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
  2. Add Preprocessing
  3. Taylor expanded in alphax around inf

    \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{{alphay}^{2} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
  4. Step-by-step derivation
    1. lower-/.f32N/A

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

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{{alphay}^{2} \cdot u0}}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
    3. unpow2N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
    4. lower-*.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
    5. lower-pow.f32N/A

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{\color{blue}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
  5. Applied rewrites98.2%

    \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\frac{alphay}{alphax} \cdot \sin \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}{\cos \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
  6. Step-by-step derivation
    1. Applied rewrites98.7%

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\frac{alphay}{alphax} \cdot \sin \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}{\cos \left(\mathsf{PI}\left(\right) \cdot \left(u1 \cdot 2 + 0.5\right)\right)}\right)}^{2}}}{1 - u0}}} \]
    2. Taylor expanded in u1 around 0

      \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\frac{alphay}{alphax} \cdot \sin \left(\mathsf{PI}\left(\right) \cdot \frac{1}{2}\right)}{\cos \left(\mathsf{PI}\left(\right) \cdot \left(u1 \cdot 2 + \frac{1}{2}\right)\right)}\right)}^{2}}}{1 - u0}}} \]
    3. Step-by-step derivation
      1. Applied rewrites98.7%

        \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\frac{alphay}{alphax} \cdot \sin \left(\mathsf{PI}\left(\right) \cdot 0.5\right)}{\cos \left(\mathsf{PI}\left(\right) \cdot \left(u1 \cdot 2 + 0.5\right)\right)}\right)}^{2}}}{1 - u0}}} \]
      2. Final simplification98.7%

        \[\leadsto \frac{1}{\sqrt{\frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\sin \left(0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}}{\cos \left(\left(2 \cdot u1 + 0.5\right) \cdot \mathsf{PI}\left(\right)\right)}\right)}^{2}}}{1 - u0} + 1}} \]
      3. Add Preprocessing

      Alternative 4: 98.0% accurate, 2.6× speedup?

      \[\begin{array}{l} \\ {\left(\frac{\left(\left(alphay \cdot alphay\right) \cdot u0\right) \cdot {\sin \tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2}}{1 - u0} + 1\right)}^{-0.5} \end{array} \]
      (FPCore (u0 u1 alphax alphay)
       :precision binary32
       (pow
        (+
         (/
          (*
           (* (* alphay alphay) u0)
           (pow
            (sin (atan (* (tan (* (fma u1 2.0 0.5) (PI))) (/ alphay alphax))))
            -2.0))
          (- 1.0 u0))
         1.0)
        -0.5))
      \begin{array}{l}
      
      \\
      {\left(\frac{\left(\left(alphay \cdot alphay\right) \cdot u0\right) \cdot {\sin \tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2}}{1 - u0} + 1\right)}^{-0.5}
      \end{array}
      
      Derivation
      1. Initial program 99.5%

        \[\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
      2. Add Preprocessing
      3. Taylor expanded in alphax around inf

        \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{{alphay}^{2} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
      4. Step-by-step derivation
        1. lower-/.f32N/A

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

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{{alphay}^{2} \cdot u0}}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
        3. unpow2N/A

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
        4. lower-*.f32N/A

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
        5. lower-pow.f32N/A

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{\color{blue}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
      5. Applied rewrites98.2%

        \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\frac{alphay}{alphax} \cdot \sin \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}{\cos \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
      6. Applied rewrites86.3%

        \[\leadsto \color{blue}{{\left(\frac{{\sin \tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(u0 \cdot \left(alphay \cdot alphay\right)\right)}{1 - u0} + 1\right)}^{-0.5}} \]
      7. Final simplification84.2%

        \[\leadsto {\left(\frac{\left(\left(alphay \cdot alphay\right) \cdot u0\right) \cdot {\sin \tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2}}{1 - u0} + 1\right)}^{-0.5} \]
      8. Add Preprocessing

      Alternative 5: 97.6% accurate, 3.0× speedup?

      \[\begin{array}{l} \\ \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(\left(2 \cdot u1 + 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(\left(alphay \cdot alphay\right) \cdot u0\right)}{1 - u0} + 1}} \end{array} \]
      (FPCore (u0 u1 alphax alphay)
       :precision binary32
       (/
        1.0
        (sqrt
         (+
          (/
           (*
            (pow
             (sin (atan (* (tan (* (+ (* 2.0 u1) 0.5) (PI))) (/ alphay alphax))))
             -2.0)
            (* (* alphay alphay) u0))
           (- 1.0 u0))
          1.0))))
      \begin{array}{l}
      
      \\
      \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(\left(2 \cdot u1 + 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(\left(alphay \cdot alphay\right) \cdot u0\right)}{1 - u0} + 1}}
      \end{array}
      
      Derivation
      1. Initial program 99.5%

        \[\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
      2. Add Preprocessing
      3. Taylor expanded in alphax around inf

        \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{{alphay}^{2} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
      4. Step-by-step derivation
        1. lower-/.f32N/A

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

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{{alphay}^{2} \cdot u0}}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
        3. unpow2N/A

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
        4. lower-*.f32N/A

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
        5. lower-pow.f32N/A

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{\color{blue}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
      5. Applied rewrites98.2%

        \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\frac{alphay}{alphax} \cdot \sin \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}{\cos \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
      6. Applied rewrites98.2%

        \[\leadsto \color{blue}{\frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(u0 \cdot \left(alphay \cdot alphay\right)\right)}{1 - u0} + 1}}} \]
      7. Step-by-step derivation
        1. Applied rewrites98.2%

          \[\leadsto \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(\left(2 \cdot u1 + 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(u0 \cdot \left(alphay \cdot alphay\right)\right)}{1 - u0} + 1}} \]
        2. Final simplification98.2%

          \[\leadsto \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(\left(2 \cdot u1 + 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(\left(alphay \cdot alphay\right) \cdot u0\right)}{1 - u0} + 1}} \]
        3. Add Preprocessing

        Alternative 6: 97.6% accurate, 3.0× speedup?

        \[\begin{array}{l} \\ \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(\left(alphay \cdot alphay\right) \cdot u0\right)}{1 - u0} + 1}} \end{array} \]
        (FPCore (u0 u1 alphax alphay)
         :precision binary32
         (/
          1.0
          (sqrt
           (+
            (/
             (*
              (pow (sin (atan (* (tan (* 0.5 (PI))) (/ alphay alphax)))) -2.0)
              (* (* alphay alphay) u0))
             (- 1.0 u0))
            1.0))))
        \begin{array}{l}
        
        \\
        \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(\left(alphay \cdot alphay\right) \cdot u0\right)}{1 - u0} + 1}}
        \end{array}
        
        Derivation
        1. Initial program 99.5%

          \[\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
        2. Add Preprocessing
        3. Taylor expanded in alphax around inf

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{{alphay}^{2} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
        4. Step-by-step derivation
          1. lower-/.f32N/A

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

            \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{{alphay}^{2} \cdot u0}}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
          3. unpow2N/A

            \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
          4. lower-*.f32N/A

            \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\color{blue}{\left(alphay \cdot alphay\right)} \cdot u0}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}{1 - u0}}} \]
          5. lower-pow.f32N/A

            \[\leadsto \frac{1}{\sqrt{1 + \frac{\frac{\left(alphay \cdot alphay\right) \cdot u0}{\color{blue}{{\sin \tan^{-1} \left(\frac{alphay \cdot \sin \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot \cos \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right) + 2 \cdot \left(u1 \cdot \mathsf{PI}\left(\right)\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
        5. Applied rewrites98.2%

          \[\leadsto \frac{1}{\sqrt{1 + \frac{\color{blue}{\frac{\left(alphay \cdot alphay\right) \cdot u0}{{\sin \tan^{-1} \left(\frac{\frac{alphay}{alphax} \cdot \sin \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}{\cos \left(\mathsf{PI}\left(\right) \cdot \mathsf{fma}\left(u1, 2, 0.5\right)\right)}\right)}^{2}}}}{1 - u0}}} \]
        6. Applied rewrites98.2%

          \[\leadsto \color{blue}{\frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(\mathsf{fma}\left(u1, 2, 0.5\right) \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(u0 \cdot \left(alphay \cdot alphay\right)\right)}{1 - u0} + 1}}} \]
        7. Taylor expanded in u1 around 0

          \[\leadsto \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(\frac{1}{2} \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(u0 \cdot \left(alphay \cdot alphay\right)\right)}{1 - u0} + 1}} \]
        8. Step-by-step derivation
          1. Applied rewrites98.2%

            \[\leadsto \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(u0 \cdot \left(alphay \cdot alphay\right)\right)}{1 - u0} + 1}} \]
          2. Final simplification98.2%

            \[\leadsto \frac{1}{\sqrt{\frac{{\sin \tan^{-1} \left(\tan \left(0.5 \cdot \mathsf{PI}\left(\right)\right) \cdot \frac{alphay}{alphax}\right)}^{-2} \cdot \left(\left(alphay \cdot alphay\right) \cdot u0\right)}{1 - u0} + 1}} \]
          3. Add Preprocessing

          Alternative 7: 91.2% accurate, 1436.0× speedup?

          \[\begin{array}{l} \\ 1 \end{array} \]
          (FPCore (u0 u1 alphax alphay) :precision binary32 1.0)
          float code(float u0, float u1, float alphax, float alphay) {
          	return 1.0f;
          }
          
          real(4) function code(u0, u1, alphax, alphay)
              real(4), intent (in) :: u0
              real(4), intent (in) :: u1
              real(4), intent (in) :: alphax
              real(4), intent (in) :: alphay
              code = 1.0e0
          end function
          
          function code(u0, u1, alphax, alphay)
          	return Float32(1.0)
          end
          
          function tmp = code(u0, u1, alphax, alphay)
          	tmp = single(1.0);
          end
          
          \begin{array}{l}
          
          \\
          1
          \end{array}
          
          Derivation
          1. Initial program 99.5%

            \[\frac{1}{\sqrt{1 + \frac{\frac{1}{\frac{\cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \cos \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphax \cdot alphax} + \frac{\sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right) \cdot \sin \tan^{-1} \left(\frac{alphay}{alphax} \cdot \tan \left(\left(2 \cdot \mathsf{PI}\left(\right)\right) \cdot u1 + 0.5 \cdot \mathsf{PI}\left(\right)\right)\right)}{alphay \cdot alphay}} \cdot u0}{1 - u0}}} \]
          2. Add Preprocessing
          3. Taylor expanded in alphax around 0

            \[\leadsto \color{blue}{1} \]
          4. Step-by-step derivation
            1. Applied rewrites91.5%

              \[\leadsto \color{blue}{1} \]
            2. Add Preprocessing

            Reproduce

            ?
            herbie shell --seed 2024270 
            (FPCore (u0 u1 alphax alphay)
              :name "Trowbridge-Reitz Sample, sample surface normal, cosTheta"
              :precision binary32
              :pre (and (and (and (and (<= 2.328306437e-10 u0) (<= u0 1.0)) (and (<= 2.328306437e-10 u1) (<= u1 0.5))) (and (<= 0.0001 alphax) (<= alphax 1.0))) (and (<= 0.0001 alphay) (<= alphay 1.0)))
              (/ 1.0 (sqrt (+ 1.0 (/ (* (/ 1.0 (+ (/ (* (cos (atan (* (/ alphay alphax) (tan (+ (* (* 2.0 (PI)) u1) (* 0.5 (PI))))))) (cos (atan (* (/ alphay alphax) (tan (+ (* (* 2.0 (PI)) u1) (* 0.5 (PI)))))))) (* alphax alphax)) (/ (* (sin (atan (* (/ alphay alphax) (tan (+ (* (* 2.0 (PI)) u1) (* 0.5 (PI))))))) (sin (atan (* (/ alphay alphax) (tan (+ (* (* 2.0 (PI)) u1) (* 0.5 (PI)))))))) (* alphay alphay)))) u0) (- 1.0 u0))))))