Beckmann Sample, normalization factor

Percentage Accurate: 97.8% → 98.4%
Time: 9.5s
Alternatives: 11
Speedup: 1.1×

Specification

?
\[\left(0 < cosTheta \land cosTheta < 0.9999\right) \land \left(-1 < c \land c < 1\right)\]
\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (* (/ 1.0 (sqrt (PI))) (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta))
    (exp (* (- cosTheta) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}
\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 11 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: 97.8% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (* (/ 1.0 (sqrt (PI))) (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta))
    (exp (* (- cosTheta) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}
\end{array}

Alternative 1: 98.4% accurate, 0.4× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (/ (pow (exp cosTheta) (- cosTheta)) (cbrt (PI)))
    (/
     (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta)
     (pow (PI) 0.16666666666666666))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    7. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
    8. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    9. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{2}}}}} \]
    10. lift-PI.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\color{blue}{\mathsf{PI}\left(\right)}}^{\frac{1}{2}}}} \]
    11. add-cube-cbrtN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\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)}}^{\frac{1}{2}}}} \]
    12. unpow-prod-downN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}}} \]
  4. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}}} \]
  5. Add Preprocessing

Alternative 2: 98.4% accurate, 0.5× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (*
     (/ 1.0 (cbrt (PI)))
     (/
      (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta)
      (pow (PI) 0.16666666666666666)))
    (exp (* (- cosTheta) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    2. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. pow1/2N/A

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\color{blue}{\mathsf{PI}\left(\right)}}^{\frac{1}{2}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    7. add-cube-cbrtN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\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)}}^{\frac{1}{2}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    8. unpow-prod-downN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    9. pow2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\color{blue}{\left({\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{2}\right)}}^{\frac{1}{2}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    10. pow-powN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\left(2 \cdot \frac{1}{2}\right)}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    11. metadata-evalN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\color{blue}{1}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    12. unpow1N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    13. times-fracN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    14. lower-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  4. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  5. Add Preprocessing

Alternative 3: 98.5% accurate, 0.7× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (sqrt (- (- 1.0 cosTheta) cosTheta))
    (/ (pow (exp cosTheta) (- cosTheta)) (* (sqrt (PI)) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    7. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
    8. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    9. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{2}}}}} \]
    10. lift-PI.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\color{blue}{\mathsf{PI}\left(\right)}}^{\frac{1}{2}}}} \]
    11. add-cube-cbrtN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\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)}}^{\frac{1}{2}}}} \]
    12. unpow-prod-downN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}}} \]
  4. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}}} \]
  5. Step-by-step derivation
    1. lift-*.f32N/A

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

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    4. frac-timesN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt[3]{\mathsf{PI}\left(\right)} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    5. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}}{\sqrt[3]{\mathsf{PI}\left(\right)} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    6. lift-cbrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    7. pow1/3N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    8. lift-pow.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}} \cdot \color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    9. pow-prod-upN/A

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{{\mathsf{PI}\left(\right)}^{\color{blue}{\frac{1}{2}}}}} \]
    11. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    12. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    13. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}} \]
  6. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}}} \]
  7. Add Preprocessing

Alternative 4: 98.5% accurate, 0.7× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{{\left(e^{cosTheta}\right)}^{cosTheta} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta\right)}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (/
    (sqrt (- (- 1.0 cosTheta) cosTheta))
    (* (pow (exp cosTheta) cosTheta) (* (sqrt (PI)) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{{\left(e^{cosTheta}\right)}^{cosTheta} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta\right)}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    7. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
    8. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    9. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{2}}}}} \]
    10. lift-PI.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\color{blue}{\mathsf{PI}\left(\right)}}^{\frac{1}{2}}}} \]
    11. add-cube-cbrtN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\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)}}^{\frac{1}{2}}}} \]
    12. unpow-prod-downN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}}} \]
  4. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}}} \]
  5. Step-by-step derivation
    1. lift-*.f32N/A

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

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    4. frac-timesN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt[3]{\mathsf{PI}\left(\right)} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    5. lift-cbrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    6. pow1/3N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    7. lift-pow.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}} \cdot \color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    8. pow-prod-upN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\left(\frac{1}{3} + \frac{1}{6}\right)}}}} \]
    9. metadata-evalN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{\color{blue}{\frac{1}{2}}}}} \]
    10. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    11. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    12. associate-*r/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    13. lift-pow.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
    14. lift-neg.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + {\left(e^{cosTheta}\right)}^{\color{blue}{\left(\mathsf{neg}\left(cosTheta\right)\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
    15. pow-negN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1}{{\left(e^{cosTheta}\right)}^{cosTheta}}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
  6. Applied rewrites98.5%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{{\left(e^{cosTheta}\right)}^{cosTheta} \cdot \left(\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta\right)}}} \]
  7. Add Preprocessing

