UniformSampleCone, x

Percentage Accurate: 57.9% → 98.9%
Time: 4.6s
Alternatives: 13
Speedup: 1.6×

Specification

?
\[\left(\left(2.328306437 \cdot 10^{-10} \leq ux \land ux \leq 1\right) \land \left(2.328306437 \cdot 10^{-10} \leq uy \land uy \leq 1\right)\right) \land \left(0 \leq maxCos \land maxCos \leq 1\right)\]
\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - ux\right) + ux \cdot maxCos\\ \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - t\_0 \cdot t\_0} \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (let* ((t_0 (+ (- 1.0 ux) (* ux maxCos))))
   (* (cos (* (* uy 2.0) PI)) (sqrt (- 1.0 (* t_0 t_0))))))
float code(float ux, float uy, float maxCos) {
	float t_0 = (1.0f - ux) + (ux * maxCos);
	return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((1.0f - (t_0 * t_0)));
}
function code(ux, uy, maxCos)
	t_0 = Float32(Float32(Float32(1.0) - ux) + Float32(ux * maxCos))
	return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))))
end
function tmp = code(ux, uy, maxCos)
	t_0 = (single(1.0) - ux) + (ux * maxCos);
	tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt((single(1.0) - (t_0 * t_0)));
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \left(1 - ux\right) + ux \cdot maxCos\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}

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 13 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: 57.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(1 - ux\right) + ux \cdot maxCos\\ \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - t\_0 \cdot t\_0} \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (let* ((t_0 (+ (- 1.0 ux) (* ux maxCos))))
   (* (cos (* (* uy 2.0) PI)) (sqrt (- 1.0 (* t_0 t_0))))))
float code(float ux, float uy, float maxCos) {
	float t_0 = (1.0f - ux) + (ux * maxCos);
	return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((1.0f - (t_0 * t_0)));
}
function code(ux, uy, maxCos)
	t_0 = Float32(Float32(Float32(1.0) - ux) + Float32(ux * maxCos))
	return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))))
end
function tmp = code(ux, uy, maxCos)
	t_0 = (single(1.0) - ux) + (ux * maxCos);
	tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt((single(1.0) - (t_0 * t_0)));
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \left(1 - ux\right) + ux \cdot maxCos\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}

Alternative 1: 98.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (*
  (cos (* (* uy 2.0) PI))
  (sqrt
   (*
    (- (fma (- ux) (* (- maxCos 1.0) (- maxCos 1.0)) 2.0) (+ maxCos maxCos))
    ux))))
float code(float ux, float uy, float maxCos) {
	return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf(((fmaf(-ux, ((maxCos - 1.0f) * (maxCos - 1.0f)), 2.0f) - (maxCos + maxCos)) * ux));
}
function code(ux, uy, maxCos)
	return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(fma(Float32(-ux), Float32(Float32(maxCos - Float32(1.0)) * Float32(maxCos - Float32(1.0))), Float32(2.0)) - Float32(maxCos + maxCos)) * ux)))
end
\begin{array}{l}

\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in ux around 0

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    2. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    3. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot ux} \]
    4. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right) + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    5. associate-*r*N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(-1 \cdot ux\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    6. mul-1-negN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(\mathsf{neg}\left(ux\right)\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    7. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\mathsf{neg}\left(ux\right), {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    8. lower-neg.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    9. unpow2N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    10. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    11. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    12. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    13. count-2-revN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    14. lower-+.f3298.9

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  4. Applied rewrites98.9%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\color{blue}{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}} \]
  5. Add Preprocessing

Alternative 2: 98.2% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(\left(\left(ux + ux\right) - 2\right) \cdot ux\right) \cdot maxCos\right)} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (*
  (cos (* (* uy 2.0) PI))
  (sqrt (fma (+ (- ux) 2.0) ux (* (* (- (+ ux ux) 2.0) ux) maxCos)))))
float code(float ux, float uy, float maxCos) {
	return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf(fmaf((-ux + 2.0f), ux, ((((ux + ux) - 2.0f) * ux) * maxCos)));
}
function code(ux, uy, maxCos)
	return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(fma(Float32(Float32(-ux) + Float32(2.0)), ux, Float32(Float32(Float32(Float32(ux + ux) - Float32(2.0)) * ux) * maxCos))))
end
\begin{array}{l}

