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

Percentage Accurate: 60.4% → 97.8%
Time: 12.3s
Alternatives: 15
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 15 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.4% 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: 97.8% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;u0 \leq 0.035999998450279236:\\ \;\;\;\;\frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{\frac{sin2phi}{alphay}}{alphay}}\\ \end{array} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (if (<= u0 0.035999998450279236)
   (/
    (-
     (* (- (* (- (* (- (* -0.25 u0) 0.3333333333333333) u0) 0.5) u0) 1.0) u0))
    (+ (/ (/ cos2phi alphax) alphax) (/ sin2phi (* alphay alphay))))
   (/
    (- (log (- 1.0 u0)))
    (+ (/ cos2phi (* alphax alphax)) (/ (/ sin2phi alphay) alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	float tmp;
	if (u0 <= 0.035999998450279236f) {
		tmp = -(((((((-0.25f * u0) - 0.3333333333333333f) * u0) - 0.5f) * u0) - 1.0f) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
	} else {
		tmp = -logf((1.0f - u0)) / ((cos2phi / (alphax * alphax)) + ((sin2phi / alphay) / alphay));
	}
	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 (u0 <= 0.035999998450279236e0) then
        tmp = -((((((((-0.25e0) * u0) - 0.3333333333333333e0) * u0) - 0.5e0) * u0) - 1.0e0) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)))
    else
        tmp = -log((1.0e0 - u0)) / ((cos2phi / (alphax * alphax)) + ((sin2phi / alphay) / alphay))
    end if
    code = tmp
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = Float32(0.0)
	if (u0 <= Float32(0.035999998450279236))
		tmp = Float32(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-0.25) * u0) - Float32(0.3333333333333333)) * u0) - Float32(0.5)) * u0) - Float32(1.0)) * u0)) / Float32(Float32(Float32(cos2phi / alphax) / alphax) + Float32(sin2phi / Float32(alphay * alphay))));
	else
		tmp = Float32(Float32(-log(Float32(Float32(1.0) - u0))) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(Float32(sin2phi / alphay) / alphay)));
	end
	return tmp
end
function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = single(0.0);
	if (u0 <= single(0.035999998450279236))
		tmp = -(((((((single(-0.25) * u0) - single(0.3333333333333333)) * u0) - single(0.5)) * u0) - single(1.0)) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
	else
		tmp = -log((single(1.0) - u0)) / ((cos2phi / (alphax * alphax)) + ((sin2phi / alphay) / alphay));
	end
	tmp_2 = tmp;
end
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;u0 \leq 0.035999998450279236:\\
\;\;\;\;\frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}}\\