Alternative 5: 98.5% accurate, 1.1× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) (* cosTheta (sqrt (PI))))
    (exp (* (- cosTheta) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    2. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. frac-timesN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. lower-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    7. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{\color{blue}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    8. lower-*.f3298.5

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{\color{blue}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  4. Applied rewrites98.5%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  5. Add Preprocessing

Alternative 6: 98.0% accurate, 1.1× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \frac{\sqrt{\frac{\left(1 - cosTheta\right) - cosTheta}{\mathsf{PI}\left(\right)}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (/ (sqrt (/ (- (- 1.0 cosTheta) cosTheta) (PI))) cosTheta)
    (exp (* (- cosTheta) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \frac{\sqrt{\frac{\left(1 - cosTheta\right) - cosTheta}{\mathsf{PI}\left(\right)}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    2. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. associate-*r/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. lower-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{1 \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    7. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    8. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    9. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    10. sqrt-undivN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{\frac{\left(1 - cosTheta\right) - cosTheta}{\mathsf{PI}\left(\right)}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    11. lower-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{\frac{\left(1 - cosTheta\right) - cosTheta}{\mathsf{PI}\left(\right)}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    12. lower-/.f3298.1

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{\frac{\left(1 - cosTheta\right) - cosTheta}{\mathsf{PI}\left(\right)}}}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  4. Applied rewrites98.1%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\sqrt{\frac{\left(1 - cosTheta\right) - cosTheta}{\mathsf{PI}\left(\right)}}}{cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  5. Add Preprocessing

Alternative 7: 95.8% accurate, 1.2× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \frac{1 - cosTheta}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (/ (- 1.0 cosTheta) (* cosTheta (sqrt (PI))))
    (exp (* (- cosTheta) cosTheta))))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \frac{1 - cosTheta}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    2. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. frac-timesN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. lower-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    7. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{\color{blue}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    8. lower-*.f3298.5

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{\color{blue}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  4. Applied rewrites98.5%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  5. Step-by-step derivation
    1. lift--.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{\left(1 - cosTheta\right) - cosTheta}}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    2. lift--.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{\left(1 - cosTheta\right)} - cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. associate--l-N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. lower--.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{1 - \left(cosTheta + cosTheta\right)}}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. count-2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - \color{blue}{2 \cdot cosTheta}}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. lower-*.f3298.5

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{1 - \color{blue}{2 \cdot cosTheta}}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  6. Applied rewrites98.5%

    \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\color{blue}{1 - 2 \cdot cosTheta}}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  7. Taylor expanded in cosTheta around 0

    \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{1 + -1 \cdot cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  8. Step-by-step derivation
    1. fp-cancel-sign-sub-invN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    2. metadata-evalN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 - \color{blue}{1} \cdot cosTheta}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{1 - \color{blue}{cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. lower--.f3296.4

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{1 - cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  9. Applied rewrites96.4%

    \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{1 - cosTheta}}{cosTheta \cdot \sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  10. Add Preprocessing

Alternative 8: 95.1% accurate, 2.2× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\mathsf{fma}\left(-cosTheta, cosTheta, 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/
  1.0
  (+
   (+ 1.0 c)
   (*
    (sqrt (- (- 1.0 cosTheta) cosTheta))
    (/ (* (fma (- cosTheta) cosTheta 1.0) (sqrt (/ 1.0 (PI)))) cosTheta)))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\mathsf{fma}\left(-cosTheta, cosTheta, 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    7. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
    8. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    9. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{2}}}}} \]
    10. lift-PI.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\color{blue}{\mathsf{PI}\left(\right)}}^{\frac{1}{2}}}} \]
    11. add-cube-cbrtN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\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)}}^{\frac{1}{2}}}} \]
    12. unpow-prod-downN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}}} \]
  4. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}}} \]
  5. Step-by-step derivation
    1. lift-*.f32N/A

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

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    4. frac-timesN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt[3]{\mathsf{PI}\left(\right)} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    5. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}}{\sqrt[3]{\mathsf{PI}\left(\right)} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    6. lift-cbrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    7. pow1/3N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    8. lift-pow.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}} \cdot \color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    9. pow-prod-upN/A

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{{\mathsf{PI}\left(\right)}^{\color{blue}{\frac{1}{2}}}}} \]
    11. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    12. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    13. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}} \]
  6. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}}} \]
  7. Taylor expanded in cosTheta around 0

    \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \color{blue}{\frac{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}} + -1 \cdot \left({cosTheta}^{2} \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}\right)}{cosTheta}}} \]
  8. Step-by-step derivation
    1. lower-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \color{blue}{\frac{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}} + -1 \cdot \left({cosTheta}^{2} \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}\right)}{cosTheta}}} \]
    2. associate-*r*N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}} + \color{blue}{\left(-1 \cdot {cosTheta}^{2}\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    3. distribute-rgt1-inN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\color{blue}{\left(-1 \cdot {cosTheta}^{2} + 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    4. lower-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\color{blue}{\left(-1 \cdot {cosTheta}^{2} + 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    5. mul-1-negN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\left(\color{blue}{\left(\mathsf{neg}\left({cosTheta}^{2}\right)\right)} + 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    6. unpow2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\left(\left(\mathsf{neg}\left(\color{blue}{cosTheta \cdot cosTheta}\right)\right) + 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    7. distribute-lft-neg-inN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\left(\color{blue}{\left(\mathsf{neg}\left(cosTheta\right)\right) \cdot cosTheta} + 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    8. lower-fma.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(cosTheta\right), cosTheta, 1\right)} \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    9. lower-neg.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\mathsf{fma}\left(\color{blue}{-cosTheta}, cosTheta, 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    10. lower-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\mathsf{fma}\left(-cosTheta, cosTheta, 1\right) \cdot \color{blue}{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    11. lower-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\mathsf{fma}\left(-cosTheta, cosTheta, 1\right) \cdot \sqrt{\color{blue}{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    12. lower-PI.f3295.7

      \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{\mathsf{fma}\left(-cosTheta, cosTheta, 1\right) \cdot \sqrt{\frac{1}{\color{blue}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
  9. Applied rewrites95.7%

    \[\leadsto \frac{1}{\left(1 + c\right) + \sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \color{blue}{\frac{\mathsf{fma}\left(-cosTheta, cosTheta, 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}}} \]
  10. Add Preprocessing

Alternative 9: 94.9% accurate, 3.2× speedup?

\[\begin{array}{l} \\ \frac{1}{\left(1 + c\right) + \frac{\left(1 - cosTheta\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \end{array} \]
(FPCore (cosTheta c)
 :precision binary32
 (/ 1.0 (+ (+ 1.0 c) (/ (* (- 1.0 cosTheta) (sqrt (/ 1.0 (PI)))) cosTheta))))
\begin{array}{l}

\\
\frac{1}{\left(1 + c\right) + \frac{\left(1 - cosTheta\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}} \]
    2. lift-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right)} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    3. lift-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \left(\color{blue}{\frac{1}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    4. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{1 \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    5. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
    6. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot e^{\left(-cosTheta\right) \cdot cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    7. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}}{\sqrt{\mathsf{PI}\left(\right)}}} \]
    8. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    9. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{2}}}}} \]
    10. lift-PI.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\color{blue}{\mathsf{PI}\left(\right)}}^{\frac{1}{2}}}} \]
    11. add-cube-cbrtN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\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)}}^{\frac{1}{2}}}} \]
    12. unpow-prod-downN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{e^{\left(-cosTheta\right) \cdot cosTheta} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\color{blue}{{\left(\sqrt[3]{\mathsf{PI}\left(\right)} \cdot \sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}} \cdot {\left(\sqrt[3]{\mathsf{PI}\left(\right)}\right)}^{\frac{1}{2}}}}} \]
  4. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{0.16666666666666666}}}} \]
  5. Step-by-step derivation
    1. lift-*.f32N/A

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

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt[3]{\mathsf{PI}\left(\right)}}} \cdot \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    4. frac-timesN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt[3]{\mathsf{PI}\left(\right)} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    5. *-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}}{\sqrt[3]{\mathsf{PI}\left(\right)} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    6. lift-cbrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt[3]{\mathsf{PI}\left(\right)}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    7. pow1/3N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}}} \cdot {\mathsf{PI}\left(\right)}^{\frac{1}{6}}}} \]
    8. lift-pow.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{{\mathsf{PI}\left(\right)}^{\frac{1}{3}} \cdot \color{blue}{{\mathsf{PI}\left(\right)}^{\frac{1}{6}}}}} \]
    9. pow-prod-upN/A

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{{\mathsf{PI}\left(\right)}^{\color{blue}{\frac{1}{2}}}}} \]
    11. pow1/2N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    12. lift-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\color{blue}{\sqrt{\mathsf{PI}\left(\right)}}}} \]
    13. associate-*l/N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}}{\sqrt{\mathsf{PI}\left(\right)}} \cdot {\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}} \]
  6. Applied rewrites98.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\sqrt{\left(1 - cosTheta\right) - cosTheta} \cdot \frac{{\left(e^{cosTheta}\right)}^{\left(-cosTheta\right)}}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta}}} \]
  7. Taylor expanded in cosTheta around 0

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}} + -1 \cdot \left(cosTheta \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}\right)}{cosTheta}}} \]
  8. Step-by-step derivation
    1. lower-/.f32N/A

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

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}} + \color{blue}{\left(-1 \cdot cosTheta\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    3. mul-1-negN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}} + \color{blue}{\left(\mathsf{neg}\left(cosTheta\right)\right)} \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    4. distribute-rgt1-inN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\left(\left(\mathsf{neg}\left(cosTheta\right)\right) + 1\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    5. +-commutativeN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\left(1 + \left(\mathsf{neg}\left(cosTheta\right)\right)\right)} \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    6. mul-1-negN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\left(1 + \color{blue}{-1 \cdot cosTheta}\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    7. lower-*.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\left(1 + -1 \cdot cosTheta\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    8. fp-cancel-sign-sub-invN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\left(1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot cosTheta\right)} \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    9. metadata-evalN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\left(1 - \color{blue}{1} \cdot cosTheta\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    10. *-lft-identityN/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\left(1 - \color{blue}{cosTheta}\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    11. lower--.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\color{blue}{\left(1 - cosTheta\right)} \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}} \]
    12. lower-sqrt.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\left(1 - cosTheta\right) \cdot \color{blue}{\sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    13. lower-/.f32N/A

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\left(1 - cosTheta\right) \cdot \sqrt{\color{blue}{\frac{1}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
    14. lower-PI.f3295.6

      \[\leadsto \frac{1}{\left(1 + c\right) + \frac{\left(1 - cosTheta\right) \cdot \sqrt{\frac{1}{\color{blue}{\mathsf{PI}\left(\right)}}}}{cosTheta}} \]
  9. Applied rewrites95.6%

    \[\leadsto \frac{1}{\left(1 + c\right) + \color{blue}{\frac{\left(1 - cosTheta\right) \cdot \sqrt{\frac{1}{\mathsf{PI}\left(\right)}}}{cosTheta}}} \]
  10. Add Preprocessing

Alternative 10: 92.6% accurate, 11.4× speedup?

\[\begin{array}{l} \\ \sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta \end{array} \]
(FPCore (cosTheta c) :precision binary32 (* (sqrt (PI)) cosTheta))
\begin{array}{l}

\\
\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Taylor expanded in cosTheta around 0

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

      \[\leadsto \color{blue}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta} \]
    2. lower-*.f32N/A

      \[\leadsto \color{blue}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta} \]
    3. lower-sqrt.f32N/A

      \[\leadsto \color{blue}{\sqrt{\mathsf{PI}\left(\right)}} \cdot cosTheta \]
    4. lower-PI.f3293.6

      \[\leadsto \sqrt{\color{blue}{\mathsf{PI}\left(\right)}} \cdot cosTheta \]
  5. Applied rewrites93.6%

    \[\leadsto \color{blue}{\sqrt{\mathsf{PI}\left(\right)} \cdot cosTheta} \]
  6. Add Preprocessing

Alternative 11: 5.1% accurate, 15.3× speedup?

\[\begin{array}{l} \\ \frac{1}{c} \end{array} \]
(FPCore (cosTheta c) :precision binary32 (/ 1.0 c))
float code(float cosTheta, float c) {
	return 1.0f / c;
}
real(4) function code(costheta, c)
    real(4), intent (in) :: costheta
    real(4), intent (in) :: c
    code = 1.0e0 / c
end function
function code(cosTheta, c)
	return Float32(Float32(1.0) / c)
end
function tmp = code(cosTheta, c)
	tmp = single(1.0) / c;
end
\begin{array}{l}

\\
\frac{1}{c}
\end{array}
Derivation
  1. Initial program 97.9%

    \[\frac{1}{\left(1 + c\right) + \left(\frac{1}{\sqrt{\mathsf{PI}\left(\right)}} \cdot \frac{\sqrt{\left(1 - cosTheta\right) - cosTheta}}{cosTheta}\right) \cdot e^{\left(-cosTheta\right) \cdot cosTheta}} \]
  2. Add Preprocessing
  3. Taylor expanded in c around inf

    \[\leadsto \color{blue}{\frac{1}{c}} \]
  4. Step-by-step derivation
    1. lower-/.f325.1

      \[\leadsto \color{blue}{\frac{1}{c}} \]
  5. Applied rewrites5.1%

    \[\leadsto \color{blue}{\frac{1}{c}} \]
  6. Add Preprocessing

Reproduce

?
herbie shell --seed 2024339 
(FPCore (cosTheta c)
  :name "Beckmann Sample, normalization factor"
  :precision binary32
  :pre (and (and (< 0.0 cosTheta) (< cosTheta 0.9999)) (and (< -1.0 c) (< c 1.0)))
  (/ 1.0 (+ (+ 1.0 c) (* (* (/ 1.0 (sqrt (PI))) (/ (sqrt (- (- 1.0 cosTheta) cosTheta)) cosTheta)) (exp (* (- cosTheta) cosTheta))))))