\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(\left(\left(ux + ux\right) - 2\right) \cdot ux\right) \cdot maxCos\right)}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in ux around 0

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    2. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    3. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot ux} \]
    4. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right) + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    5. associate-*r*N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(-1 \cdot ux\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    6. mul-1-negN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(\mathsf{neg}\left(ux\right)\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    7. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\mathsf{neg}\left(ux\right), {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    8. lower-neg.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    9. unpow2N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    10. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    11. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    12. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    13. count-2-revN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    14. lower-+.f3298.9

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  4. Applied rewrites98.9%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\color{blue}{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}} \]
  5. Taylor expanded in maxCos around 0

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{maxCos \cdot \left(ux \cdot \left(2 \cdot ux - 2\right)\right) + \color{blue}{ux \cdot \left(2 + -1 \cdot ux\right)}} \]
  6. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(2 + -1 \cdot ux\right) + maxCos \cdot \color{blue}{\left(ux \cdot \left(2 \cdot ux - 2\right)\right)}} \]
    2. *-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(2 + -1 \cdot ux\right) \cdot ux + maxCos \cdot \left(\color{blue}{ux} \cdot \left(2 \cdot ux - 2\right)\right)} \]
    3. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(2 + -1 \cdot ux, ux, maxCos \cdot \left(ux \cdot \left(2 \cdot ux - 2\right)\right)\right)} \]
    4. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(-1 \cdot ux + 2, ux, maxCos \cdot \left(ux \cdot \left(2 \cdot ux - 2\right)\right)\right)} \]
    5. lower-+.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(-1 \cdot ux + 2, ux, maxCos \cdot \left(ux \cdot \left(2 \cdot ux - 2\right)\right)\right)} \]
    6. mul-1-negN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(ux\right)\right) + 2, ux, maxCos \cdot \left(ux \cdot \left(2 \cdot ux - 2\right)\right)\right)} \]
    7. lift-neg.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, maxCos \cdot \left(ux \cdot \left(2 \cdot ux - 2\right)\right)\right)} \]
    8. *-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(ux \cdot \left(2 \cdot ux - 2\right)\right) \cdot maxCos\right)} \]
    9. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(ux \cdot \left(2 \cdot ux - 2\right)\right) \cdot maxCos\right)} \]
    10. *-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(\left(2 \cdot ux - 2\right) \cdot ux\right) \cdot maxCos\right)} \]
    11. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(\left(2 \cdot ux - 2\right) \cdot ux\right) \cdot maxCos\right)} \]
    12. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(\left(2 \cdot ux - 2\right) \cdot ux\right) \cdot maxCos\right)} \]
    13. count-2-revN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(\left(\left(ux + ux\right) - 2\right) \cdot ux\right) \cdot maxCos\right)} \]
    14. lower-+.f3298.2

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, ux, \left(\left(\left(ux + ux\right) - 2\right) \cdot ux\right) \cdot maxCos\right)} \]
  7. Applied rewrites98.2%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\mathsf{fma}\left(\left(-ux\right) + 2, \color{blue}{ux}, \left(\left(\left(ux + ux\right) - 2\right) \cdot ux\right) \cdot maxCos\right)} \]
  8. Add Preprocessing

Alternative 3: 98.2% accurate, 1.1× speedup?

\[\begin{array}{l} \\ \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\left(ux + ux\right) - 2, maxCos, -ux\right) + 2\right) \cdot ux} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (*
  (cos (* (* uy 2.0) PI))
  (sqrt (* (+ (fma (- (+ ux ux) 2.0) maxCos (- ux)) 2.0) ux))))
float code(float ux, float uy, float maxCos) {
	return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf(((fmaf(((ux + ux) - 2.0f), maxCos, -ux) + 2.0f) * ux));
}
function code(ux, uy, maxCos)
	return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(Float32(fma(Float32(Float32(ux + ux) - Float32(2.0)), maxCos, Float32(-ux)) + Float32(2.0)) * ux)))
end
\begin{array}{l}

\\
\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\left(ux + ux\right) - 2, maxCos, -ux\right) + 2\right) \cdot ux}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in ux around 0

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    2. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    3. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot ux} \]
    4. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right) + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    5. associate-*r*N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(-1 \cdot ux\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    6. mul-1-negN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(\mathsf{neg}\left(ux\right)\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    7. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\mathsf{neg}\left(ux\right), {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    8. lower-neg.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    9. unpow2N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    10. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    11. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    12. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    13. count-2-revN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    14. lower-+.f3298.9

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  4. Applied rewrites98.9%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\color{blue}{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}} \]
  5. Taylor expanded in maxCos around 0

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(2 + \left(-1 \cdot ux + maxCos \cdot \left(2 \cdot ux - 2\right)\right)\right) \cdot ux} \]
  6. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot ux + maxCos \cdot \left(2 \cdot ux - 2\right)\right) + 2\right) \cdot ux} \]
    2. lower-+.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot ux + maxCos \cdot \left(2 \cdot ux - 2\right)\right) + 2\right) \cdot ux} \]
    3. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(maxCos \cdot \left(2 \cdot ux - 2\right) + -1 \cdot ux\right) + 2\right) \cdot ux} \]
    4. *-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(2 \cdot ux - 2\right) \cdot maxCos + -1 \cdot ux\right) + 2\right) \cdot ux} \]
    5. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(2 \cdot ux - 2, maxCos, -1 \cdot ux\right) + 2\right) \cdot ux} \]
    6. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(2 \cdot ux - 2, maxCos, -1 \cdot ux\right) + 2\right) \cdot ux} \]
    7. count-2-revN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\left(ux + ux\right) - 2, maxCos, -1 \cdot ux\right) + 2\right) \cdot ux} \]
    8. lower-+.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\left(ux + ux\right) - 2, maxCos, -1 \cdot ux\right) + 2\right) \cdot ux} \]
    9. mul-1-negN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\left(ux + ux\right) - 2, maxCos, \mathsf{neg}\left(ux\right)\right) + 2\right) \cdot ux} \]
    10. lift-neg.f3298.2

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\left(ux + ux\right) - 2, maxCos, -ux\right) + 2\right) \cdot ux} \]
  7. Applied rewrites98.2%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\left(ux + ux\right) - 2, maxCos, -ux\right) + 2\right) \cdot ux} \]
  8. Add Preprocessing

Alternative 4: 97.1% accurate, 1.2× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;maxCos \leq 3.4999999343199306 \cdot 10^{-7}:\\ \;\;\;\;\sqrt{\left(\left(-ux\right) + 2\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}\\ \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (if (<= maxCos 3.4999999343199306e-7)
   (* (sqrt (* (+ (- ux) 2.0) ux)) (cos (* PI (+ uy uy))))
   (*
    (fma (* -2.0 (* uy uy)) (* PI PI) 1.0)
    (sqrt
     (*
      (- (fma (- ux) (* (- maxCos 1.0) (- maxCos 1.0)) 2.0) (+ maxCos maxCos))
      ux)))))