\mathbf{else}:\\
\;\;\;\;\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{\frac{sin2phi}{alphay}}{alphay}}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if u0 < 0.0359999985

    1. Initial program 52.9%

      \[\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 \frac{-\color{blue}{u0 \cdot \left(u0 \cdot \left(u0 \cdot \left(\frac{-1}{4} \cdot u0 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    4. Step-by-step derivation
      1. *-commutativeN/A

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{-\left(\left(\left(\color{blue}{-0.25 \cdot u0} - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    5. Applied rewrites98.2%

      \[\leadsto \frac{-\color{blue}{\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    6. Step-by-step derivation
      1. lift-/.f32N/A

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

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

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

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

        \[\leadsto \frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    7. Applied rewrites98.3%

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

    if 0.0359999985 < 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. lift-*.f32N/A

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

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

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

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

      \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \color{blue}{\frac{\frac{sin2phi}{alphay}}{alphay}}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 2: 97.8% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;u0 \leq 0.035999998450279236:\\ \;\;\;\;\frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + t\_0}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\log \left(1 - u0\right)}{\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 (<= u0 0.035999998450279236)
     (/
      (-
       (*
        (- (* (- (* (- (* -0.25 u0) 0.3333333333333333) u0) 0.5) u0) 1.0)
        u0))
      (+ (/ (/ cos2phi alphax) alphax) t_0))
     (/ (- (log (- 1.0 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 (u0 <= 0.035999998450279236f) {
		tmp = -(((((((-0.25f * u0) - 0.3333333333333333f) * u0) - 0.5f) * u0) - 1.0f) * u0) / (((cos2phi / alphax) / alphax) + t_0);
	} else {
		tmp = -logf((1.0f - 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 (u0 <= 0.035999998450279236e0) then
        tmp = -((((((((-0.25e0) * u0) - 0.3333333333333333e0) * u0) - 0.5e0) * u0) - 1.0e0) * u0) / (((cos2phi / alphax) / alphax) + t_0)
    else
        tmp = -log((1.0e0 - 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 (u0 <= Float32(0.035999998450279236))
		tmp = Float32(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-0.25) * u0) - Float32(0.3333333333333333)) * u0) - Float32(0.5)) * u0) - Float32(1.0)) * u0)) / Float32(Float32(Float32(cos2phi / alphax) / alphax) + t_0));
	else
		tmp = Float32(Float32(-log(Float32(Float32(1.0) - 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 (u0 <= single(0.035999998450279236))
		tmp = -(((((((single(-0.25) * u0) - single(0.3333333333333333)) * u0) - single(0.5)) * u0) - single(1.0)) * u0) / (((cos2phi / alphax) / alphax) + t_0);
	else
		tmp = -log((single(1.0) - 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}\;u0 \leq 0.035999998450279236:\\
\;\;\;\;\frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + t\_0}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if u0 < 0.0359999985

    1. Initial program 52.9%

      \[\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 \frac{-\color{blue}{u0 \cdot \left(u0 \cdot \left(u0 \cdot \left(\frac{-1}{4} \cdot u0 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    4. Step-by-step derivation
      1. *-commutativeN/A

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{-\left(\left(\left(\color{blue}{-0.25 \cdot u0} - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    5. Applied rewrites98.2%

      \[\leadsto \frac{-\color{blue}{\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    6. Step-by-step derivation
      1. lift-/.f32N/A

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

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

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

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

        \[\leadsto \frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    7. Applied rewrites98.3%

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

    if 0.0359999985 < 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. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 3: 92.9% accurate, 1.8× speedup?

\[\begin{array}{l} \\ \frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (* (- (* (- (* (- (* -0.25 u0) 0.3333333333333333) u0) 0.5) u0) 1.0) u0))
  (+ (/ (/ cos2phi alphax) alphax) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -(((((((-0.25f * u0) - 0.3333333333333333f) * u0) - 0.5f) * u0) - 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 = -((((((((-0.25e0) * u0) - 0.3333333333333333e0) * u0) - 0.5e0) * u0) - 1.0e0) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-0.25) * u0) - Float32(0.3333333333333333)) * u0) - Float32(0.5)) * u0) - Float32(1.0)) * u0)) / Float32(Float32(Float32(cos2phi / alphax) / alphax) + Float32(sin2phi / Float32(alphay * alphay))))
end
function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = -(((((((single(-0.25) * u0) - single(0.3333333333333333)) * u0) - single(0.5)) * u0) - single(1.0)) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}
Derivation
  1. Initial program 59.8%

    \[\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 \frac{-\color{blue}{u0 \cdot \left(u0 \cdot \left(u0 \cdot \left(\frac{-1}{4} \cdot u0 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  4. Step-by-step derivation
    1. *-commutativeN/A

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

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

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

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

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

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

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

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

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

      \[\leadsto \frac{-\left(\left(\left(\color{blue}{-0.25 \cdot u0} - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  5. Applied rewrites92.2%

    \[\leadsto \frac{-\color{blue}{\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  6. Step-by-step derivation
    1. lift-/.f32N/A

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

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

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

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

      \[\leadsto \frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  7. Applied rewrites92.3%

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

Alternative 4: 92.9% accurate, 1.9× speedup?

\[\begin{array}{l} \\ \frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (* (- (* (- (* (- (* -0.25 u0) 0.3333333333333333) u0) 0.5) u0) 1.0) u0))
  (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -(((((((-0.25f * u0) - 0.3333333333333333f) * u0) - 0.5f) * u0) - 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 = -((((((((-0.25e0) * u0) - 0.3333333333333333e0) * u0) - 0.5e0) * u0) - 1.0e0) * u0) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(Float32(Float32(-0.25) * u0) - Float32(0.3333333333333333)) * u0) - Float32(0.5)) * u0) - 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 = -(((((((single(-0.25) * u0) - single(0.3333333333333333)) * u0) - single(0.5)) * u0) - single(1.0)) * u0) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}
Derivation
  1. Initial program 59.8%

    \[\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 \frac{-\color{blue}{u0 \cdot \left(u0 \cdot \left(u0 \cdot \left(\frac{-1}{4} \cdot u0 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  4. Step-by-step derivation
    1. *-commutativeN/A

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

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

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

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

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

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

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

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

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

      \[\leadsto \frac{-\left(\left(\left(\color{blue}{-0.25 \cdot u0} - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  5. Applied rewrites92.2%

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

Alternative 5: 90.9% accurate, 2.0× speedup?

\[\begin{array}{l} \\ \frac{-\left(\left(-0.3333333333333333 \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (* (- (* (- (* -0.3333333333333333 u0) 0.5) u0) 1.0) u0))
  (+ (/ (/ cos2phi alphax) alphax) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -(((((-0.3333333333333333f * u0) - 0.5f) * u0) - 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 = -((((((-0.3333333333333333e0) * u0) - 0.5e0) * u0) - 1.0e0) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(-0.3333333333333333) * u0) - Float32(0.5)) * u0) - Float32(1.0)) * u0)) / Float32(Float32(Float32(cos2phi / alphax) / alphax) + Float32(sin2phi / Float32(alphay * alphay))))
end
function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = -(((((single(-0.3333333333333333) * u0) - single(0.5)) * u0) - single(1.0)) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\left(\left(-0.3333333333333333 \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}
Derivation
  1. Initial program 59.8%

    \[\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 \frac{-\color{blue}{u0 \cdot \left(u0 \cdot \left(u0 \cdot \left(\frac{-1}{4} \cdot u0 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  4. Step-by-step derivation
    1. *-commutativeN/A

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

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

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

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

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

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

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

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

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

      \[\leadsto \frac{-\left(\left(\left(\color{blue}{-0.25 \cdot u0} - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  5. Applied rewrites92.2%

    \[\leadsto \frac{-\color{blue}{\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  6. Step-by-step derivation
    1. lift-/.f32N/A

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

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

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

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

      \[\leadsto \frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  7. Applied rewrites92.3%

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

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

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

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

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

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

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

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

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

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

Alternative 6: 90.9% accurate, 2.2× speedup?

\[\begin{array}{l} \\ \frac{-\left(\left(-0.3333333333333333 \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (* (- (* (- (* -0.3333333333333333 u0) 0.5) u0) 1.0) u0))
  (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -(((((-0.3333333333333333f * u0) - 0.5f) * u0) - 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 = -((((((-0.3333333333333333e0) * u0) - 0.5e0) * u0) - 1.0e0) * u0) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-Float32(Float32(Float32(Float32(Float32(Float32(-0.3333333333333333) * u0) - Float32(0.5)) * u0) - 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 = -(((((single(-0.3333333333333333) * u0) - single(0.5)) * u0) - single(1.0)) * u0) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\left(\left(-0.3333333333333333 \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}
Derivation
  1. Initial program 59.8%

    \[\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 \frac{-\color{blue}{u0 \cdot \left(u0 \cdot \left(\frac{-1}{3} \cdot u0 - \frac{1}{2}\right) - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  4. Step-by-step derivation
    1. *-commutativeN/A

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

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

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

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

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

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

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

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

Alternative 7: 87.1% accurate, 2.2× speedup?

\[\begin{array}{l} \\ \frac{-\left(-0.5 \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (* (- (* -0.5 u0) 1.0) u0))
  (+ (/ (/ cos2phi alphax) alphax) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -(((-0.5f * u0) - 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 = -((((-0.5e0) * u0) - 1.0e0) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-Float32(Float32(Float32(Float32(-0.5) * u0) - Float32(1.0)) * u0)) / Float32(Float32(Float32(cos2phi / alphax) / alphax) + Float32(sin2phi / Float32(alphay * alphay))))
end
function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = -(((single(-0.5) * u0) - single(1.0)) * u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\left(-0.5 \cdot u0 - 1\right) \cdot u0}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}
Derivation
  1. Initial program 59.8%

    \[\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 \frac{-\color{blue}{u0 \cdot \left(u0 \cdot \left(u0 \cdot \left(\frac{-1}{4} \cdot u0 - \frac{1}{3}\right) - \frac{1}{2}\right) - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  4. Step-by-step derivation
    1. *-commutativeN/A

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

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

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

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

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

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

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

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

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

      \[\leadsto \frac{-\left(\left(\left(\color{blue}{-0.25 \cdot u0} - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  5. Applied rewrites92.2%

    \[\leadsto \frac{-\color{blue}{\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  6. Step-by-step derivation
    1. lift-/.f32N/A

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

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

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

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

      \[\leadsto \frac{-\left(\left(\left(-0.25 \cdot u0 - 0.3333333333333333\right) \cdot u0 - 0.5\right) \cdot u0 - 1\right) \cdot u0}{\frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  7. Applied rewrites92.3%

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

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

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

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

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

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

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

Alternative 8: 87.1% accurate, 2.5× speedup?

\[\begin{array}{l} \\ \frac{-\left(-0.5 \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (* (- (* -0.5 u0) 1.0) u0))
  (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -(((-0.5f * u0) - 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 = -((((-0.5e0) * u0) - 1.0e0) * u0) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)))
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-Float32(Float32(Float32(Float32(-0.5) * u0) - 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 = -(((single(-0.5) * u0) - single(1.0)) * u0) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
end
\begin{array}{l}

\\
\frac{-\left(-0.5 \cdot u0 - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}}
\end{array}
Derivation
  1. Initial program 59.8%

    \[\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 \frac{-\color{blue}{u0 \cdot \left(\frac{-1}{2} \cdot u0 - 1\right)}}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  4. Step-by-step derivation
    1. *-commutativeN/A

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

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

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

      \[\leadsto \frac{-\left(\color{blue}{-0.5 \cdot u0} - 1\right) \cdot u0}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  5. Applied rewrites87.1%

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

Alternative 9: 75.8% accurate, 2.7× speedup?

\[\begin{array}{l} \\ \left(\frac{u0}{\left(\frac{cos2phi}{alphax} \cdot alphay\right) \cdot alphay + sin2phi \cdot alphax} \cdot alphay\right) \cdot \left(alphay \cdot alphax\right) \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (*
  (*
   (/ u0 (+ (* (* (/ cos2phi alphax) alphay) alphay) (* sin2phi alphax)))
   alphay)
  (* alphay alphax)))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return ((u0 / ((((cos2phi / alphax) * alphay) * alphay) + (sin2phi * alphax))) * alphay) * (alphay * 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) * alphay) * alphay) + (sin2phi * alphax))) * alphay) * (alphay * alphax)
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(Float32(u0 / Float32(Float32(Float32(Float32(cos2phi / alphax) * alphay) * alphay) + Float32(sin2phi * alphax))) * alphay) * Float32(alphay * alphax))
end
function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = ((u0 / ((((cos2phi / alphax) * alphay) * alphay) + (sin2phi * alphax))) * alphay) * (alphay * alphax);
end
\begin{array}{l}

\\
\left(\frac{u0}{\left(\frac{cos2phi}{alphax} \cdot alphay\right) \cdot alphay + sin2phi \cdot alphax} \cdot alphay\right) \cdot \left(alphay \cdot alphax\right)
\end{array}
Derivation
  1. Initial program 59.8%

    \[\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.8

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

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

      \[\leadsto \frac{u0}{\frac{\mathsf{fma}\left(sin2phi, alphax, \left(alphay \cdot alphay\right) \cdot \frac{cos2phi}{alphax}\right)}{\color{blue}{\left(alphay \cdot alphay\right) \cdot alphax}}} \]
    2. Step-by-step derivation
      1. Applied rewrites58.6%

        \[\leadsto \left(\frac{u0}{\mathsf{fma}\left(alphay \cdot \frac{cos2phi}{alphax}, alphay, sin2phi \cdot alphax\right)} \cdot alphay\right) \cdot \color{blue}{\left(alphay \cdot alphax\right)} \]
      2. Step-by-step derivation
        1. Applied rewrites76.0%

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

        Alternative 10: 75.7% accurate, 2.9× speedup?

        \[\begin{array}{l} \\ \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{\frac{cos2phi}{alphax}}{alphax}} \end{array} \]
        (FPCore (alphax alphay u0 cos2phi sin2phi)
         :precision binary32
         (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ (/ cos2phi alphax) alphax))))
        float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
        	return u0 / ((sin2phi / (alphay * alphay)) + ((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 / ((sin2phi / (alphay * alphay)) + ((cos2phi / alphax) / alphax))
        end function
        
        function code(alphax, alphay, u0, cos2phi, sin2phi)
        	return Float32(u0 / Float32(Float32(sin2phi / Float32(alphay * alphay)) + Float32(Float32(cos2phi / alphax) / alphax)))
        end
        
        function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
        	tmp = u0 / ((sin2phi / (alphay * alphay)) + ((cos2phi / alphax) / alphax));
        end
        
        \begin{array}{l}
        
        \\
        \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{\frac{cos2phi}{alphax}}{alphax}}
        \end{array}
        
        Derivation
        1. Initial program 59.8%

          \[\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.8

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

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

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

          Alternative 11: 75.7% accurate, 3.2× speedup?

          \[\begin{array}{l} \\ \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}} \end{array} \]
          (FPCore (alphax alphay u0 cos2phi sin2phi)
           :precision binary32
           (/ u0 (+ (/ sin2phi (* alphay alphay)) (/ cos2phi (* alphax alphax)))))
          float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
          	return u0 / ((sin2phi / (alphay * alphay)) + (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 / ((sin2phi / (alphay * alphay)) + (cos2phi / (alphax * alphax)))
          end function
          
          function code(alphax, alphay, u0, cos2phi, sin2phi)
          	return Float32(u0 / Float32(Float32(sin2phi / Float32(alphay * alphay)) + Float32(cos2phi / Float32(alphax * alphax))))
          end
          
          function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
          	tmp = u0 / ((sin2phi / (alphay * alphay)) + (cos2phi / (alphax * alphax)));
          end
          
          \begin{array}{l}
          
          \\
          \frac{u0}{\frac{sin2phi}{alphay \cdot alphay} + \frac{cos2phi}{alphax \cdot alphax}}
          \end{array}
          
          Derivation
          1. Initial program 59.8%

            \[\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.8

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

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

          Alternative 12: 66.8% accurate, 5.4× speedup?

          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;sin2phi \leq 9.999999682655225 \cdot 10^{-21}:\\ \;\;\;\;\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 9.999999682655225e-21)
             (/ (* (* alphax alphax) u0) cos2phi)
             (/ (* (* alphay alphay) u0) sin2phi)))
          float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
          	float tmp;
          	if (sin2phi <= 9.999999682655225e-21f) {
          		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 <= 9.999999682655225e-21) 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(9.999999682655225e-21))
          		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(9.999999682655225e-21))
          		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 9.999999682655225 \cdot 10^{-21}:\\
          \;\;\;\;\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 < 9.99999968e-21

            1. Initial program 50.6%

              \[\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.1

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

              \[\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 rewrites62.2%

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

              if 9.99999968e-21 < sin2phi

              1. Initial program 62.7%

                \[\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.9

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

                \[\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 rewrites70.9%

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

              Alternative 13: 23.5% 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 59.8%

                \[\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.8

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

                \[\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 rewrites24.4%

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

                Alternative 14: 23.5% accurate, 6.9× speedup?

                \[\begin{array}{l} \\ alphax \cdot \frac{alphax \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(alphax * Float32(Float32(alphax * u0) / cos2phi))
                end
                
                function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                	tmp = alphax * ((alphax * u0) / cos2phi);
                end
                
                \begin{array}{l}
                
                \\
                alphax \cdot \frac{alphax \cdot u0}{cos2phi}
                \end{array}
                
                Derivation
                1. Initial program 59.8%

                  \[\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.8

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

                  \[\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 rewrites24.4%

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

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

                    Alternative 15: 23.5% accurate, 6.9× speedup?

                    \[\begin{array}{l} \\ alphax \cdot \left(alphax \cdot \frac{u0}{cos2phi}\right) \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(alphax * Float32(alphax * Float32(u0 / cos2phi)))
                    end
                    
                    function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                    	tmp = alphax * (alphax * (u0 / cos2phi));
                    end
                    
                    \begin{array}{l}
                    
                    \\
                    alphax \cdot \left(alphax \cdot \frac{u0}{cos2phi}\right)
                    \end{array}
                    
                    Derivation
                    1. Initial program 59.8%

                      \[\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.8

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

                      \[\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 rewrites24.4%

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

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

                        Reproduce

                        ?
                        herbie shell --seed 2024337 
                        (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)))))