Beckmann Distribution sample, tan2theta, alphax != alphay, u1 <= 0.5

Percentage Accurate: 60.6% → 96.2%
Time: 12.1s
Alternatives: 14
Speedup: 5.4×

Specification

?
\[\left(\left(\left(\left(0.0001 \leq alphax \land alphax \leq 1\right) \land \left(0.0001 \leq alphay \land alphay \leq 1\right)\right) \land \left(2.328306437 \cdot 10^{-10} \leq u0 \land u0 \leq 1\right)\right) \land \left(0 \leq cos2phi \land cos2phi \leq 1\right)\right) \land 0 \leq sin2phi\]
\[\begin{array}{l} \\ \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (log (- 1.0 u0)))
  (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -logf((1.0f - u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
}
real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
    real(4), intent (in) :: alphax
    real(4), intent (in) :: alphay
    real(4), intent (in) :: u0
    real(4), intent (in) :: cos2phi
    real(4), intent (in) :: sin2phi
    code = -log((1.0e0 - u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-log(Float32(Float32(1.0) - u0))) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(sin2phi / Float32(alphay * alphay))))
end
function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = -log((single(1.0) - u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}

Sampling outcomes in binary32 precision:

Local Percentage Accuracy vs ?

The average percentage accuracy by input value. Horizontal axis shows value of an input variable; the variable is choosen in the title. Vertical axis is accuracy; higher is better. Red represent the original program, while blue represents Herbie's suggestion. These can be toggled with buttons below the plot. The line is an average while dots represent individual samples.

Accuracy vs Speed?

Herbie found 14 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: 60.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (log (- 1.0 u0)))
  (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -logf((1.0f - u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
}
real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
    real(4), intent (in) :: alphax
    real(4), intent (in) :: alphay
    real(4), intent (in) :: u0
    real(4), intent (in) :: cos2phi
    real(4), intent (in) :: sin2phi
    code = -log((1.0e0 - u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-log(Float32(Float32(1.0) - u0))) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(sin2phi / Float32(alphay * alphay))))
end
function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = -log((single(1.0) - u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}

Alternative 1: 96.2% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;1 - u0 \leq 0.996999979019165:\\ \;\;\;\;\frac{\log \left(1 - u0\right)}{\frac{-1}{\frac{alphax}{cos2phi} \cdot alphax} - t\_0}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + t\_0}\\ \end{array} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (let* ((t_0 (/ sin2phi (* alphay alphay))))
   (if (<= (- 1.0 u0) 0.996999979019165)
     (/ (log (- 1.0 u0)) (- (/ -1.0 (* (/ alphax cos2phi) alphax)) t_0))
     (/
      (- (* (+ 1.0 (* -0.5 u0)) u0) (* (- u0) u0))
      (+ (/ cos2phi (* alphax alphax)) t_0)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	float t_0 = sin2phi / (alphay * alphay);
	float tmp;
	if ((1.0f - u0) <= 0.996999979019165f) {
		tmp = logf((1.0f - u0)) / ((-1.0f / ((alphax / cos2phi) * alphax)) - t_0);
	} else {
		tmp = (((1.0f + (-0.5f * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_0);
	}
	return tmp;
}
real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
    real(4), intent (in) :: alphax
    real(4), intent (in) :: alphay
    real(4), intent (in) :: u0
    real(4), intent (in) :: cos2phi
    real(4), intent (in) :: sin2phi
    real(4) :: t_0
    real(4) :: tmp
    t_0 = sin2phi / (alphay * alphay)
    if ((1.0e0 - u0) <= 0.996999979019165e0) then
        tmp = log((1.0e0 - u0)) / (((-1.0e0) / ((alphax / cos2phi) * alphax)) - t_0)
    else
        tmp = (((1.0e0 + ((-0.5e0) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_0)
    end if
    code = tmp
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	t_0 = Float32(sin2phi / Float32(alphay * alphay))
	tmp = Float32(0.0)
	if (Float32(Float32(1.0) - u0) <= Float32(0.996999979019165))
		tmp = Float32(log(Float32(Float32(1.0) - u0)) / Float32(Float32(Float32(-1.0) / Float32(Float32(alphax / cos2phi) * alphax)) - t_0));
	else
		tmp = Float32(Float32(Float32(Float32(Float32(1.0) + Float32(Float32(-0.5) * u0)) * u0) - Float32(Float32(-u0) * u0)) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + t_0));
	end
	return tmp
end
function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
	t_0 = sin2phi / (alphay * alphay);
	tmp = single(0.0);
	if ((single(1.0) - u0) <= single(0.996999979019165))
		tmp = log((single(1.0) - u0)) / ((single(-1.0) / ((alphax / cos2phi) * alphax)) - t_0);
	else
		tmp = (((single(1.0) + (single(-0.5) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_0);
	end
	tmp_2 = tmp;
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \frac{sin2phi}{alphay \cdot alphay}\\
\mathbf{if}\;1 - u0 \leq 0.996999979019165:\\
\;\;\;\;\frac{\log \left(1 - u0\right)}{\frac{-1}{\frac{alphax}{cos2phi} \cdot alphax} - t\_0}\\

\mathbf{else}:\\
\;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + t\_0}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (-.f32 #s(literal 1 binary32) u0) < 0.996999979

    1. Initial program 91.2%

      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-/.f32N/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{cos2phi}{alphax \cdot alphax}} + \frac{sin2phi}{alphay \cdot alphay}} \]
      2. clear-numN/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{1}{\frac{alphax \cdot alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
      3. frac-2negN/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{\mathsf{neg}\left(1\right)}{\mathsf{neg}\left(\frac{alphax \cdot alphax}{cos2phi}\right)}} + \frac{sin2phi}{alphay \cdot alphay}} \]
      4. metadata-evalN/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{\color{blue}{-1}}{\mathsf{neg}\left(\frac{alphax \cdot alphax}{cos2phi}\right)} + \frac{sin2phi}{alphay \cdot alphay}} \]
      5. lower-/.f32N/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{-1}{\mathsf{neg}\left(\frac{alphax \cdot alphax}{cos2phi}\right)}} + \frac{sin2phi}{alphay \cdot alphay}} \]
      6. lift-*.f32N/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{-1}{\mathsf{neg}\left(\frac{\color{blue}{alphax \cdot alphax}}{cos2phi}\right)} + \frac{sin2phi}{alphay \cdot alphay}} \]
      7. associate-/l*N/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{-1}{\mathsf{neg}\left(\color{blue}{alphax \cdot \frac{alphax}{cos2phi}}\right)} + \frac{sin2phi}{alphay \cdot alphay}} \]
      8. distribute-lft-neg-inN/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{-1}{\color{blue}{\left(\mathsf{neg}\left(alphax\right)\right) \cdot \frac{alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
      9. lower-*.f32N/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{-1}{\color{blue}{\left(\mathsf{neg}\left(alphax\right)\right) \cdot \frac{alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
      10. lower-neg.f32N/A

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{-1}{\color{blue}{\left(-alphax\right)} \cdot \frac{alphax}{cos2phi}} + \frac{sin2phi}{alphay \cdot alphay}} \]
      11. lower-/.f3291.2

        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{-1}{\left(-alphax\right) \cdot \color{blue}{\frac{alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
    4. Applied rewrites91.2%

      \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{-1}{\left(-alphax\right) \cdot \frac{alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]

    if 0.996999979 < (-.f32 #s(literal 1 binary32) u0)

    1. Initial program 50.7%

      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-log.f32N/A

        \[\leadsto \frac{-\color{blue}{\log \left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      2. lift--.f32N/A

        \[\leadsto \frac{-\log \color{blue}{\left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      3. flip--N/A

        \[\leadsto \frac{-\log \color{blue}{\left(\frac{1 \cdot 1 - u0 \cdot u0}{1 + u0}\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      4. log-divN/A

        \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      5. lower--.f32N/A

        \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      6. metadata-evalN/A

        \[\leadsto \frac{-\left(\log \left(\color{blue}{1} - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      7. sub-negN/A

        \[\leadsto \frac{-\left(\log \color{blue}{\left(1 + \left(\mathsf{neg}\left(u0 \cdot u0\right)\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      8. lower-log1p.f32N/A

        \[\leadsto \frac{-\left(\color{blue}{\mathsf{log1p}\left(\mathsf{neg}\left(u0 \cdot u0\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      9. distribute-lft-neg-inN/A

        \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      10. lower-*.f32N/A

        \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      11. lower-neg.f32N/A

        \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(-u0\right)} \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      12. lower-log1p.f3286.8

        \[\leadsto \frac{-\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \color{blue}{\mathsf{log1p}\left(u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    4. Applied rewrites86.8%

      \[\leadsto \frac{-\color{blue}{\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \mathsf{log1p}\left(u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    5. Taylor expanded in u0 around 0

      \[\leadsto \frac{-\left(\color{blue}{-1 \cdot {u0}^{2}} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    6. Step-by-step derivation
      1. mul-1-negN/A

        \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left({u0}^{2}\right)\right)} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      2. unpow2N/A

        \[\leadsto \frac{-\left(\left(\mathsf{neg}\left(\color{blue}{u0 \cdot u0}\right)\right) - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      3. distribute-lft-neg-inN/A

        \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      4. mul-1-negN/A

        \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      5. lower-*.f32N/A

        \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      6. mul-1-negN/A

        \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      7. lower-neg.f3286.8

        \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    7. Applied rewrites86.8%

      \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    8. Taylor expanded in u0 around 0

      \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{u0 \cdot \left(1 + \frac{-1}{2} \cdot u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    9. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      2. lower-*.f32N/A

        \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      3. +-commutativeN/A

        \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(\frac{-1}{2} \cdot u0 + 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      4. lower-fma.f3286.8

        \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    10. Applied rewrites86.3%

      \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    11. Step-by-step derivation
      1. Applied rewrites97.5%

        \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \left(-0.5 \cdot u0 + 1\right) \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    12. Recombined 2 regimes into one program.
    13. Final simplification95.8%

      \[\leadsto \begin{array}{l} \mathbf{if}\;1 - u0 \leq 0.996999979019165:\\ \;\;\;\;\frac{\log \left(1 - u0\right)}{\frac{-1}{\frac{alphax}{cos2phi} \cdot alphax} - \frac{sin2phi}{alphay \cdot alphay}}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}\\ \end{array} \]
    14. Add Preprocessing

    Alternative 2: 96.2% accurate, 0.6× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \log \left(1 - u0\right)\\ t_1 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;-t\_0 \leq 0.003000000026077032:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + t\_1}\\ \mathbf{else}:\\ \;\;\;\;\frac{t\_0}{\frac{-1}{alphax \cdot alphax} \cdot cos2phi - t\_1}\\ \end{array} \end{array} \]
    (FPCore (alphax alphay u0 cos2phi sin2phi)
     :precision binary32
     (let* ((t_0 (log (- 1.0 u0))) (t_1 (/ sin2phi (* alphay alphay))))
       (if (<= (- t_0) 0.003000000026077032)
         (/
          (- (* (+ 1.0 (* -0.5 u0)) u0) (* (- u0) u0))
          (+ (/ cos2phi (* alphax alphax)) t_1))
         (/ t_0 (- (* (/ -1.0 (* alphax alphax)) cos2phi) t_1)))))
    float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
    	float t_0 = logf((1.0f - u0));
    	float t_1 = sin2phi / (alphay * alphay);
    	float tmp;
    	if (-t_0 <= 0.003000000026077032f) {
    		tmp = (((1.0f + (-0.5f * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_1);
    	} else {
    		tmp = t_0 / (((-1.0f / (alphax * alphax)) * cos2phi) - t_1);
    	}
    	return tmp;
    }
    
    real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
        real(4), intent (in) :: alphax
        real(4), intent (in) :: alphay
        real(4), intent (in) :: u0
        real(4), intent (in) :: cos2phi
        real(4), intent (in) :: sin2phi
        real(4) :: t_0
        real(4) :: t_1
        real(4) :: tmp
        t_0 = log((1.0e0 - u0))
        t_1 = sin2phi / (alphay * alphay)
        if (-t_0 <= 0.003000000026077032e0) then
            tmp = (((1.0e0 + ((-0.5e0) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_1)
        else
            tmp = t_0 / ((((-1.0e0) / (alphax * alphax)) * cos2phi) - t_1)
        end if
        code = tmp
    end function
    
    function code(alphax, alphay, u0, cos2phi, sin2phi)
    	t_0 = log(Float32(Float32(1.0) - u0))
    	t_1 = Float32(sin2phi / Float32(alphay * alphay))
    	tmp = Float32(0.0)
    	if (Float32(-t_0) <= Float32(0.003000000026077032))
    		tmp = Float32(Float32(Float32(Float32(Float32(1.0) + Float32(Float32(-0.5) * u0)) * u0) - Float32(Float32(-u0) * u0)) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + t_1));
    	else
    		tmp = Float32(t_0 / Float32(Float32(Float32(Float32(-1.0) / Float32(alphax * alphax)) * cos2phi) - t_1));
    	end
    	return tmp
    end
    
    function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
    	t_0 = log((single(1.0) - u0));
    	t_1 = sin2phi / (alphay * alphay);
    	tmp = single(0.0);
    	if (-t_0 <= single(0.003000000026077032))
    		tmp = (((single(1.0) + (single(-0.5) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_1);
    	else
    		tmp = t_0 / (((single(-1.0) / (alphax * alphax)) * cos2phi) - t_1);
    	end
    	tmp_2 = tmp;
    end
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \log \left(1 - u0\right)\\
    t_1 := \frac{sin2phi}{alphay \cdot alphay}\\
    \mathbf{if}\;-t\_0 \leq 0.003000000026077032:\\
    \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + t\_1}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{t\_0}{\frac{-1}{alphax \cdot alphax} \cdot cos2phi - t\_1}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) < 0.00300000003

      1. Initial program 50.7%

        \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      2. Add Preprocessing
      3. Step-by-step derivation
        1. lift-log.f32N/A

          \[\leadsto \frac{-\color{blue}{\log \left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        2. lift--.f32N/A

          \[\leadsto \frac{-\log \color{blue}{\left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        3. flip--N/A

          \[\leadsto \frac{-\log \color{blue}{\left(\frac{1 \cdot 1 - u0 \cdot u0}{1 + u0}\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        4. log-divN/A

          \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        5. lower--.f32N/A

          \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        6. metadata-evalN/A

          \[\leadsto \frac{-\left(\log \left(\color{blue}{1} - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        7. sub-negN/A

          \[\leadsto \frac{-\left(\log \color{blue}{\left(1 + \left(\mathsf{neg}\left(u0 \cdot u0\right)\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        8. lower-log1p.f32N/A

          \[\leadsto \frac{-\left(\color{blue}{\mathsf{log1p}\left(\mathsf{neg}\left(u0 \cdot u0\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        9. distribute-lft-neg-inN/A

          \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        10. lower-*.f32N/A

          \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        11. lower-neg.f32N/A

          \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(-u0\right)} \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        12. lower-log1p.f3286.8

          \[\leadsto \frac{-\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \color{blue}{\mathsf{log1p}\left(u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      4. Applied rewrites86.8%

        \[\leadsto \frac{-\color{blue}{\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \mathsf{log1p}\left(u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      5. Taylor expanded in u0 around 0

        \[\leadsto \frac{-\left(\color{blue}{-1 \cdot {u0}^{2}} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      6. Step-by-step derivation
        1. mul-1-negN/A

          \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left({u0}^{2}\right)\right)} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        2. unpow2N/A

          \[\leadsto \frac{-\left(\left(\mathsf{neg}\left(\color{blue}{u0 \cdot u0}\right)\right) - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        3. distribute-lft-neg-inN/A

          \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        4. mul-1-negN/A

          \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        5. lower-*.f32N/A

          \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        6. mul-1-negN/A

          \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        7. lower-neg.f3286.8

          \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      7. Applied rewrites86.8%

        \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      8. Taylor expanded in u0 around 0

        \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{u0 \cdot \left(1 + \frac{-1}{2} \cdot u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      9. Step-by-step derivation
        1. *-commutativeN/A

          \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        2. lower-*.f32N/A

          \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        3. +-commutativeN/A

          \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(\frac{-1}{2} \cdot u0 + 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        4. lower-fma.f3244.2

          \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      10. Applied rewrites86.8%

        \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      11. Step-by-step derivation
        1. Applied rewrites97.5%

          \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \left(-0.5 \cdot u0 + 1\right) \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]

        if 0.00300000003 < (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))

        1. Initial program 91.2%

          \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-/.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{cos2phi}{alphax \cdot alphax}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. clear-numN/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{1}{\frac{alphax \cdot alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          3. inv-powN/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{{\left(\frac{alphax \cdot alphax}{cos2phi}\right)}^{-1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          4. pow-to-expN/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{e^{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right) \cdot -1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          5. lower-exp.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{e^{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right) \cdot -1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          6. lower-*.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{e^{\color{blue}{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right) \cdot -1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          7. lower-log.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{e^{\color{blue}{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right)} \cdot -1} + \frac{sin2phi}{alphay \cdot alphay}} \]
          8. lower-/.f3290.5

            \[\leadsto \frac{-\log \left(1 - u0\right)}{e^{\log \color{blue}{\left(\frac{alphax \cdot alphax}{cos2phi}\right)} \cdot -1} + \frac{sin2phi}{alphay \cdot alphay}} \]
        4. Applied rewrites90.5%

          \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{e^{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right) \cdot -1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
        5. Step-by-step derivation
          1. lift-exp.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{e^{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right) \cdot -1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. lift-*.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{e^{\color{blue}{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right) \cdot -1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          3. lift-log.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{e^{\color{blue}{\log \left(\frac{alphax \cdot alphax}{cos2phi}\right)} \cdot -1} + \frac{sin2phi}{alphay \cdot alphay}} \]
          4. exp-to-powN/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{{\left(\frac{alphax \cdot alphax}{cos2phi}\right)}^{-1}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          5. inv-powN/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{1}{\frac{alphax \cdot alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          6. lift-/.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{1}{\color{blue}{\frac{alphax \cdot alphax}{cos2phi}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          7. frac-2negN/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{1}{\color{blue}{\frac{\mathsf{neg}\left(alphax \cdot alphax\right)}{\mathsf{neg}\left(cos2phi\right)}}} + \frac{sin2phi}{alphay \cdot alphay}} \]
          8. associate-/r/N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{1}{\mathsf{neg}\left(alphax \cdot alphax\right)} \cdot \left(\mathsf{neg}\left(cos2phi\right)\right)} + \frac{sin2phi}{alphay \cdot alphay}} \]
          9. lower-*.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{1}{\mathsf{neg}\left(alphax \cdot alphax\right)} \cdot \left(\mathsf{neg}\left(cos2phi\right)\right)} + \frac{sin2phi}{alphay \cdot alphay}} \]
          10. lower-/.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{1}{\mathsf{neg}\left(alphax \cdot alphax\right)}} \cdot \left(\mathsf{neg}\left(cos2phi\right)\right) + \frac{sin2phi}{alphay \cdot alphay}} \]
          11. lift-*.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{1}{\mathsf{neg}\left(\color{blue}{alphax \cdot alphax}\right)} \cdot \left(\mathsf{neg}\left(cos2phi\right)\right) + \frac{sin2phi}{alphay \cdot alphay}} \]
          12. distribute-lft-neg-inN/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{1}{\color{blue}{\left(\mathsf{neg}\left(alphax\right)\right) \cdot alphax}} \cdot \left(\mathsf{neg}\left(cos2phi\right)\right) + \frac{sin2phi}{alphay \cdot alphay}} \]
          13. lower-*.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{1}{\color{blue}{\left(\mathsf{neg}\left(alphax\right)\right) \cdot alphax}} \cdot \left(\mathsf{neg}\left(cos2phi\right)\right) + \frac{sin2phi}{alphay \cdot alphay}} \]
          14. lower-neg.f32N/A

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{1}{\color{blue}{\left(-alphax\right)} \cdot alphax} \cdot \left(\mathsf{neg}\left(cos2phi\right)\right) + \frac{sin2phi}{alphay \cdot alphay}} \]
          15. lower-neg.f3291.2

            \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{1}{\left(-alphax\right) \cdot alphax} \cdot \color{blue}{\left(-cos2phi\right)} + \frac{sin2phi}{alphay \cdot alphay}} \]
        6. Applied rewrites91.2%

          \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{1}{\left(-alphax\right) \cdot alphax} \cdot \left(-cos2phi\right)} + \frac{sin2phi}{alphay \cdot alphay}} \]
      12. Recombined 2 regimes into one program.
      13. Final simplification95.8%

        \[\leadsto \begin{array}{l} \mathbf{if}\;-\log \left(1 - u0\right) \leq 0.003000000026077032:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}\\ \mathbf{else}:\\ \;\;\;\;\frac{\log \left(1 - u0\right)}{\frac{-1}{alphax \cdot alphax} \cdot cos2phi - \frac{sin2phi}{alphay \cdot alphay}}\\ \end{array} \]
      14. Add Preprocessing

      Alternative 3: 96.2% accurate, 0.6× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}\\ t_1 := -\log \left(1 - u0\right)\\ \mathbf{if}\;t\_1 \leq 0.003000000026077032:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{t\_0}\\ \mathbf{else}:\\ \;\;\;\;\frac{t\_1}{t\_0}\\ \end{array} \end{array} \]
      (FPCore (alphax alphay u0 cos2phi sin2phi)
       :precision binary32
       (let* ((t_0 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay))))
              (t_1 (- (log (- 1.0 u0)))))
         (if (<= t_1 0.003000000026077032)
           (/ (- (* (+ 1.0 (* -0.5 u0)) u0) (* (- u0) u0)) t_0)
           (/ t_1 t_0))))
      float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
      	float t_0 = (cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay));
      	float t_1 = -logf((1.0f - u0));
      	float tmp;
      	if (t_1 <= 0.003000000026077032f) {
      		tmp = (((1.0f + (-0.5f * u0)) * u0) - (-u0 * u0)) / t_0;
      	} else {
      		tmp = t_1 / t_0;
      	}
      	return tmp;
      }
      
      real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
          real(4), intent (in) :: alphax
          real(4), intent (in) :: alphay
          real(4), intent (in) :: u0
          real(4), intent (in) :: cos2phi
          real(4), intent (in) :: sin2phi
          real(4) :: t_0
          real(4) :: t_1
          real(4) :: tmp
          t_0 = (cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay))
          t_1 = -log((1.0e0 - u0))
          if (t_1 <= 0.003000000026077032e0) then
              tmp = (((1.0e0 + ((-0.5e0) * u0)) * u0) - (-u0 * u0)) / t_0
          else
              tmp = t_1 / t_0
          end if
          code = tmp
      end function
      
      function code(alphax, alphay, u0, cos2phi, sin2phi)
      	t_0 = Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(sin2phi / Float32(alphay * alphay)))
      	t_1 = Float32(-log(Float32(Float32(1.0) - u0)))
      	tmp = Float32(0.0)
      	if (t_1 <= Float32(0.003000000026077032))
      		tmp = Float32(Float32(Float32(Float32(Float32(1.0) + Float32(Float32(-0.5) * u0)) * u0) - Float32(Float32(-u0) * u0)) / t_0);
      	else
      		tmp = Float32(t_1 / t_0);
      	end
      	return tmp
      end
      
      function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
      	t_0 = (cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay));
      	t_1 = -log((single(1.0) - u0));
      	tmp = single(0.0);
      	if (t_1 <= single(0.003000000026077032))
      		tmp = (((single(1.0) + (single(-0.5) * u0)) * u0) - (-u0 * u0)) / t_0;
      	else
      		tmp = t_1 / t_0;
      	end
      	tmp_2 = tmp;
      end
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}\\
      t_1 := -\log \left(1 - u0\right)\\
      \mathbf{if}\;t\_1 \leq 0.003000000026077032:\\
      \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{t\_0}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{t\_1}{t\_0}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 2 regimes
      2. if (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) < 0.00300000003

        1. Initial program 50.7%

          \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-log.f32N/A

            \[\leadsto \frac{-\color{blue}{\log \left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. lift--.f32N/A

            \[\leadsto \frac{-\log \color{blue}{\left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          3. flip--N/A

            \[\leadsto \frac{-\log \color{blue}{\left(\frac{1 \cdot 1 - u0 \cdot u0}{1 + u0}\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          4. log-divN/A

            \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          5. lower--.f32N/A

            \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          6. metadata-evalN/A

            \[\leadsto \frac{-\left(\log \left(\color{blue}{1} - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          7. sub-negN/A

            \[\leadsto \frac{-\left(\log \color{blue}{\left(1 + \left(\mathsf{neg}\left(u0 \cdot u0\right)\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          8. lower-log1p.f32N/A

            \[\leadsto \frac{-\left(\color{blue}{\mathsf{log1p}\left(\mathsf{neg}\left(u0 \cdot u0\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          9. distribute-lft-neg-inN/A

            \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          10. lower-*.f32N/A

            \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          11. lower-neg.f32N/A

            \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(-u0\right)} \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          12. lower-log1p.f3286.8

            \[\leadsto \frac{-\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \color{blue}{\mathsf{log1p}\left(u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        4. Applied rewrites86.8%

          \[\leadsto \frac{-\color{blue}{\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \mathsf{log1p}\left(u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        5. Taylor expanded in u0 around 0

          \[\leadsto \frac{-\left(\color{blue}{-1 \cdot {u0}^{2}} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        6. Step-by-step derivation
          1. mul-1-negN/A

            \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left({u0}^{2}\right)\right)} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. unpow2N/A

            \[\leadsto \frac{-\left(\left(\mathsf{neg}\left(\color{blue}{u0 \cdot u0}\right)\right) - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          3. distribute-lft-neg-inN/A

            \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          4. mul-1-negN/A

            \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          5. lower-*.f32N/A

            \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          6. mul-1-negN/A

            \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          7. lower-neg.f3286.8

            \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        7. Applied rewrites86.8%

          \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        8. Taylor expanded in u0 around 0

          \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{u0 \cdot \left(1 + \frac{-1}{2} \cdot u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        9. Step-by-step derivation
          1. *-commutativeN/A

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. lower-*.f32N/A

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          3. +-commutativeN/A

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(\frac{-1}{2} \cdot u0 + 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          4. lower-fma.f3286.8

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        10. Applied rewrites86.3%

          \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        11. Step-by-step derivation
          1. Applied rewrites97.5%

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \left(-0.5 \cdot u0 + 1\right) \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]

          if 0.00300000003 < (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))

          1. Initial program 91.2%

            \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. Add Preprocessing
        12. Recombined 2 regimes into one program.
        13. Final simplification95.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;-\log \left(1 - u0\right) \leq 0.003000000026077032:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}\\ \end{array} \]
        14. Add Preprocessing

        Alternative 4: 91.0% accurate, 0.6× speedup?

        \[\begin{array}{l} \\ \begin{array}{l} t_0 := -\log \left(1 - u0\right)\\ t_1 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;t\_0 \leq 0.02800000086426735:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + t\_1}\\ \mathbf{else}:\\ \;\;\;\;\frac{t\_0}{t\_1}\\ \end{array} \end{array} \]
        (FPCore (alphax alphay u0 cos2phi sin2phi)
         :precision binary32
         (let* ((t_0 (- (log (- 1.0 u0)))) (t_1 (/ sin2phi (* alphay alphay))))
           (if (<= t_0 0.02800000086426735)
             (/
              (- (* (+ 1.0 (* -0.5 u0)) u0) (* (- u0) u0))
              (+ (/ cos2phi (* alphax alphax)) t_1))
             (/ t_0 t_1))))
        float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
        	float t_0 = -logf((1.0f - u0));
        	float t_1 = sin2phi / (alphay * alphay);
        	float tmp;
        	if (t_0 <= 0.02800000086426735f) {
        		tmp = (((1.0f + (-0.5f * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_1);
        	} else {
        		tmp = t_0 / t_1;
        	}
        	return tmp;
        }
        
        real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
            real(4), intent (in) :: alphax
            real(4), intent (in) :: alphay
            real(4), intent (in) :: u0
            real(4), intent (in) :: cos2phi
            real(4), intent (in) :: sin2phi
            real(4) :: t_0
            real(4) :: t_1
            real(4) :: tmp
            t_0 = -log((1.0e0 - u0))
            t_1 = sin2phi / (alphay * alphay)
            if (t_0 <= 0.02800000086426735e0) then
                tmp = (((1.0e0 + ((-0.5e0) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_1)
            else
                tmp = t_0 / t_1
            end if
            code = tmp
        end function
        
        function code(alphax, alphay, u0, cos2phi, sin2phi)
        	t_0 = Float32(-log(Float32(Float32(1.0) - u0)))
        	t_1 = Float32(sin2phi / Float32(alphay * alphay))
        	tmp = Float32(0.0)
        	if (t_0 <= Float32(0.02800000086426735))
        		tmp = Float32(Float32(Float32(Float32(Float32(1.0) + Float32(Float32(-0.5) * u0)) * u0) - Float32(Float32(-u0) * u0)) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + t_1));
        	else
        		tmp = Float32(t_0 / t_1);
        	end
        	return tmp
        end
        
        function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
        	t_0 = -log((single(1.0) - u0));
        	t_1 = sin2phi / (alphay * alphay);
        	tmp = single(0.0);
        	if (t_0 <= single(0.02800000086426735))
        		tmp = (((single(1.0) + (single(-0.5) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + t_1);
        	else
        		tmp = t_0 / t_1;
        	end
        	tmp_2 = tmp;
        end
        
        \begin{array}{l}
        
        \\
        \begin{array}{l}
        t_0 := -\log \left(1 - u0\right)\\
        t_1 := \frac{sin2phi}{alphay \cdot alphay}\\
        \mathbf{if}\;t\_0 \leq 0.02800000086426735:\\
        \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + t\_1}\\
        
        \mathbf{else}:\\
        \;\;\;\;\frac{t\_0}{t\_1}\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 2 regimes
        2. if (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0))) < 0.0280000009

          1. Initial program 55.2%

            \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. Add Preprocessing
          3. Step-by-step derivation
            1. lift-log.f32N/A

              \[\leadsto \frac{-\color{blue}{\log \left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. lift--.f32N/A

              \[\leadsto \frac{-\log \color{blue}{\left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            3. flip--N/A

              \[\leadsto \frac{-\log \color{blue}{\left(\frac{1 \cdot 1 - u0 \cdot u0}{1 + u0}\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            4. log-divN/A

              \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            5. lower--.f32N/A

              \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            6. metadata-evalN/A

              \[\leadsto \frac{-\left(\log \left(\color{blue}{1} - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            7. sub-negN/A

              \[\leadsto \frac{-\left(\log \color{blue}{\left(1 + \left(\mathsf{neg}\left(u0 \cdot u0\right)\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            8. lower-log1p.f32N/A

              \[\leadsto \frac{-\left(\color{blue}{\mathsf{log1p}\left(\mathsf{neg}\left(u0 \cdot u0\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            9. distribute-lft-neg-inN/A

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            10. lower-*.f32N/A

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            11. lower-neg.f32N/A

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(-u0\right)} \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            12. lower-log1p.f3282.4

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \color{blue}{\mathsf{log1p}\left(u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          4. Applied rewrites82.4%

            \[\leadsto \frac{-\color{blue}{\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \mathsf{log1p}\left(u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          5. Taylor expanded in u0 around 0

            \[\leadsto \frac{-\left(\color{blue}{-1 \cdot {u0}^{2}} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          6. Step-by-step derivation
            1. mul-1-negN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left({u0}^{2}\right)\right)} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. unpow2N/A

              \[\leadsto \frac{-\left(\left(\mathsf{neg}\left(\color{blue}{u0 \cdot u0}\right)\right) - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            3. distribute-lft-neg-inN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            4. mul-1-negN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            5. lower-*.f32N/A

              \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            6. mul-1-negN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            7. lower-neg.f3282.4

              \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          7. Applied rewrites82.4%

            \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          8. Taylor expanded in u0 around 0

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{u0 \cdot \left(1 + \frac{-1}{2} \cdot u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          9. Step-by-step derivation
            1. *-commutativeN/A

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. lower-*.f32N/A

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            3. +-commutativeN/A

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(\frac{-1}{2} \cdot u0 + 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            4. lower-fma.f3251.6

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          10. Applied rewrites81.9%

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          11. Step-by-step derivation
            1. Applied rewrites94.5%

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \left(-0.5 \cdot u0 + 1\right) \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]

            if 0.0280000009 < (neg.f32 (log.f32 (-.f32 #s(literal 1 binary32) u0)))

            1. Initial program 95.1%

              \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. Add Preprocessing
            3. Step-by-step derivation
              1. lift-/.f32N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
              2. clear-numN/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{\frac{1}{\frac{alphay \cdot alphay}{sin2phi}}}} \]
              3. inv-powN/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{{\left(\frac{alphay \cdot alphay}{sin2phi}\right)}^{-1}}} \]
              4. div-invN/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + {\color{blue}{\left(\left(alphay \cdot alphay\right) \cdot \frac{1}{sin2phi}\right)}}^{-1}} \]
              5. unpow-prod-downN/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{{\left(alphay \cdot alphay\right)}^{-1} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}}} \]
              6. inv-powN/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{\frac{1}{alphay \cdot alphay}} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}} \]
              7. lower-*.f32N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{\frac{1}{alphay \cdot alphay} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}}} \]
              8. lift-*.f32N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{1}{\color{blue}{alphay \cdot alphay}} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}} \]
              9. pow2N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{1}{\color{blue}{{alphay}^{2}}} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}} \]
              10. pow-flipN/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{{alphay}^{\left(\mathsf{neg}\left(2\right)\right)}} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}} \]
              11. lower-pow.f32N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{{alphay}^{\left(\mathsf{neg}\left(2\right)\right)}} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}} \]
              12. metadata-evalN/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + {alphay}^{\color{blue}{-2}} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}} \]
              13. lower-pow.f32N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + {alphay}^{-2} \cdot \color{blue}{{\left(\frac{1}{sin2phi}\right)}^{-1}}} \]
              14. lower-/.f3295.0

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + {alphay}^{-2} \cdot {\color{blue}{\left(\frac{1}{sin2phi}\right)}}^{-1}} \]
            4. Applied rewrites95.0%

              \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{{alphay}^{-2} \cdot {\left(\frac{1}{sin2phi}\right)}^{-1}}} \]
            5. Taylor expanded in alphax around inf

              \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}}} \]
            6. Step-by-step derivation
              1. lower-/.f32N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}}} \]
              2. unpow2N/A

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}}} \]
              3. lower-*.f3276.6

                \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}}} \]
            7. Applied rewrites76.6%

              \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
          12. Recombined 2 regimes into one program.
          13. Final simplification91.7%

            \[\leadsto \begin{array}{l} \mathbf{if}\;-\log \left(1 - u0\right) \leq 0.02800000086426735:\\ \;\;\;\;\frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\log \left(1 - u0\right)}{\frac{sin2phi}{alphay \cdot alphay}}\\ \end{array} \]
          14. Add Preprocessing

          Alternative 5: 87.3% accurate, 2.2× speedup?

          \[\begin{array}{l} \\ \frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
          (FPCore (alphax alphay u0 cos2phi sin2phi)
           :precision binary32
           (/
            (- (* (+ 1.0 (* -0.5 u0)) u0) (* (- u0) u0))
            (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
          float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
          	return (((1.0f + (-0.5f * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
          }
          
          real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
              real(4), intent (in) :: alphax
              real(4), intent (in) :: alphay
              real(4), intent (in) :: u0
              real(4), intent (in) :: cos2phi
              real(4), intent (in) :: sin2phi
              code = (((1.0e0 + ((-0.5e0) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
          end function
          
          function code(alphax, alphay, u0, cos2phi, sin2phi)
          	return Float32(Float32(Float32(Float32(Float32(1.0) + Float32(Float32(-0.5) * u0)) * u0) - Float32(Float32(-u0) * u0)) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(sin2phi / Float32(alphay * alphay))))
          end
          
          function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
          	tmp = (((single(1.0) + (single(-0.5) * u0)) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
          end
          
          \begin{array}{l}
          
          \\
          \frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
          \end{array}
          
          Derivation
          1. Initial program 61.5%

            \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. Add Preprocessing
          3. Step-by-step derivation
            1. lift-log.f32N/A

              \[\leadsto \frac{-\color{blue}{\log \left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. lift--.f32N/A

              \[\leadsto \frac{-\log \color{blue}{\left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            3. flip--N/A

              \[\leadsto \frac{-\log \color{blue}{\left(\frac{1 \cdot 1 - u0 \cdot u0}{1 + u0}\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            4. log-divN/A

              \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            5. lower--.f32N/A

              \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            6. metadata-evalN/A

              \[\leadsto \frac{-\left(\log \left(\color{blue}{1} - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            7. sub-negN/A

              \[\leadsto \frac{-\left(\log \color{blue}{\left(1 + \left(\mathsf{neg}\left(u0 \cdot u0\right)\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            8. lower-log1p.f32N/A

              \[\leadsto \frac{-\left(\color{blue}{\mathsf{log1p}\left(\mathsf{neg}\left(u0 \cdot u0\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            9. distribute-lft-neg-inN/A

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            10. lower-*.f32N/A

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            11. lower-neg.f32N/A

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(-u0\right)} \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            12. lower-log1p.f3275.8

              \[\leadsto \frac{-\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \color{blue}{\mathsf{log1p}\left(u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          4. Applied rewrites75.8%

            \[\leadsto \frac{-\color{blue}{\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \mathsf{log1p}\left(u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          5. Taylor expanded in u0 around 0

            \[\leadsto \frac{-\left(\color{blue}{-1 \cdot {u0}^{2}} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          6. Step-by-step derivation
            1. mul-1-negN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left({u0}^{2}\right)\right)} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. unpow2N/A

              \[\leadsto \frac{-\left(\left(\mathsf{neg}\left(\color{blue}{u0 \cdot u0}\right)\right) - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            3. distribute-lft-neg-inN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            4. mul-1-negN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            5. lower-*.f32N/A

              \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            6. mul-1-negN/A

              \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            7. lower-neg.f3275.8

              \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          7. Applied rewrites75.8%

            \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          8. Taylor expanded in u0 around 0

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{u0 \cdot \left(1 + \frac{-1}{2} \cdot u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          9. Step-by-step derivation
            1. *-commutativeN/A

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. lower-*.f32N/A

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            3. +-commutativeN/A

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(\frac{-1}{2} \cdot u0 + 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            4. lower-fma.f3257.3

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          10. Applied rewrites75.8%

            \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          11. Step-by-step derivation
            1. Applied rewrites86.9%

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \left(-0.5 \cdot u0 + 1\right) \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. Final simplification86.9%

              \[\leadsto \frac{\left(1 + -0.5 \cdot u0\right) \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            3. Add Preprocessing

            Alternative 6: 76.2% accurate, 2.5× speedup?

            \[\begin{array}{l} \\ \frac{1 \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
            (FPCore (alphax alphay u0 cos2phi sin2phi)
             :precision binary32
             (/
              (- (* 1.0 u0) (* (- u0) u0))
              (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
            float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
            	return ((1.0f * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
            }
            
            real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                real(4), intent (in) :: alphax
                real(4), intent (in) :: alphay
                real(4), intent (in) :: u0
                real(4), intent (in) :: cos2phi
                real(4), intent (in) :: sin2phi
                code = ((1.0e0 * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
            end function
            
            function code(alphax, alphay, u0, cos2phi, sin2phi)
            	return Float32(Float32(Float32(Float32(1.0) * u0) - Float32(Float32(-u0) * u0)) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(sin2phi / Float32(alphay * alphay))))
            end
            
            function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
            	tmp = ((single(1.0) * u0) - (-u0 * u0)) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
            end
            
            \begin{array}{l}
            
            \\
            \frac{1 \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
            \end{array}
            
            Derivation
            1. Initial program 61.5%

              \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. Add Preprocessing
            3. Step-by-step derivation
              1. lift-log.f32N/A

                \[\leadsto \frac{-\color{blue}{\log \left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              2. lift--.f32N/A

                \[\leadsto \frac{-\log \color{blue}{\left(1 - u0\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              3. flip--N/A

                \[\leadsto \frac{-\log \color{blue}{\left(\frac{1 \cdot 1 - u0 \cdot u0}{1 + u0}\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              4. log-divN/A

                \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              5. lower--.f32N/A

                \[\leadsto \frac{-\color{blue}{\left(\log \left(1 \cdot 1 - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              6. metadata-evalN/A

                \[\leadsto \frac{-\left(\log \left(\color{blue}{1} - u0 \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              7. sub-negN/A

                \[\leadsto \frac{-\left(\log \color{blue}{\left(1 + \left(\mathsf{neg}\left(u0 \cdot u0\right)\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              8. lower-log1p.f32N/A

                \[\leadsto \frac{-\left(\color{blue}{\mathsf{log1p}\left(\mathsf{neg}\left(u0 \cdot u0\right)\right)} - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              9. distribute-lft-neg-inN/A

                \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              10. lower-*.f32N/A

                \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0}\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              11. lower-neg.f32N/A

                \[\leadsto \frac{-\left(\mathsf{log1p}\left(\color{blue}{\left(-u0\right)} \cdot u0\right) - \log \left(1 + u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              12. lower-log1p.f3275.8

                \[\leadsto \frac{-\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \color{blue}{\mathsf{log1p}\left(u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            4. Applied rewrites75.8%

              \[\leadsto \frac{-\color{blue}{\left(\mathsf{log1p}\left(\left(-u0\right) \cdot u0\right) - \mathsf{log1p}\left(u0\right)\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            5. Taylor expanded in u0 around 0

              \[\leadsto \frac{-\left(\color{blue}{-1 \cdot {u0}^{2}} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            6. Step-by-step derivation
              1. mul-1-negN/A

                \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left({u0}^{2}\right)\right)} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              2. unpow2N/A

                \[\leadsto \frac{-\left(\left(\mathsf{neg}\left(\color{blue}{u0 \cdot u0}\right)\right) - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              3. distribute-lft-neg-inN/A

                \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              4. mul-1-negN/A

                \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              5. lower-*.f32N/A

                \[\leadsto \frac{-\left(\color{blue}{\left(-1 \cdot u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              6. mul-1-negN/A

                \[\leadsto \frac{-\left(\color{blue}{\left(\mathsf{neg}\left(u0\right)\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              7. lower-neg.f3275.8

                \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right)} \cdot u0 - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            7. Applied rewrites75.8%

              \[\leadsto \frac{-\left(\color{blue}{\left(-u0\right) \cdot u0} - \mathsf{log1p}\left(u0\right)\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            8. Taylor expanded in u0 around 0

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{u0 \cdot \left(1 + \frac{-1}{2} \cdot u0\right)}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            9. Step-by-step derivation
              1. *-commutativeN/A

                \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              2. lower-*.f32N/A

                \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(1 + \frac{-1}{2} \cdot u0\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              3. +-commutativeN/A

                \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\left(\frac{-1}{2} \cdot u0 + 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              4. lower-fma.f3275.8

                \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right)} \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            10. Applied rewrites75.4%

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - \color{blue}{\mathsf{fma}\left(-0.5, u0, 1\right) \cdot u0}\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            11. Taylor expanded in u0 around 0

              \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - 1 \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            12. Step-by-step derivation
              1. Applied rewrites75.8%

                \[\leadsto \frac{-\left(\left(-u0\right) \cdot u0 - 1 \cdot u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              2. Final simplification75.8%

                \[\leadsto \frac{1 \cdot u0 - \left(-u0\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              3. Add Preprocessing

              Alternative 7: 75.7% accurate, 2.6× speedup?

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

                \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              2. Add Preprocessing
              3. Taylor expanded in u0 around 0

                \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
              4. Step-by-step derivation
                1. lower-/.f32N/A

                  \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                2. +-commutativeN/A

                  \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                3. lower-+.f32N/A

                  \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                4. lower-/.f32N/A

                  \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                5. unpow2N/A

                  \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                6. lower-*.f32N/A

                  \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                7. lower-/.f32N/A

                  \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                8. unpow2N/A

                  \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                9. lower-*.f3275.4

                  \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
              5. Applied rewrites75.4%

                \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
              6. Step-by-step derivation
                1. Applied rewrites75.4%

                  \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax} \cdot \color{blue}{\frac{1}{alphax}}} \]
                2. Final simplification75.4%

                  \[\leadsto \frac{u0}{\frac{1}{alphax} \cdot \frac{cos2phi}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                3. Add Preprocessing

                Alternative 8: 75.7% accurate, 2.9× speedup?

                \[\begin{array}{l} \\ \frac{u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
                (FPCore (alphax alphay u0 cos2phi sin2phi)
                 :precision binary32
                 (/ u0 (+ (/ (/ cos2phi alphax) alphax) (/ sin2phi (* alphay alphay)))))
                float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                	return u0 / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
                }
                
                real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                    real(4), intent (in) :: alphax
                    real(4), intent (in) :: alphay
                    real(4), intent (in) :: u0
                    real(4), intent (in) :: cos2phi
                    real(4), intent (in) :: sin2phi
                    code = u0 / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)))
                end function
                
                function code(alphax, alphay, u0, cos2phi, sin2phi)
                	return Float32(u0 / Float32(Float32(Float32(cos2phi / alphax) / alphax) + Float32(sin2phi / Float32(alphay * alphay))))
                end
                
                function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                	tmp = u0 / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
                end
                
                \begin{array}{l}
                
                \\
                \frac{u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}}
                \end{array}
                
                Derivation
                1. Initial program 61.5%

                  \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                2. Add Preprocessing
                3. Taylor expanded in u0 around 0

                  \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                4. Step-by-step derivation
                  1. lower-/.f32N/A

                    \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                  2. +-commutativeN/A

                    \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                  3. lower-+.f32N/A

                    \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                  4. lower-/.f32N/A

                    \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                  5. unpow2N/A

                    \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                  6. lower-*.f32N/A

                    \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                  7. lower-/.f32N/A

                    \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                  8. unpow2N/A

                    \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                  9. lower-*.f3275.4

                    \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                5. Applied rewrites75.4%

                  \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                6. Step-by-step derivation
                  1. Applied rewrites75.4%

                    \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{\frac{cos2phi}{alphax}}{\color{blue}{alphax}}} \]
                  2. Final simplification75.4%

                    \[\leadsto \frac{u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                  3. Add Preprocessing

                  Alternative 9: 75.7% accurate, 3.2× speedup?

                  \[\begin{array}{l} \\ \frac{u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
                  (FPCore (alphax alphay u0 cos2phi sin2phi)
                   :precision binary32
                   (/ u0 (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
                  float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                  	return u0 / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
                  }
                  
                  real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                      real(4), intent (in) :: alphax
                      real(4), intent (in) :: alphay
                      real(4), intent (in) :: u0
                      real(4), intent (in) :: cos2phi
                      real(4), intent (in) :: sin2phi
                      code = u0 / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
                  end function
                  
                  function code(alphax, alphay, u0, cos2phi, sin2phi)
                  	return Float32(u0 / Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(sin2phi / Float32(alphay * alphay))))
                  end
                  
                  function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                  	tmp = u0 / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
                  end
                  
                  \begin{array}{l}
                  
                  \\
                  \frac{u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
                  \end{array}
                  
                  Derivation
                  1. Initial program 61.5%

                    \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                  2. Add Preprocessing
                  3. Taylor expanded in u0 around 0

                    \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                  4. Step-by-step derivation
                    1. lower-/.f32N/A

                      \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                    2. +-commutativeN/A

                      \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                    3. lower-+.f32N/A

                      \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                    4. lower-/.f32N/A

                      \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                    5. unpow2N/A

                      \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                    6. lower-*.f32N/A

                      \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                    7. lower-/.f32N/A

                      \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                    8. unpow2N/A

                      \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                    9. lower-*.f3275.4

                      \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                  5. Applied rewrites75.4%

                    \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                  6. Final simplification75.4%

                    \[\leadsto \frac{u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                  7. Add Preprocessing

                  Alternative 10: 66.9% accurate, 4.6× speedup?

                  \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;sin2phi \leq 4.999999841327613 \cdot 10^{-22}:\\ \;\;\;\;\left(\left(alphax \cdot alphax\right) \cdot u0\right) \cdot \frac{1}{cos2phi}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi}\\ \end{array} \end{array} \]
                  (FPCore (alphax alphay u0 cos2phi sin2phi)
                   :precision binary32
                   (if (<= sin2phi 4.999999841327613e-22)
                     (* (* (* alphax alphax) u0) (/ 1.0 cos2phi))
                     (/ (* (* alphay alphay) u0) sin2phi)))
                  float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                  	float tmp;
                  	if (sin2phi <= 4.999999841327613e-22f) {
                  		tmp = ((alphax * alphax) * u0) * (1.0f / cos2phi);
                  	} else {
                  		tmp = ((alphay * alphay) * u0) / sin2phi;
                  	}
                  	return tmp;
                  }
                  
                  real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                      real(4), intent (in) :: alphax
                      real(4), intent (in) :: alphay
                      real(4), intent (in) :: u0
                      real(4), intent (in) :: cos2phi
                      real(4), intent (in) :: sin2phi
                      real(4) :: tmp
                      if (sin2phi <= 4.999999841327613e-22) then
                          tmp = ((alphax * alphax) * u0) * (1.0e0 / cos2phi)
                      else
                          tmp = ((alphay * alphay) * u0) / sin2phi
                      end if
                      code = tmp
                  end function
                  
                  function code(alphax, alphay, u0, cos2phi, sin2phi)
                  	tmp = Float32(0.0)
                  	if (sin2phi <= Float32(4.999999841327613e-22))
                  		tmp = Float32(Float32(Float32(alphax * alphax) * u0) * Float32(Float32(1.0) / cos2phi));
                  	else
                  		tmp = Float32(Float32(Float32(alphay * alphay) * u0) / sin2phi);
                  	end
                  	return tmp
                  end
                  
                  function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
                  	tmp = single(0.0);
                  	if (sin2phi <= single(4.999999841327613e-22))
                  		tmp = ((alphax * alphax) * u0) * (single(1.0) / cos2phi);
                  	else
                  		tmp = ((alphay * alphay) * u0) / sin2phi;
                  	end
                  	tmp_2 = tmp;
                  end
                  
                  \begin{array}{l}
                  
                  \\
                  \begin{array}{l}
                  \mathbf{if}\;sin2phi \leq 4.999999841327613 \cdot 10^{-22}:\\
                  \;\;\;\;\left(\left(alphax \cdot alphax\right) \cdot u0\right) \cdot \frac{1}{cos2phi}\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi}\\
                  
                  
                  \end{array}
                  \end{array}
                  
                  Derivation
                  1. Split input into 2 regimes
                  2. if sin2phi < 4.9999998e-22

                    1. Initial program 63.5%

                      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                    2. Add Preprocessing
                    3. Taylor expanded in u0 around 0

                      \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                    4. Step-by-step derivation
                      1. lower-/.f32N/A

                        \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                      2. +-commutativeN/A

                        \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                      3. lower-+.f32N/A

                        \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                      4. lower-/.f32N/A

                        \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                      5. unpow2N/A

                        \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                      6. lower-*.f32N/A

                        \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                      7. lower-/.f32N/A

                        \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                      8. unpow2N/A

                        \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                      9. lower-*.f3270.4

                        \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                    5. Applied rewrites70.4%

                      \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                    6. Taylor expanded in alphax around 0

                      \[\leadsto \frac{{alphax}^{2} \cdot u0}{\color{blue}{cos2phi}} \]
                    7. Step-by-step derivation
                      1. Applied rewrites57.0%

                        \[\leadsto \frac{u0 \cdot \left(alphax \cdot alphax\right)}{\color{blue}{cos2phi}} \]
                      2. Step-by-step derivation
                        1. Applied rewrites57.1%

                          \[\leadsto \frac{1}{cos2phi} \cdot \left(\left(alphax \cdot alphax\right) \cdot \color{blue}{u0}\right) \]

                        if 4.9999998e-22 < sin2phi

                        1. Initial program 61.0%

                          \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                        2. Add Preprocessing
                        3. Taylor expanded in u0 around 0

                          \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                        4. Step-by-step derivation
                          1. lower-/.f32N/A

                            \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                          2. +-commutativeN/A

                            \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                          3. lower-+.f32N/A

                            \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                          4. lower-/.f32N/A

                            \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                          5. unpow2N/A

                            \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                          6. lower-*.f32N/A

                            \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                          7. lower-/.f32N/A

                            \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                          8. unpow2N/A

                            \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                          9. lower-*.f3276.6

                            \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                        5. Applied rewrites76.6%

                          \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                        6. Taylor expanded in alphax around inf

                          \[\leadsto \frac{{alphay}^{2} \cdot u0}{\color{blue}{sin2phi}} \]
                        7. Step-by-step derivation
                          1. Applied rewrites69.6%

                            \[\leadsto \frac{\left(alphay \cdot alphay\right) \cdot u0}{\color{blue}{sin2phi}} \]
                        8. Recombined 2 regimes into one program.
                        9. Final simplification67.2%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;sin2phi \leq 4.999999841327613 \cdot 10^{-22}:\\ \;\;\;\;\left(\left(alphax \cdot alphax\right) \cdot u0\right) \cdot \frac{1}{cos2phi}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi}\\ \end{array} \]
                        10. Add Preprocessing

                        Alternative 11: 67.0% accurate, 5.4× speedup?

                        \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;sin2phi \leq 4.999999841327613 \cdot 10^{-22}:\\ \;\;\;\;\frac{\left(alphax \cdot alphax\right) \cdot u0}{cos2phi}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi}\\ \end{array} \end{array} \]
                        (FPCore (alphax alphay u0 cos2phi sin2phi)
                         :precision binary32
                         (if (<= sin2phi 4.999999841327613e-22)
                           (/ (* (* alphax alphax) u0) cos2phi)
                           (/ (* (* alphay alphay) u0) sin2phi)))
                        float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                        	float tmp;
                        	if (sin2phi <= 4.999999841327613e-22f) {
                        		tmp = ((alphax * alphax) * u0) / cos2phi;
                        	} else {
                        		tmp = ((alphay * alphay) * u0) / sin2phi;
                        	}
                        	return tmp;
                        }
                        
                        real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                            real(4), intent (in) :: alphax
                            real(4), intent (in) :: alphay
                            real(4), intent (in) :: u0
                            real(4), intent (in) :: cos2phi
                            real(4), intent (in) :: sin2phi
                            real(4) :: tmp
                            if (sin2phi <= 4.999999841327613e-22) then
                                tmp = ((alphax * alphax) * u0) / cos2phi
                            else
                                tmp = ((alphay * alphay) * u0) / sin2phi
                            end if
                            code = tmp
                        end function
                        
                        function code(alphax, alphay, u0, cos2phi, sin2phi)
                        	tmp = Float32(0.0)
                        	if (sin2phi <= Float32(4.999999841327613e-22))
                        		tmp = Float32(Float32(Float32(alphax * alphax) * u0) / cos2phi);
                        	else
                        		tmp = Float32(Float32(Float32(alphay * alphay) * u0) / sin2phi);
                        	end
                        	return tmp
                        end
                        
                        function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
                        	tmp = single(0.0);
                        	if (sin2phi <= single(4.999999841327613e-22))
                        		tmp = ((alphax * alphax) * u0) / cos2phi;
                        	else
                        		tmp = ((alphay * alphay) * u0) / sin2phi;
                        	end
                        	tmp_2 = tmp;
                        end
                        
                        \begin{array}{l}
                        
                        \\
                        \begin{array}{l}
                        \mathbf{if}\;sin2phi \leq 4.999999841327613 \cdot 10^{-22}:\\
                        \;\;\;\;\frac{\left(alphax \cdot alphax\right) \cdot u0}{cos2phi}\\
                        
                        \mathbf{else}:\\
                        \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi}\\
                        
                        
                        \end{array}
                        \end{array}
                        
                        Derivation
                        1. Split input into 2 regimes
                        2. if sin2phi < 4.9999998e-22

                          1. Initial program 63.5%

                            \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                          2. Add Preprocessing
                          3. Taylor expanded in u0 around 0

                            \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                          4. Step-by-step derivation
                            1. lower-/.f32N/A

                              \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                            2. +-commutativeN/A

                              \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                            3. lower-+.f32N/A

                              \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                            4. lower-/.f32N/A

                              \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                            5. unpow2N/A

                              \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                            6. lower-*.f32N/A

                              \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                            7. lower-/.f32N/A

                              \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                            8. unpow2N/A

                              \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                            9. lower-*.f3270.4

                              \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                          5. Applied rewrites70.4%

                            \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                          6. Taylor expanded in alphax around 0

                            \[\leadsto \frac{{alphax}^{2} \cdot u0}{\color{blue}{cos2phi}} \]
                          7. Step-by-step derivation
                            1. Applied rewrites57.0%

                              \[\leadsto \frac{u0 \cdot \left(alphax \cdot alphax\right)}{\color{blue}{cos2phi}} \]

                            if 4.9999998e-22 < sin2phi

                            1. Initial program 61.0%

                              \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                            2. Add Preprocessing
                            3. Taylor expanded in u0 around 0

                              \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                            4. Step-by-step derivation
                              1. lower-/.f32N/A

                                \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                              2. +-commutativeN/A

                                \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                              3. lower-+.f32N/A

                                \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                              4. lower-/.f32N/A

                                \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                              5. unpow2N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                              6. lower-*.f32N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                              7. lower-/.f32N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                              8. unpow2N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                              9. lower-*.f3276.6

                                \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                            5. Applied rewrites76.6%

                              \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                            6. Taylor expanded in alphax around inf

                              \[\leadsto \frac{{alphay}^{2} \cdot u0}{\color{blue}{sin2phi}} \]
                            7. Step-by-step derivation
                              1. Applied rewrites69.6%

                                \[\leadsto \frac{\left(alphay \cdot alphay\right) \cdot u0}{\color{blue}{sin2phi}} \]
                            8. Recombined 2 regimes into one program.
                            9. Final simplification67.2%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;sin2phi \leq 4.999999841327613 \cdot 10^{-22}:\\ \;\;\;\;\frac{\left(alphax \cdot alphax\right) \cdot u0}{cos2phi}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi}\\ \end{array} \]
                            10. Add Preprocessing

                            Alternative 12: 23.9% accurate, 6.9× speedup?

                            \[\begin{array}{l} \\ \frac{\left(alphax \cdot alphax\right) \cdot u0}{cos2phi} \end{array} \]
                            (FPCore (alphax alphay u0 cos2phi sin2phi)
                             :precision binary32
                             (/ (* (* alphax alphax) u0) cos2phi))
                            float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                            	return ((alphax * alphax) * u0) / cos2phi;
                            }
                            
                            real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                                real(4), intent (in) :: alphax
                                real(4), intent (in) :: alphay
                                real(4), intent (in) :: u0
                                real(4), intent (in) :: cos2phi
                                real(4), intent (in) :: sin2phi
                                code = ((alphax * alphax) * u0) / cos2phi
                            end function
                            
                            function code(alphax, alphay, u0, cos2phi, sin2phi)
                            	return Float32(Float32(Float32(alphax * alphax) * u0) / cos2phi)
                            end
                            
                            function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                            	tmp = ((alphax * alphax) * u0) / cos2phi;
                            end
                            
                            \begin{array}{l}
                            
                            \\
                            \frac{\left(alphax \cdot alphax\right) \cdot u0}{cos2phi}
                            \end{array}
                            
                            Derivation
                            1. Initial program 61.5%

                              \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                            2. Add Preprocessing
                            3. Taylor expanded in u0 around 0

                              \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                            4. Step-by-step derivation
                              1. lower-/.f32N/A

                                \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                              2. +-commutativeN/A

                                \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                              3. lower-+.f32N/A

                                \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                              4. lower-/.f32N/A

                                \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                              5. unpow2N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                              6. lower-*.f32N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                              7. lower-/.f32N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                              8. unpow2N/A

                                \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                              9. lower-*.f3275.4

                                \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                            5. Applied rewrites75.4%

                              \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                            6. Taylor expanded in alphax around 0

                              \[\leadsto \frac{{alphax}^{2} \cdot u0}{\color{blue}{cos2phi}} \]
                            7. Step-by-step derivation
                              1. Applied rewrites21.6%

                                \[\leadsto \frac{u0 \cdot \left(alphax \cdot alphax\right)}{\color{blue}{cos2phi}} \]
                              2. Final simplification21.6%

                                \[\leadsto \frac{\left(alphax \cdot alphax\right) \cdot u0}{cos2phi} \]
                              3. Add Preprocessing

                              Alternative 13: 23.9% accurate, 6.9× speedup?

                              \[\begin{array}{l} \\ \left(alphax \cdot u0\right) \cdot \frac{alphax}{cos2phi} \end{array} \]
                              (FPCore (alphax alphay u0 cos2phi sin2phi)
                               :precision binary32
                               (* (* alphax u0) (/ alphax cos2phi)))
                              float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                              	return (alphax * u0) * (alphax / cos2phi);
                              }
                              
                              real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                                  real(4), intent (in) :: alphax
                                  real(4), intent (in) :: alphay
                                  real(4), intent (in) :: u0
                                  real(4), intent (in) :: cos2phi
                                  real(4), intent (in) :: sin2phi
                                  code = (alphax * u0) * (alphax / cos2phi)
                              end function
                              
                              function code(alphax, alphay, u0, cos2phi, sin2phi)
                              	return Float32(Float32(alphax * u0) * Float32(alphax / cos2phi))
                              end
                              
                              function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                              	tmp = (alphax * u0) * (alphax / cos2phi);
                              end
                              
                              \begin{array}{l}
                              
                              \\
                              \left(alphax \cdot u0\right) \cdot \frac{alphax}{cos2phi}
                              \end{array}
                              
                              Derivation
                              1. Initial program 61.5%

                                \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                              2. Add Preprocessing
                              3. Taylor expanded in u0 around 0

                                \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                              4. Step-by-step derivation
                                1. lower-/.f32N/A

                                  \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                                2. +-commutativeN/A

                                  \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                                3. lower-+.f32N/A

                                  \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                                4. lower-/.f32N/A

                                  \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                                5. unpow2N/A

                                  \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                                6. lower-*.f32N/A

                                  \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                                7. lower-/.f32N/A

                                  \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                                8. unpow2N/A

                                  \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                                9. lower-*.f3275.4

                                  \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                              5. Applied rewrites75.4%

                                \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                              6. Taylor expanded in alphax around 0

                                \[\leadsto \frac{{alphax}^{2} \cdot u0}{\color{blue}{cos2phi}} \]
                              7. Step-by-step derivation
                                1. Applied rewrites21.6%

                                  \[\leadsto \frac{u0 \cdot \left(alphax \cdot alphax\right)}{\color{blue}{cos2phi}} \]
                                2. Step-by-step derivation
                                  1. Applied rewrites21.5%

                                    \[\leadsto \left(alphax \cdot u0\right) \cdot \frac{alphax}{\color{blue}{cos2phi}} \]
                                  2. Add Preprocessing

                                  Alternative 14: 23.9% accurate, 6.9× speedup?

                                  \[\begin{array}{l} \\ \frac{u0}{cos2phi} \cdot \left(alphax \cdot alphax\right) \end{array} \]
                                  (FPCore (alphax alphay u0 cos2phi sin2phi)
                                   :precision binary32
                                   (* (/ u0 cos2phi) (* alphax alphax)))
                                  float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                                  	return (u0 / cos2phi) * (alphax * alphax);
                                  }
                                  
                                  real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                                      real(4), intent (in) :: alphax
                                      real(4), intent (in) :: alphay
                                      real(4), intent (in) :: u0
                                      real(4), intent (in) :: cos2phi
                                      real(4), intent (in) :: sin2phi
                                      code = (u0 / cos2phi) * (alphax * alphax)
                                  end function
                                  
                                  function code(alphax, alphay, u0, cos2phi, sin2phi)
                                  	return Float32(Float32(u0 / cos2phi) * Float32(alphax * alphax))
                                  end
                                  
                                  function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                                  	tmp = (u0 / cos2phi) * (alphax * alphax);
                                  end
                                  
                                  \begin{array}{l}
                                  
                                  \\
                                  \frac{u0}{cos2phi} \cdot \left(alphax \cdot alphax\right)
                                  \end{array}
                                  
                                  Derivation
                                  1. Initial program 61.5%

                                    \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                                  2. Add Preprocessing
                                  3. Taylor expanded in u0 around 0

                                    \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                                  4. Step-by-step derivation
                                    1. lower-/.f32N/A

                                      \[\leadsto \color{blue}{\frac{u0}{\frac{cos2phi}{{alphax}^{2}} + \frac{sin2phi}{{alphay}^{2}}}} \]
                                    2. +-commutativeN/A

                                      \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                                    3. lower-+.f32N/A

                                      \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}} + \frac{cos2phi}{{alphax}^{2}}}} \]
                                    4. lower-/.f32N/A

                                      \[\leadsto \frac{u0}{\color{blue}{\frac{sin2phi}{{alphay}^{2}}} + \frac{cos2phi}{{alphax}^{2}}} \]
                                    5. unpow2N/A

                                      \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                                    6. lower-*.f32N/A

                                      \[\leadsto \frac{u0}{\frac{sin2phi}{\color{blue}{alphay \cdot alphay}} + \frac{cos2phi}{{alphax}^{2}}} \]
                                    7. lower-/.f32N/A

                                      \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                                    8. unpow2N/A

                                      \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                                    9. lower-*.f3275.4

                                      \[\leadsto \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                                  5. Applied rewrites75.4%

                                    \[\leadsto \color{blue}{\frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}} \]
                                  6. Taylor expanded in alphax around 0

                                    \[\leadsto \frac{{alphax}^{2} \cdot u0}{\color{blue}{cos2phi}} \]
                                  7. Step-by-step derivation
                                    1. Applied rewrites21.6%

                                      \[\leadsto \frac{u0 \cdot \left(alphax \cdot alphax\right)}{\color{blue}{cos2phi}} \]
                                    2. Step-by-step derivation
                                      1. Applied rewrites21.5%

                                        \[\leadsto \left(alphax \cdot alphax\right) \cdot \frac{u0}{\color{blue}{cos2phi}} \]
                                      2. Final simplification21.5%

                                        \[\leadsto \frac{u0}{cos2phi} \cdot \left(alphax \cdot alphax\right) \]
                                      3. Add Preprocessing

                                      Reproduce

                                      ?
                                      herbie shell --seed 2024276 
                                      (FPCore (alphax alphay u0 cos2phi sin2phi)
                                        :name "Beckmann Distribution sample, tan2theta, alphax != alphay, u1 <= 0.5"
                                        :precision binary32
                                        :pre (and (and (and (and (and (<= 0.0001 alphax) (<= alphax 1.0)) (and (<= 0.0001 alphay) (<= alphay 1.0))) (and (<= 2.328306437e-10 u0) (<= u0 1.0))) (and (<= 0.0 cos2phi) (<= cos2phi 1.0))) (<= 0.0 sin2phi))
                                        (/ (- (log (- 1.0 u0))) (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))