float code(float ux, float uy, float maxCos) {
	float tmp;
	if (maxCos <= 3.4999999343199306e-7f) {
		tmp = sqrtf(((-ux + 2.0f) * ux)) * cosf((((float) M_PI) * (uy + uy)));
	} else {
		tmp = fmaf((-2.0f * (uy * uy)), (((float) M_PI) * ((float) M_PI)), 1.0f) * sqrtf(((fmaf(-ux, ((maxCos - 1.0f) * (maxCos - 1.0f)), 2.0f) - (maxCos + maxCos)) * ux));
	}
	return tmp;
}
function code(ux, uy, maxCos)
	tmp = Float32(0.0)
	if (maxCos <= Float32(3.4999999343199306e-7))
		tmp = Float32(sqrt(Float32(Float32(Float32(-ux) + Float32(2.0)) * ux)) * cos(Float32(Float32(pi) * Float32(uy + uy))));
	else
		tmp = Float32(fma(Float32(Float32(-2.0) * Float32(uy * uy)), Float32(Float32(pi) * Float32(pi)), Float32(1.0)) * sqrt(Float32(Float32(fma(Float32(-ux), Float32(Float32(maxCos - Float32(1.0)) * Float32(maxCos - Float32(1.0))), Float32(2.0)) - Float32(maxCos + maxCos)) * ux)));
	end
	return tmp
