UniformSampleCone, x

Percentage Accurate: 57.2% → 98.9%
Time: 3.2s
Alternatives: 11
Speedup: 1.2×

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 11 alternatives:

AlternativeAccuracySpeedup
The accuracy (vertical axis) and speed (horizontal axis) of each alternatives. Up and to the right is better. The red square shows the initial program, and each blue circle shows an alternative.The line shows the best available speed-accuracy tradeoffs.

Initial Program: 57.2% 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{ux \cdot \left(\left(2 + -1 \cdot \left(ux \cdot \left(1 + maxCos \cdot \left(maxCos - 2\right)\right)\right)\right) - 2 \cdot maxCos\right)} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (*
  (cos (* (* uy 2.0) PI))
  (sqrt
   (*
    ux
    (-
     (+ 2.0 (* -1.0 (* ux (+ 1.0 (* maxCos (- maxCos 2.0))))))
     (* 2.0 maxCos))))))
float code(float ux, float uy, float maxCos) {
	return cosf(((uy * 2.0f) * ((float) M_PI))) * sqrtf((ux * ((2.0f + (-1.0f * (ux * (1.0f + (maxCos * (maxCos - 2.0f)))))) - (2.0f * maxCos))));
}
function code(ux, uy, maxCos)
	return Float32(cos(Float32(Float32(uy * Float32(2.0)) * Float32(pi))) * sqrt(Float32(ux * Float32(Float32(Float32(2.0) + Float32(Float32(-1.0) * Float32(ux * Float32(Float32(1.0) + Float32(maxCos * Float32(maxCos - Float32(2.0))))))) - Float32(Float32(2.0) * maxCos)))))
end
function tmp = code(ux, uy, maxCos)
	tmp = cos(((uy * single(2.0)) * single(pi))) * sqrt((ux * ((single(2.0) + (single(-1.0) * (ux * (single(1.0) + (maxCos * (maxCos - single(2.0))))))) - (single(2.0) * maxCos))));
end
\begin{array}{l}

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

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

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

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

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

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

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

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right)} \]
    8. lower-*.f3298.9

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

    \[\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)}} \]
  5. Taylor expanded in maxCos around 0

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

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

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

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

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

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

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

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

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

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

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

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

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right)} \]
    8. lower-*.f3298.9

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

    \[\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)}} \]
  5. Taylor expanded in maxCos around 0

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

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

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

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

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

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

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

Alternative 3: 92.5% accurate, 1.2× speedup?

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

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

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

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

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

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

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

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

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(\left(2 + -1 \cdot \left(ux \cdot {\left(maxCos - 1\right)}^{2}\right)\right) - 2 \cdot maxCos\right)} \]
    8. lower-*.f3298.9

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

    \[\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)}} \]
  5. Taylor expanded in maxCos around 0

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

      \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(2 + -1 \cdot \color{blue}{ux}\right)} \]
    2. lower-*.f3292.5

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

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

Alternative 4: 87.1% accurate, 0.5× speedup?

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