end
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;maxCos \leq 3.4999999343199306 \cdot 10^{-7}:\\
\;\;\;\;\sqrt{\left(\left(-ux\right) + 2\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right)\\

\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if maxCos < 3.49999993e-7

    1. Initial program 57.9%

      \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    2. Taylor expanded in maxCos around 0

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

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

        \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \cdot \color{blue}{\cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right)} \]
      3. unpow1N/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{1}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      4. metadata-evalN/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{\left(\frac{2}{2}\right)}} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      5. sqrt-pow2N/A

        \[\leadsto \sqrt{{\left(\sqrt{1 - {\left(1 - ux\right)}^{2}}\right)}^{2}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      6. lower-sqrt.f32N/A

        \[\leadsto \sqrt{{\left(\sqrt{1 - {\left(1 - ux\right)}^{2}}\right)}^{2}} \cdot \cos \color{blue}{\left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right)} \]
      7. sqrt-pow2N/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{\left(\frac{2}{2}\right)}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      8. metadata-evalN/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{1}} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      9. unpow1N/A

        \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      10. lower--.f32N/A

        \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      11. unpow2N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      12. lower-*.f32N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      13. lift--.f32N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      14. lift--.f32N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      15. associate-*r*N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(\left(2 \cdot uy\right) \cdot \mathsf{PI}\left(\right)\right) \]
    4. Applied rewrites55.9%

      \[\leadsto \color{blue}{\sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right)} \]
    5. Taylor expanded in ux around 0

      \[\leadsto \sqrt{ux \cdot \left(2 + -1 \cdot ux\right)} \cdot \cos \left(\color{blue}{\pi} \cdot \left(uy + uy\right)\right) \]
    6. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \sqrt{\left(2 + -1 \cdot ux\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
      2. lower-*.f32N/A

        \[\leadsto \sqrt{\left(2 + -1 \cdot ux\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
      3. +-commutativeN/A

        \[\leadsto \sqrt{\left(-1 \cdot ux + 2\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
      4. lower-+.f32N/A

        \[\leadsto \sqrt{\left(-1 \cdot ux + 2\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
      5. mul-1-negN/A

        \[\leadsto \sqrt{\left(\left(\mathsf{neg}\left(ux\right)\right) + 2\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
      6. lift-neg.f3292.9

        \[\leadsto \sqrt{\left(\left(-ux\right) + 2\right) \cdot ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
    7. Applied rewrites92.9%

      \[\leadsto \sqrt{\left(\left(-ux\right) + 2\right) \cdot ux} \cdot \cos \left(\color{blue}{\pi} \cdot \left(uy + uy\right)\right) \]

    if 3.49999993e-7 < maxCos

    1. Initial program 57.9%

      \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    2. Taylor expanded in ux around 0

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

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
      2. lower-*.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
      3. lower--.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot ux} \]
      4. +-commutativeN/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right) + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      5. associate-*r*N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(-1 \cdot ux\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      6. mul-1-negN/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(\mathsf{neg}\left(ux\right)\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      7. lower-fma.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\mathsf{neg}\left(ux\right), {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      8. lower-neg.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      9. unpow2N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      10. lower-*.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      11. lower--.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      12. lower--.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      13. count-2-revN/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      14. lower-+.f3298.9

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    4. Applied rewrites98.9%

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\color{blue}{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}} \]
    5. Taylor expanded in uy around 0

      \[\leadsto \color{blue}{\left(1 + -2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)\right)} \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    6. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \left(-2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right) + \color{blue}{1}\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      2. associate-*r*N/A

        \[\leadsto \left(\left(-2 \cdot {uy}^{2}\right) \cdot {\mathsf{PI}\left(\right)}^{2} + 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      3. lower-fma.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, \color{blue}{{\mathsf{PI}\left(\right)}^{2}}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      4. lower-*.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, {\color{blue}{\mathsf{PI}\left(\right)}}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      5. unpow2N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      6. lower-*.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      7. unpow2N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      8. lower-*.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      9. lift-PI.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \mathsf{PI}\left(\right), 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      10. lift-PI.f3287.7

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    7. Applied rewrites87.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right)} \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 5: 93.8% accurate, 1.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;uy \leq 0.026499999687075615:\\ \;\;\;\;\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}\\ \mathbf{else}:\\ \;\;\;\;\sqrt{ux + ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right)\\ \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (if (<= uy 0.026499999687075615)
   (*
    (fma (* -2.0 (* uy uy)) (* PI PI) 1.0)
    (sqrt
     (*
      (- (fma (- ux) (* (- maxCos 1.0) (- maxCos 1.0)) 2.0) (+ maxCos maxCos))
      ux)))
   (* (sqrt (+ ux ux)) (cos (* PI (+ uy uy))))))
float code(float ux, float uy, float maxCos) {
	float tmp;
	if (uy <= 0.026499999687075615f) {
		tmp = fmaf((-2.0f * (uy * uy)), (((float) M_PI) * ((float) M_PI)), 1.0f) * sqrtf(((fmaf(-ux, ((maxCos - 1.0f) * (maxCos - 1.0f)), 2.0f) - (maxCos + maxCos)) * ux));
	} else {
		tmp = sqrtf((ux + ux)) * cosf((((float) M_PI) * (uy + uy)));
	}
	return tmp;
}
function code(ux, uy, maxCos)
	tmp = Float32(0.0)
	if (uy <= Float32(0.026499999687075615))
		tmp = Float32(fma(Float32(Float32(-2.0) * Float32(uy * uy)), Float32(Float32(pi) * Float32(pi)), Float32(1.0)) * sqrt(Float32(Float32(fma(Float32(-ux), Float32(Float32(maxCos - Float32(1.0)) * Float32(maxCos - Float32(1.0))), Float32(2.0)) - Float32(maxCos + maxCos)) * ux)));
	else
		tmp = Float32(sqrt(Float32(ux + ux)) * cos(Float32(Float32(pi) * Float32(uy + uy))));
	end
	return tmp
end
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;uy \leq 0.026499999687075615:\\
\;\;\;\;\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}\\

\mathbf{else}:\\
\;\;\;\;\sqrt{ux + ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if uy < 0.0264999997

    1. Initial program 57.9%

      \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    2. Taylor expanded in ux around 0

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

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
      2. lower-*.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
      3. lower--.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot ux} \]
      4. +-commutativeN/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right) + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      5. associate-*r*N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(-1 \cdot ux\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      6. mul-1-negN/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(\mathsf{neg}\left(ux\right)\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      7. lower-fma.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\mathsf{neg}\left(ux\right), {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      8. lower-neg.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      9. unpow2N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      10. lower-*.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      11. lower--.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      12. lower--.f32N/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
      13. count-2-revN/A

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      14. lower-+.f3298.9

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    4. Applied rewrites98.9%

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\color{blue}{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}} \]
    5. Taylor expanded in uy around 0

      \[\leadsto \color{blue}{\left(1 + -2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)\right)} \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    6. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \left(-2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right) + \color{blue}{1}\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      2. associate-*r*N/A

        \[\leadsto \left(\left(-2 \cdot {uy}^{2}\right) \cdot {\mathsf{PI}\left(\right)}^{2} + 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      3. lower-fma.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, \color{blue}{{\mathsf{PI}\left(\right)}^{2}}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      4. lower-*.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, {\color{blue}{\mathsf{PI}\left(\right)}}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      5. unpow2N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      6. lower-*.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      7. unpow2N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      8. lower-*.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      9. lift-PI.f32N/A

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \mathsf{PI}\left(\right), 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
      10. lift-PI.f3287.7

        \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    7. Applied rewrites87.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right)} \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]

    if 0.0264999997 < uy

    1. Initial program 57.9%

      \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    2. Taylor expanded in maxCos around 0

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

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

        \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \cdot \color{blue}{\cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right)} \]
      3. unpow1N/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{1}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      4. metadata-evalN/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{\left(\frac{2}{2}\right)}} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      5. sqrt-pow2N/A

        \[\leadsto \sqrt{{\left(\sqrt{1 - {\left(1 - ux\right)}^{2}}\right)}^{2}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      6. lower-sqrt.f32N/A

        \[\leadsto \sqrt{{\left(\sqrt{1 - {\left(1 - ux\right)}^{2}}\right)}^{2}} \cdot \cos \color{blue}{\left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right)} \]
      7. sqrt-pow2N/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{\left(\frac{2}{2}\right)}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      8. metadata-evalN/A

        \[\leadsto \sqrt{{\left(1 - {\left(1 - ux\right)}^{2}\right)}^{1}} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      9. unpow1N/A

        \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      10. lower--.f32N/A

        \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \cdot \cos \left(\color{blue}{2} \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      11. unpow2N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      12. lower-*.f32N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      13. lift--.f32N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      14. lift--.f32N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(2 \cdot \left(uy \cdot \mathsf{PI}\left(\right)\right)\right) \]
      15. associate-*r*N/A

        \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(\left(2 \cdot uy\right) \cdot \mathsf{PI}\left(\right)\right) \]
    4. Applied rewrites55.9%

      \[\leadsto \color{blue}{\sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right)} \]
    5. Taylor expanded in ux around 0

      \[\leadsto \sqrt{2 \cdot ux} \cdot \cos \left(\color{blue}{\pi} \cdot \left(uy + uy\right)\right) \]
    6. Step-by-step derivation
      1. count-2-revN/A

        \[\leadsto \sqrt{ux + ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
      2. lower-+.f3272.7

        \[\leadsto \sqrt{ux + ux} \cdot \cos \left(\pi \cdot \left(uy + uy\right)\right) \]
    7. Applied rewrites72.7%

      \[\leadsto \sqrt{ux + ux} \cdot \cos \left(\color{blue}{\pi} \cdot \left(uy + uy\right)\right) \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 6: 87.7% accurate, 1.6× speedup?

\[\begin{array}{l} \\ \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (*
  (fma (* -2.0 (* uy uy)) (* PI PI) 1.0)
  (sqrt
   (*
    (- (fma (- ux) (* (- maxCos 1.0) (- maxCos 1.0)) 2.0) (+ maxCos maxCos))
    ux))))
float code(float ux, float uy, float maxCos) {
	return fmaf((-2.0f * (uy * uy)), (((float) M_PI) * ((float) M_PI)), 1.0f) * sqrtf(((fmaf(-ux, ((maxCos - 1.0f) * (maxCos - 1.0f)), 2.0f) - (maxCos + maxCos)) * ux));
}
function code(ux, uy, maxCos)
	return Float32(fma(Float32(Float32(-2.0) * Float32(uy * uy)), Float32(Float32(pi) * Float32(pi)), Float32(1.0)) * sqrt(Float32(Float32(fma(Float32(-ux), Float32(Float32(maxCos - Float32(1.0)) * Float32(maxCos - Float32(1.0))), Float32(2.0)) - Float32(maxCos + maxCos)) * ux)))
end
\begin{array}{l}

\\
\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in ux around 0

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    2. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot \color{blue}{ux}} \]
    3. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right) \cdot ux} \]
    4. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(-1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right) + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    5. associate-*r*N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(-1 \cdot ux\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    6. mul-1-negN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\left(\left(\mathsf{neg}\left(ux\right)\right) \cdot {\left(maxCos - 1\right)}^{2} + 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    7. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(\mathsf{neg}\left(ux\right), {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    8. lower-neg.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, {\left(maxCos - 1\right)}^{2}, 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    9. unpow2N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    10. lower-*.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    11. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    12. lower--.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - 2 \cdot maxCos\right) \cdot ux} \]
    13. count-2-revN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    14. lower-+.f3298.9

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  4. Applied rewrites98.9%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{\color{blue}{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux}} \]
  5. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\left(1 + -2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)\right)} \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  6. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \left(-2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right) + \color{blue}{1}\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    2. associate-*r*N/A

      \[\leadsto \left(\left(-2 \cdot {uy}^{2}\right) \cdot {\mathsf{PI}\left(\right)}^{2} + 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    3. lower-fma.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, \color{blue}{{\mathsf{PI}\left(\right)}^{2}}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    4. lower-*.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, {\color{blue}{\mathsf{PI}\left(\right)}}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    5. unpow2N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    6. lower-*.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    7. unpow2N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    8. lower-*.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    9. lift-PI.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \mathsf{PI}\left(\right), 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
    10. lift-PI.f3287.7

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  7. Applied rewrites87.7%

    \[\leadsto \color{blue}{\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right)} \cdot \sqrt{\left(\mathsf{fma}\left(-ux, \left(maxCos - 1\right) \cdot \left(maxCos - 1\right), 2\right) - \left(maxCos + maxCos\right)\right) \cdot ux} \]
  8. Add Preprocessing

Alternative 7: 53.1% accurate, 1.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \mathsf{fma}\left(maxCos - 1, ux, 1\right)\\ \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{1 - t\_0 \cdot t\_0} \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (let* ((t_0 (fma (- maxCos 1.0) ux 1.0)))
   (* (fma (* -2.0 (* uy uy)) (* PI PI) 1.0) (sqrt (- 1.0 (* t_0 t_0))))))
float code(float ux, float uy, float maxCos) {
	float t_0 = fmaf((maxCos - 1.0f), ux, 1.0f);
	return fmaf((-2.0f * (uy * uy)), (((float) M_PI) * ((float) M_PI)), 1.0f) * sqrtf((1.0f - (t_0 * t_0)));
}
function code(ux, uy, maxCos)
	t_0 = fma(Float32(maxCos - Float32(1.0)), ux, Float32(1.0))
	return Float32(fma(Float32(Float32(-2.0) * Float32(uy * uy)), Float32(Float32(pi) * Float32(pi)), Float32(1.0)) * sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0))))
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \mathsf{fma}\left(maxCos - 1, ux, 1\right)\\
\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in ux around 0

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \color{blue}{\left(1 + ux \cdot \left(maxCos - 1\right)\right)} \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  3. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(ux \cdot \left(maxCos - 1\right) + \color{blue}{1}\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    2. *-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(maxCos - 1\right) \cdot ux + 1\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    3. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, \color{blue}{ux}, 1\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    4. lower--.f3258.1

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  4. Applied rewrites58.1%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \color{blue}{\mathsf{fma}\left(maxCos - 1, ux, 1\right)} \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  5. Taylor expanded in ux around 0

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \color{blue}{\left(1 + ux \cdot \left(maxCos - 1\right)\right)}} \]
  6. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \left(ux \cdot \left(maxCos - 1\right) + \color{blue}{1}\right)} \]
    2. *-commutativeN/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \left(\left(maxCos - 1\right) \cdot ux + 1\right)} \]
    3. lower-fma.f32N/A

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, \color{blue}{ux}, 1\right)} \]
    4. lower--.f3258.0

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
  7. Applied rewrites58.0%

    \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \color{blue}{\mathsf{fma}\left(maxCos - 1, ux, 1\right)}} \]
  8. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\left(1 + -2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right)\right)} \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
  9. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \left(-2 \cdot \left({uy}^{2} \cdot {\mathsf{PI}\left(\right)}^{2}\right) + \color{blue}{1}\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    2. associate-*r*N/A

      \[\leadsto \left(\left(-2 \cdot {uy}^{2}\right) \cdot {\mathsf{PI}\left(\right)}^{2} + 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    3. lower-fma.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, \color{blue}{{\mathsf{PI}\left(\right)}^{2}}, 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    4. lower-*.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot {uy}^{2}, {\color{blue}{\mathsf{PI}\left(\right)}}^{2}, 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    5. unpow2N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    6. lower-*.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), {\mathsf{PI}\left(\right)}^{2}, 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    7. unpow2N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    8. lower-*.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \mathsf{PI}\left(\right) \cdot \color{blue}{\mathsf{PI}\left(\right)}, 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    9. lift-PI.f32N/A

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \mathsf{PI}\left(\right), 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
    10. lift-PI.f3253.1

      \[\leadsto \mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right) \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
  10. Applied rewrites53.1%

    \[\leadsto \color{blue}{\mathsf{fma}\left(-2 \cdot \left(uy \cdot uy\right), \pi \cdot \pi, 1\right)} \cdot \sqrt{1 - \mathsf{fma}\left(maxCos - 1, ux, 1\right) \cdot \mathsf{fma}\left(maxCos - 1, ux, 1\right)} \]
  11. Add Preprocessing

Alternative 8: 51.9% accurate, 2.3× speedup?

\[\begin{array}{l} \\ \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, maxCos + maxCos\right) - 2, ux, 1\right)} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (sqrt
  (-
   1.0
   (fma
    (- (fma (* (- maxCos 1.0) (- maxCos 1.0)) ux (+ maxCos maxCos)) 2.0)
    ux
    1.0))))
float code(float ux, float uy, float maxCos) {
	return sqrtf((1.0f - fmaf((fmaf(((maxCos - 1.0f) * (maxCos - 1.0f)), ux, (maxCos + maxCos)) - 2.0f), ux, 1.0f)));
}
function code(ux, uy, maxCos)
	return sqrt(Float32(Float32(1.0) - fma(Float32(fma(Float32(Float32(maxCos - Float32(1.0)) * Float32(maxCos - Float32(1.0))), ux, Float32(maxCos + maxCos)) - Float32(2.0)), ux, Float32(1.0))))
end
\begin{array}{l}

\\
\sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, maxCos + maxCos\right) - 2, ux, 1\right)}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
  3. Step-by-step derivation
    1. rem-square-sqrtN/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    2. lower-sqrt.f32N/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    3. rem-square-sqrtN/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. lower--.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    5. unpow2N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    6. lower-*.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 + ux \cdot maxCos\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    9. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(ux \cdot maxCos + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    10. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    11. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    12. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    13. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + ux \cdot maxCos\right) - ux\right)} \]
    14. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(ux \cdot maxCos + 1\right) - ux\right)} \]
    15. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    16. lower-fma.f3249.5

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  4. Applied rewrites49.5%

    \[\leadsto \color{blue}{\sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)}} \]
  5. Taylor expanded in ux around 0

    \[\leadsto \sqrt{1 - \left(1 + ux \cdot \left(\left(2 \cdot maxCos + ux \cdot {\left(maxCos - 1\right)}^{2}\right) - 2\right)\right)} \]
  6. Step-by-step derivation
    1. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(ux \cdot \left(\left(2 \cdot maxCos + ux \cdot {\left(maxCos - 1\right)}^{2}\right) - 2\right) + 1\right)} \]
    2. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(\left(2 \cdot maxCos + ux \cdot {\left(maxCos - 1\right)}^{2}\right) - 2\right) \cdot ux + 1\right)} \]
    3. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\left(2 \cdot maxCos + ux \cdot {\left(maxCos - 1\right)}^{2}\right) - 2, ux, 1\right)} \]
    4. lower--.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\left(2 \cdot maxCos + ux \cdot {\left(maxCos - 1\right)}^{2}\right) - 2, ux, 1\right)} \]
    5. +-commutativeN/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\left(ux \cdot {\left(maxCos - 1\right)}^{2} + 2 \cdot maxCos\right) - 2, ux, 1\right)} \]
    6. *-commutativeN/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\left({\left(maxCos - 1\right)}^{2} \cdot ux + 2 \cdot maxCos\right) - 2, ux, 1\right)} \]
    7. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left({\left(maxCos - 1\right)}^{2}, ux, 2 \cdot maxCos\right) - 2, ux, 1\right)} \]
    8. pow2N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, 2 \cdot maxCos\right) - 2, ux, 1\right)} \]
    9. lift--.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, 2 \cdot maxCos\right) - 2, ux, 1\right)} \]
    10. lift--.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, 2 \cdot maxCos\right) - 2, ux, 1\right)} \]
    11. lift-*.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, 2 \cdot maxCos\right) - 2, ux, 1\right)} \]
    12. count-2-revN/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, maxCos + maxCos\right) - 2, ux, 1\right)} \]
    13. lift-+.f3251.9

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, maxCos + maxCos\right) - 2, ux, 1\right)} \]
  7. Applied rewrites51.9%

    \[\leadsto \sqrt{1 - \mathsf{fma}\left(\mathsf{fma}\left(\left(maxCos - 1\right) \cdot \left(maxCos - 1\right), ux, maxCos + maxCos\right) - 2, ux, 1\right)} \]
  8. Add Preprocessing