\\
\begin{array}{l}
t_0 := \left(1 - ux\right) + ux \cdot maxCos\\
t_1 := \cos \left(\left(uy \cdot 2\right) \cdot \pi\right)\\
\mathbf{if}\;t\_1 \cdot \sqrt{1 - t\_0 \cdot t\_0} \leq 0.019899999722838402:\\
\;\;\;\;t\_1 \cdot \sqrt{ux \cdot \left(2 - 2 \cdot maxCos\right)}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (*.f32 (cos.f32 (*.f32 (*.f32 uy #s(literal 2 binary32)) (PI.f32))) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos)) (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos)))))) < 0.0198999997

    1. Initial program 57.2%

      \[\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(2 - 2 \cdot maxCos\right)}} \]
    3. Step-by-step derivation
      1. lower-*.f32N/A

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

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(2 - \color{blue}{2 \cdot maxCos}\right)} \]
      3. lower-*.f3276.9

        \[\leadsto \cos \left(\left(uy \cdot 2\right) \cdot \pi\right) \cdot \sqrt{ux \cdot \left(2 - 2 \cdot \color{blue}{maxCos}\right)} \]
    4. Applied rewrites76.9%

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

    if 0.0198999997 < (*.f32 (cos.f32 (*.f32 (*.f32 uy #s(literal 2 binary32)) (PI.f32))) (sqrt.f32 (-.f32 #s(literal 1 binary32) (*.f32 (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos)) (+.f32 (-.f32 #s(literal 1 binary32) ux) (*.f32 ux maxCos))))))

    1. Initial program 57.2%

      \[\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. lower-sqrt.f32N/A

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

        \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
      3. lower-pow.f32N/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. lower-+.f32N/A

        \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
      6. lower-*.f3249.1

        \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. Applied rewrites49.1%

      \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    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. lower-+.f32N/A

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

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

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

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

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

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

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

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

Alternative 5: 51.4% accurate, 1.6× speedup?

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

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

    \[\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. lower-sqrt.f32N/A

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

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    3. lower-pow.f32N/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. lower-+.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    6. lower-*.f3249.1

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
  4. Applied rewrites49.1%

    \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
  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. lower-+.f32N/A

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

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

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

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

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

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

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

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

Alternative 6: 51.1% accurate, 2.5× speedup?

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

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

    \[\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. lower-sqrt.f32N/A

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

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    3. lower-pow.f32N/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. lower-+.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    6. lower-*.f3249.1

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
  4. Applied rewrites49.1%

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

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

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

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

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

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

      \[\leadsto \sqrt{1 - \left(2 \cdot \left(maxCos \cdot \left(ux \cdot \left(1 - ux\right)\right)\right) + {\left(1 - ux\right)}^{2}\right)} \]
    6. lift-fma.f3248.9

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

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

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

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

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

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

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

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

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

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

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

Alternative 7: 51.0% accurate, 2.5× speedup?

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

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

    \[\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. lower-sqrt.f32N/A

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

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    3. lower-pow.f32N/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. lower-+.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    6. lower-*.f3249.1

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
  4. Applied rewrites49.1%

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

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

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

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

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

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

      \[\leadsto \sqrt{1 - \left(2 \cdot \left(maxCos \cdot \left(ux \cdot \left(1 - ux\right)\right)\right) + {\left(1 - ux\right)}^{2}\right)} \]
    6. lift-fma.f3248.9

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

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

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

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

      \[\leadsto \sqrt{1 - \mathsf{fma}\left(2, maxCos \cdot \left(ux \cdot \left(1 - ux\right)\right), 1 + ux \cdot \left(ux - 2\right)\right)} \]
    3. lower--.f3251.0

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

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

Alternative 8: 47.7% accurate, 2.7× speedup?

\[\begin{array}{l} \\ \sqrt{1 - {\left(1 - ux\right)}^{2}} \end{array} \]
(FPCore (ux uy maxCos) :precision binary32 (sqrt (- 1.0 (pow (- 1.0 ux) 2.0))))
float code(float ux, float uy, float maxCos) {
	return sqrtf((1.0f - powf((1.0f - ux), 2.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 - ux) ** 2.0e0)))
end function
function code(ux, uy, maxCos)
	return sqrt(Float32(Float32(1.0) - (Float32(Float32(1.0) - ux) ^ Float32(2.0))))
end
function tmp = code(ux, uy, maxCos)
	tmp = sqrt((single(1.0) - ((single(1.0) - ux) ^ single(2.0))));
end
\begin{array}{l}

\\
\sqrt{1 - {\left(1 - ux\right)}^{2}}
\end{array}
Derivation
  1. Initial program 57.2%

    \[\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. lower-sqrt.f32N/A

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

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    3. lower-pow.f32N/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. lower-+.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    6. lower-*.f3249.1

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
  4. Applied rewrites49.1%

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

    \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \]
  6. Step-by-step derivation
    1. lift--.f3247.7

      \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \]
  7. Applied rewrites47.7%

    \[\leadsto \sqrt{1 - {\left(1 - ux\right)}^{2}} \]
  8. Add Preprocessing

Alternative 9: 40.4% accurate, 4.0× speedup?

\[\begin{array}{l} \\ \sqrt{1 - \left(1 + ux \cdot \left(2 \cdot maxCos - 2\right)\right)} \end{array} \]
(FPCore (ux uy maxCos)
 :precision binary32
 (sqrt (- 1.0 (+ 1.0 (* ux (- (* 2.0 maxCos) 2.0))))))
float code(float ux, float uy, float maxCos) {
	return sqrtf((1.0f - (1.0f + (ux * ((2.0f * maxCos) - 2.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 + (ux * ((2.0e0 * maxcos) - 2.0e0)))))
end function
function code(ux, uy, maxCos)
	return sqrt(Float32(Float32(1.0) - Float32(Float32(1.0) + Float32(ux * Float32(Float32(Float32(2.0) * maxCos) - Float32(2.0))))))
end
function tmp = code(ux, uy, maxCos)
	tmp = sqrt((single(1.0) - (single(1.0) + (ux * ((single(2.0) * maxCos) - single(2.0))))));
end
\begin{array}{l}

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

    \[\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. lower-sqrt.f32N/A

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

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    3. lower-pow.f32N/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. lower-+.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    6. lower-*.f3249.1

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
  4. Applied rewrites49.1%

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

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

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

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

      \[\leadsto \sqrt{1 - \left(1 + ux \cdot \left(2 \cdot maxCos - 2\right)\right)} \]
    4. lift-+.f3240.4

      \[\leadsto \sqrt{1 - \left(1 + ux \cdot \left(2 \cdot maxCos - 2\right)\right)} \]
  7. Applied rewrites40.4%

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

Alternative 10: 39.8% accurate, 6.0× speedup?

\[\begin{array}{l} \\ \sqrt{1 - \left(1 + ux \cdot -2\right)} \end{array} \]
(FPCore (ux uy maxCos) :precision binary32 (sqrt (- 1.0 (+ 1.0 (* ux -2.0)))))
float code(float ux, float uy, float maxCos) {
	return sqrtf((1.0f - (1.0f + (ux * -2.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 + (ux * (-2.0e0)))))
end function
function code(ux, uy, maxCos)
	return sqrt(Float32(Float32(1.0) - Float32(Float32(1.0) + Float32(ux * Float32(-2.0)))))
end
function tmp = code(ux, uy, maxCos)
	tmp = sqrt((single(1.0) - (single(1.0) + (ux * single(-2.0)))));
end
\begin{array}{l}

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

    \[\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. lower-sqrt.f32N/A

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

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    3. lower-pow.f32N/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. lower-+.f32N/A

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    6. lower-*.f3249.1

      \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
  4. Applied rewrites49.1%

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

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

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

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

      \[\leadsto \sqrt{1 - \left(1 + ux \cdot \left(2 \cdot maxCos - 2\right)\right)} \]
    4. lift-+.f3240.4

      \[\leadsto \sqrt{1 - \left(1 + ux \cdot \left(2 \cdot maxCos - 2\right)\right)} \]
  7. Applied rewrites40.4%

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

    \[\leadsto \sqrt{1 - \left(1 + ux \cdot -2\right)} \]
  9. Step-by-step derivation
    1. Applied rewrites39.8%

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

    Alternative 11: 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.2%

      \[\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. lower-sqrt.f32N/A

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

        \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
      3. lower-pow.f32N/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. lower-+.f32N/A

        \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
      6. lower-*.f3249.1

        \[\leadsto \sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}} \]
    4. Applied rewrites49.1%

      \[\leadsto \color{blue}{\sqrt{1 - {\left(\left(1 + maxCos \cdot ux\right) - ux\right)}^{2}}} \]
    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 2025132 
      (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)))))))