Alternative 9: 49.7% accurate, 2.7× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := 1 - \left(ux - maxCos \cdot ux\right)\\ \sqrt{1 - t\_0 \cdot t\_0} \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (let* ((t_0 (- 1.0 (- ux (* maxCos ux))))) (sqrt (- 1.0 (* t_0 t_0)))))
float code(float ux, float uy, float maxCos) {
	float t_0 = 1.0f - (ux - (maxCos * ux));
	return sqrtf((1.0f - (t_0 * t_0)));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(4) function code(ux, uy, maxcos)
use fmin_fmax_functions
    real(4), intent (in) :: ux
    real(4), intent (in) :: uy
    real(4), intent (in) :: maxcos
    real(4) :: t_0
    t_0 = 1.0e0 - (ux - (maxcos * ux))
    code = sqrt((1.0e0 - (t_0 * t_0)))
end function
function code(ux, uy, maxCos)
	t_0 = Float32(Float32(1.0) - Float32(ux - Float32(maxCos * ux)))
	return sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0)))
end
function tmp = code(ux, uy, maxCos)
	t_0 = single(1.0) - (ux - (maxCos * ux));
	tmp = sqrt((single(1.0) - (t_0 * t_0)));
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := 1 - \left(ux - maxCos \cdot ux\right)\\
\sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
  3. Step-by-step derivation
    1. rem-square-sqrtN/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    2. lower-sqrt.f32N/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    3. rem-square-sqrtN/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. lower--.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    5. unpow2N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    6. lower-*.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 + ux \cdot maxCos\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    9. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(ux \cdot maxCos + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    10. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    11. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    12. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    13. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + ux \cdot maxCos\right) - ux\right)} \]
    14. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(ux \cdot maxCos + 1\right) - ux\right)} \]
    15. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    16. lower-fma.f3249.5

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  4. Applied rewrites49.5%

    \[\leadsto \color{blue}{\sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)}} \]
  5. Step-by-step derivation
    1. lift--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    2. lift-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    3. associate--l+N/A

      \[\leadsto \sqrt{1 - \left(maxCos \cdot ux + \left(1 - ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    4. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 - ux\right) + maxCos \cdot ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    5. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    6. associate-+l-N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - ux \cdot maxCos\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - ux \cdot maxCos\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    9. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    10. lower-*.f3249.6

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  6. Applied rewrites49.6%

    \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  7. Step-by-step derivation
    1. lift--.f32N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    2. lift-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    3. associate--l+N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(maxCos \cdot ux + \left(1 - ux\right)\right)} \]
    4. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\left(1 - ux\right) + maxCos \cdot ux\right)} \]
    5. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
    6. associate-+l-N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(1 - \left(ux - ux \cdot maxCos\right)\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(1 - \left(ux - ux \cdot maxCos\right)\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(1 - \left(ux - maxCos \cdot ux\right)\right)} \]
    9. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(1 - \left(ux - maxCos \cdot ux\right)\right)} \]
    10. lower-*.f3249.7

      \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(1 - \left(ux - maxCos \cdot ux\right)\right)} \]
  8. Applied rewrites49.7%

    \[\leadsto \sqrt{1 - \left(1 - \left(ux - maxCos \cdot ux\right)\right) \cdot \left(1 - \left(ux - maxCos \cdot ux\right)\right)} \]
  9. Add Preprocessing

Alternative 10: 49.6% accurate, 2.8× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \mathsf{fma}\left(ux, maxCos, 1 - ux\right)\\ \sqrt{1 - t\_0 \cdot t\_0} \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (let* ((t_0 (fma ux maxCos (- 1.0 ux)))) (sqrt (- 1.0 (* t_0 t_0)))))
float code(float ux, float uy, float maxCos) {
	float t_0 = fmaf(ux, maxCos, (1.0f - ux));
	return sqrtf((1.0f - (t_0 * t_0)));
}
function code(ux, uy, maxCos)
	t_0 = fma(ux, maxCos, Float32(Float32(1.0) - ux))
	return sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0)))
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \mathsf{fma}\left(ux, maxCos, 1 - ux\right)\\
\sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
  3. Step-by-step derivation
    1. rem-square-sqrtN/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    2. lower-sqrt.f32N/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    3. rem-square-sqrtN/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. lower--.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    5. unpow2N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    6. lower-*.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 + ux \cdot maxCos\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    9. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(ux \cdot maxCos + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    10. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    11. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    12. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    13. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + ux \cdot maxCos\right) - ux\right)} \]
    14. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(ux \cdot maxCos + 1\right) - ux\right)} \]
    15. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    16. lower-fma.f3249.5

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  4. Applied rewrites49.5%

    \[\leadsto \color{blue}{\sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)}} \]
  5. Step-by-step derivation
    1. lift--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    2. lift-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    3. associate--l+N/A

      \[\leadsto \sqrt{1 - \left(maxCos \cdot ux + \left(1 - ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    4. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(ux \cdot maxCos + \left(1 - ux\right)\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    5. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    6. lift--.f3249.6

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  6. Applied rewrites49.6%

    \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  7. Step-by-step derivation
    1. lift--.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
    2. lift-fma.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    3. associate--l+N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \left(maxCos \cdot ux + \left(1 - ux\right)\right)} \]
    4. *-commutativeN/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \left(ux \cdot maxCos + \left(1 - ux\right)\right)} \]
    5. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \mathsf{fma}\left(ux, maxCos, 1 - ux\right)} \]
    6. lift--.f3249.6

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \mathsf{fma}\left(ux, maxCos, 1 - ux\right)} \]
  8. Applied rewrites49.6%

    \[\leadsto \sqrt{1 - \mathsf{fma}\left(ux, maxCos, 1 - ux\right) \cdot \mathsf{fma}\left(ux, maxCos, 1 - ux\right)} \]
  9. Add Preprocessing

Alternative 11: 49.5% accurate, 2.8× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \mathsf{fma}\left(maxCos, ux, 1\right) - ux\\ \sqrt{1 - t\_0 \cdot t\_0} \end{array} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (let* ((t_0 (- (fma maxCos ux 1.0) ux))) (sqrt (- 1.0 (* t_0 t_0)))))
float code(float ux, float uy, float maxCos) {
	float t_0 = fmaf(maxCos, ux, 1.0f) - ux;
	return sqrtf((1.0f - (t_0 * t_0)));
}
function code(ux, uy, maxCos)
	t_0 = Float32(fma(maxCos, ux, Float32(1.0)) - ux)
	return sqrt(Float32(Float32(1.0) - Float32(t_0 * t_0)))
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \mathsf{fma}\left(maxCos, ux, 1\right) - ux\\
\sqrt{1 - t\_0 \cdot t\_0}
\end{array}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
  3. Step-by-step derivation
    1. rem-square-sqrtN/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    2. lower-sqrt.f32N/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    3. rem-square-sqrtN/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. lower--.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    5. unpow2N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    6. lower-*.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 + ux \cdot maxCos\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    9. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(ux \cdot maxCos + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    10. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    11. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    12. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    13. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + ux \cdot maxCos\right) - ux\right)} \]
    14. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(ux \cdot maxCos + 1\right) - ux\right)} \]
    15. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    16. lower-fma.f3249.5

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  4. Applied rewrites49.5%

    \[\leadsto \color{blue}{\sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)}} \]
  5. Add Preprocessing

Alternative 12: 48.1% accurate, 5.0× speedup?

\[\begin{array}{l} \\ \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (sqrt (- 1.0 (* (- 1.0 ux) (- 1.0 ux)))))
float code(float ux, float uy, float maxCos) {
	return sqrtf((1.0f - ((1.0f - ux) * (1.0f - ux))));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(4) function code(ux, uy, maxcos)
use fmin_fmax_functions
    real(4), intent (in) :: ux
    real(4), intent (in) :: uy
    real(4), intent (in) :: maxcos
    code = sqrt((1.0e0 - ((1.0e0 - ux) * (1.0e0 - ux))))
end function
function code(ux, uy, maxCos)
	return sqrt(Float32(Float32(1.0) - Float32(Float32(Float32(1.0) - ux) * Float32(Float32(1.0) - ux))))
end
function tmp = code(ux, uy, maxCos)
	tmp = sqrt((single(1.0) - ((single(1.0) - ux) * (single(1.0) - ux))));
end
\begin{array}{l}

\\
\sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
  3. Step-by-step derivation
    1. rem-square-sqrtN/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    2. lower-sqrt.f32N/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    3. rem-square-sqrtN/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. lower--.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    5. unpow2N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    6. lower-*.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 + ux \cdot maxCos\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    9. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(ux \cdot maxCos + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    10. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    11. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    12. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    13. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + ux \cdot maxCos\right) - ux\right)} \]
    14. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(ux \cdot maxCos + 1\right) - ux\right)} \]
    15. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    16. lower-fma.f3249.5

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  4. Applied rewrites49.5%

    \[\leadsto \color{blue}{\sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)}} \]
  5. Taylor expanded in maxCos around 0

    \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  6. Step-by-step derivation
    1. lift--.f3248.2

      \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  7. Applied rewrites48.2%

    \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  8. Taylor expanded in maxCos around 0

    \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \]
  9. Step-by-step derivation
    1. lift--.f3248.1

      \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \]
  10. Applied rewrites48.1%

    \[\leadsto \sqrt{1 - \left(1 - ux\right) \cdot \left(1 - ux\right)} \]
  11. Add Preprocessing

Alternative 13: 6.6% accurate, 12.2× speedup?

\[\begin{array}{l} \\ \sqrt{1 - 1} \end{array} \]
(FPCore (ux uy maxCos) :precision binary32 (sqrt (- 1.0 1.0)))
float code(float ux, float uy, float maxCos) {
	return sqrtf((1.0f - 1.0f));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(4) function code(ux, uy, maxcos)
use fmin_fmax_functions
    real(4), intent (in) :: ux
    real(4), intent (in) :: uy
    real(4), intent (in) :: maxcos
    code = sqrt((1.0e0 - 1.0e0))
end function
function code(ux, uy, maxCos)
	return sqrt(Float32(Float32(1.0) - Float32(1.0)))
end
function tmp = code(ux, uy, maxCos)
	tmp = sqrt((single(1.0) - single(1.0)));
end
\begin{array}{l}

\\
\sqrt{1 - 1}
\end{array}
Derivation
  1. Initial program 57.9%

    \[\cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{1 - \left(\left(1 - ux\right) + ux \cdot maxCos\right) \cdot \left(\left(1 - ux\right) + ux \cdot maxCos\right)} \]
  2. Taylor expanded in uy around 0

    \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
  3. Step-by-step derivation
    1. rem-square-sqrtN/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    2. lower-sqrt.f32N/A

      \[\leadsto \sqrt{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \cdot \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    3. rem-square-sqrtN/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. lower--.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    5. unpow2N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    6. lower-*.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    7. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\left(1 + maxCos \cdot ux\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    8. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(1 + ux \cdot maxCos\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    9. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(ux \cdot maxCos + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    10. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\left(maxCos \cdot ux + 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    11. lower-fma.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    12. lower--.f32N/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + maxCos \cdot ux\right) - ux\right)} \]
    13. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(1 + ux \cdot maxCos\right) - ux\right)} \]
    14. +-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(ux \cdot maxCos + 1\right) - ux\right)} \]
    15. *-commutativeN/A

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\left(maxCos \cdot ux + 1\right) - ux\right)} \]
    16. lower-fma.f3249.5

      \[\leadsto \sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)} \]
  4. Applied rewrites49.5%

    \[\leadsto \color{blue}{\sqrt{1 - \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right) \cdot \left(\mathsf{fma}\left(maxCos, ux, 1\right) - ux\right)}} \]
  5. Taylor expanded in ux around 0

    \[\leadsto \sqrt{1 - 1} \]
  6. Step-by-step derivation
    1. Applied rewrites6.6%

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

    Reproduce

    ?
    herbie shell --seed 2025142 
    (FPCore (ux uy maxCos)
      :name "UniformSampleCone, x"
      :precision binary32
      :pre (and (and (and (<= 2.328306437e-10 ux) (<= ux 1.0)) (and (<= 2.328306437e-10 uy) (<= uy 1.0))) (and (<= 0.0 maxCos) (<= maxCos 1.0)))
      (* (cos (* (* uy 2.0) PI)) (sqrt (- 1.0 (* (+ (- 1.0 ux) (* ux maxCos)) (+ (- 1.0 ux) (* ux maxCos)))))))