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

Percentage Accurate: 59.9% → 98.3%
Time: 6.3s
Alternatives: 15
Speedup: 1.1×

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)));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
use fmin_fmax_functions
    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}

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: 59.9% 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)));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
use fmin_fmax_functions
    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: 98.3% accurate, 0.8× speedup?

\[\begin{array}{l} \\ \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (log1p (- u0)))
  (+ (/ (/ 1.0 alphax) (/ alphax cos2phi)) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -log1pf(-u0) / (((1.0f / alphax) / (alphax / cos2phi)) + (sin2phi / (alphay * alphay)));
}
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-log1p(Float32(-u0))) / Float32(Float32(Float32(Float32(1.0) / alphax) / Float32(alphax / cos2phi)) + Float32(sin2phi / Float32(alphay * alphay))))
end
\begin{array}{l}

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

    \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Alternative 2: 98.3% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{cos2phi}{alphax}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (log1p (- u0)))
  (+ (/ (/ cos2phi alphax) alphax) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -log1pf(-u0) / (((cos2phi / alphax) / alphax) + (sin2phi / (alphay * alphay)));
}
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-log1p(Float32(-u0))) / Float32(Float32(Float32(cos2phi / alphax) / alphax) + Float32(sin2phi / Float32(alphay * alphay))))
end
\begin{array}{l}

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

    \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  2. 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. sub-flipN/A

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

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

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

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

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

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

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

      \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    5. lift-/.f3298.3

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

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

Alternative 3: 98.3% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (/
  (- (log1p (- u0)))
  (+ (/ cos2phi (* alphax alphax)) (/ sin2phi (* alphay alphay)))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	return -log1pf(-u0) / ((cos2phi / (alphax * alphax)) + (sin2phi / (alphay * alphay)));
}
function code(alphax, alphay, u0, cos2phi, sin2phi)
	return Float32(Float32(-log1p(Float32(-u0))) / Float32(Float32(cos2phi / Float32(alphax * alphax)) + Float32(sin2phi / Float32(alphay * alphay))))
end
\begin{array}{l}

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

    \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
  2. 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. sub-flipN/A

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

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

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

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

Alternative 4: 96.2% accurate, 0.7× speedup?

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

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

\mathbf{else}:\\
\;\;\;\;\frac{u0 \cdot \left(1 + 0.5 \cdot u0\right)}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay \cdot alphay}, alphax, \frac{cos2phi}{alphax}\right)}{alphax}}\\


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

    1. Initial program 59.9%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{\log \left(1 - u0\right)}{\frac{sin2phi}{\color{blue}{\left(\mathsf{neg}\left(alphay\right)\right) \cdot alphay}} - \frac{cos2phi}{alphax \cdot alphax}} \]
      16. lower-neg.f3259.9

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

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

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

    1. Initial program 59.9%

      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{sin2phi}{alphay \cdot alphay} + \frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax}} \]
      15. add-to-fractionN/A

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

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\color{blue}{\frac{\frac{sin2phi}{alphay \cdot alphay} \cdot alphax + \frac{cos2phi}{alphax}}{alphax}}} \]
      17. lower-fma.f3298.2

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{\mathsf{fma}\left(\frac{sin2phi}{alphay \cdot alphay}, alphax, \frac{cos2phi}{alphax}\right)}}{alphax}} \]
    5. Applied rewrites98.2%

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

      \[\leadsto \frac{\color{blue}{u0 \cdot \left(1 + \frac{1}{2} \cdot u0\right)}}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay \cdot alphay}, alphax, \frac{cos2phi}{alphax}\right)}{alphax}} \]
    7. Step-by-step derivation
      1. lower-*.f32N/A

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

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

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

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

Alternative 5: 90.1% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;u0 \leq 9.999999747378752 \cdot 10^{-5}:\\ \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{alphax \cdot alphax}}\\ \mathbf{else}:\\ \;\;\;\;\frac{\log \left(1 - u0\right)}{\frac{sin2phi}{\left(-alphay\right) \cdot alphay} - \frac{cos2phi}{alphax \cdot alphax}}\\ \end{array} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (if (<= u0 9.999999747378752e-5)
   (/
    (* (* alphay alphay) u0)
    (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))))
   (/
    (log (- 1.0 u0))
    (- (/ sin2phi (* (- alphay) alphay)) (/ cos2phi (* alphax alphax))))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	float tmp;
	if (u0 <= 9.999999747378752e-5f) {
		tmp = ((alphay * alphay) * u0) / (sin2phi + (((alphay * alphay) * cos2phi) / (alphax * alphax)));
	} else {
		tmp = logf((1.0f - u0)) / ((sin2phi / (-alphay * alphay)) - (cos2phi / (alphax * alphax)));
	}
	return tmp;
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
use fmin_fmax_functions
    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 <= 9.999999747378752e-5) then
        tmp = ((alphay * alphay) * u0) / (sin2phi + (((alphay * alphay) * cos2phi) / (alphax * alphax)))
    else
        tmp = log((1.0e0 - u0)) / ((sin2phi / (-alphay * alphay)) - (cos2phi / (alphax * alphax)))
    end if
    code = tmp
end function
function code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = Float32(0.0)
	if (u0 <= Float32(9.999999747378752e-5))
		tmp = Float32(Float32(Float32(alphay * alphay) * u0) / Float32(sin2phi + Float32(Float32(Float32(alphay * alphay) * cos2phi) / Float32(alphax * alphax))));
	else
		tmp = Float32(log(Float32(Float32(1.0) - u0)) / Float32(Float32(sin2phi / Float32(Float32(-alphay) * alphay)) - Float32(cos2phi / Float32(alphax * alphax))));
	end
	return tmp
end
function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
	tmp = single(0.0);
	if (u0 <= single(9.999999747378752e-5))
		tmp = ((alphay * alphay) * u0) / (sin2phi + (((alphay * alphay) * cos2phi) / (alphax * alphax)));
	else
		tmp = log((single(1.0) - u0)) / ((sin2phi / (-alphay * alphay)) - (cos2phi / (alphax * alphax)));
	end
	tmp_2 = tmp;
end
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;u0 \leq 9.999999747378752 \cdot 10^{-5}:\\
\;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{alphax \cdot alphax}}\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if u0 < 9.99999975e-5

    1. Initial program 59.9%

      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
      3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{{alphax}^{2}}} \]
      10. pow2N/A

        \[\leadsto \frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{alphax \cdot \color{blue}{alphax}}} \]
      11. lift-*.f3276.7

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

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

    if 9.99999975e-5 < u0

    1. Initial program 59.9%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{\log \left(1 - u0\right)}{\frac{sin2phi}{\color{blue}{\left(\mathsf{neg}\left(alphay\right)\right) \cdot alphay}} - \frac{cos2phi}{alphax \cdot alphax}} \]
      16. lower-neg.f3259.9

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

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

Alternative 6: 87.2% accurate, 0.8× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;t\_0 \leq 10:\\ \;\;\;\;\frac{u0}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay}, alphax, \frac{cos2phi}{alphax} \cdot alphay\right)}{alphay \cdot alphax}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\ \end{array} \end{array} \]
(FPCore (alphax alphay u0 cos2phi sin2phi)
 :precision binary32
 (let* ((t_0 (/ sin2phi (* alphay alphay))))
   (if (<= t_0 10.0)
     (/
      u0
      (/
       (fma (/ sin2phi alphay) alphax (* (/ cos2phi alphax) alphay))
       (* alphay alphax)))
     (/ (- (log1p (- u0))) t_0))))
float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
	float t_0 = sin2phi / (alphay * alphay);
	float tmp;
	if (t_0 <= 10.0f) {
		tmp = u0 / (fmaf((sin2phi / alphay), alphax, ((cos2phi / alphax) * alphay)) / (alphay * alphax));
	} else {
		tmp = -log1pf(-u0) / t_0;
	}
	return tmp;
}
function code(alphax, alphay, u0, cos2phi, sin2phi)
	t_0 = Float32(sin2phi / Float32(alphay * alphay))
	tmp = Float32(0.0)
	if (t_0 <= Float32(10.0))
		tmp = Float32(u0 / Float32(fma(Float32(sin2phi / alphay), alphax, Float32(Float32(cos2phi / alphax) * alphay)) / Float32(alphay * alphax)));
	else
		tmp = Float32(Float32(-log1p(Float32(-u0))) / t_0);
	end
	return tmp
end
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \frac{sin2phi}{alphay \cdot alphay}\\
\mathbf{if}\;t\_0 \leq 10:\\
\;\;\;\;\frac{u0}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay}, alphax, \frac{cos2phi}{alphax} \cdot alphay\right)}{alphay \cdot alphax}}\\

\mathbf{else}:\\
\;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 10

    1. Initial program 59.9%

      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
    2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{sin2phi}{alphay}}{alphay} + \color{blue}{\frac{\frac{cos2phi}{alphax}}{alphax}}} \]
      15. lift-/.f32N/A

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{sin2phi}{alphay}}{alphay} + \frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax}} \]
      16. common-denominatorN/A

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

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

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{\mathsf{fma}\left(\frac{sin2phi}{alphay}, alphax, \frac{cos2phi}{alphax} \cdot alphay\right)}}{alphay \cdot alphax}} \]
      19. lower-/.f32N/A

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

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay}, alphax, \color{blue}{\frac{cos2phi}{alphax} \cdot alphay}\right)}{alphay \cdot alphax}} \]
      21. lower-*.f3298.1

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay}, alphax, \frac{cos2phi}{alphax} \cdot alphay\right)}{\color{blue}{alphay \cdot alphax}}} \]
    5. Applied rewrites98.1%

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

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

        \[\leadsto \frac{\color{blue}{u0}}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay}, alphax, \frac{cos2phi}{alphax} \cdot alphay\right)}{alphay \cdot alphax}} \]

      if 10 < (/.f32 sin2phi (*.f32 alphay alphay))

      1. Initial program 59.9%

        \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
      2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
        3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
      9. Step-by-step derivation
        1. Applied rewrites74.0%

          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
      10. Recombined 2 regimes into one program.
      11. Add Preprocessing

      Alternative 7: 87.1% accurate, 0.8× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;t\_0 \leq 10:\\ \;\;\;\;\frac{u0}{\frac{\mathsf{fma}\left(\frac{cos2phi}{alphax \cdot alphax}, alphay \cdot alphay, sin2phi\right)}{alphay \cdot alphay}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\ \end{array} \end{array} \]
      (FPCore (alphax alphay u0 cos2phi sin2phi)
       :precision binary32
       (let* ((t_0 (/ sin2phi (* alphay alphay))))
         (if (<= t_0 10.0)
           (/
            u0
            (/
             (fma (/ cos2phi (* alphax alphax)) (* alphay alphay) sin2phi)
             (* alphay alphay)))
           (/ (- (log1p (- u0))) t_0))))
      float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
      	float t_0 = sin2phi / (alphay * alphay);
      	float tmp;
      	if (t_0 <= 10.0f) {
      		tmp = u0 / (fmaf((cos2phi / (alphax * alphax)), (alphay * alphay), sin2phi) / (alphay * alphay));
      	} else {
      		tmp = -log1pf(-u0) / t_0;
      	}
      	return tmp;
      }
      
      function code(alphax, alphay, u0, cos2phi, sin2phi)
      	t_0 = Float32(sin2phi / Float32(alphay * alphay))
      	tmp = Float32(0.0)
      	if (t_0 <= Float32(10.0))
      		tmp = Float32(u0 / Float32(fma(Float32(cos2phi / Float32(alphax * alphax)), Float32(alphay * alphay), sin2phi) / Float32(alphay * alphay)));
      	else
      		tmp = Float32(Float32(-log1p(Float32(-u0))) / t_0);
      	end
      	return tmp
      end
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \frac{sin2phi}{alphay \cdot alphay}\\
      \mathbf{if}\;t\_0 \leq 10:\\
      \;\;\;\;\frac{u0}{\frac{\mathsf{fma}\left(\frac{cos2phi}{alphax \cdot alphax}, alphay \cdot alphay, sin2phi\right)}{alphay \cdot alphay}}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 2 regimes
      2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 10

        1. Initial program 59.9%

          \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
        2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
          3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{\color{blue}{u0}}{\frac{\mathsf{fma}\left(\frac{cos2phi}{alphax \cdot alphax}, alphay \cdot alphay, sin2phi\right)}{alphay \cdot alphay}} \]

          if 10 < (/.f32 sin2phi (*.f32 alphay alphay))

          1. Initial program 59.9%

            \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
          2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

              \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
            3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

            \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
          9. Step-by-step derivation
            1. Applied rewrites74.0%

              \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
          10. Recombined 2 regimes into one program.
          11. Add Preprocessing

          Alternative 8: 87.1% accurate, 0.8× speedup?

          \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;t\_0 \leq 10:\\ \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{alphax \cdot alphax}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\ \end{array} \end{array} \]
          (FPCore (alphax alphay u0 cos2phi sin2phi)
           :precision binary32
           (let* ((t_0 (/ sin2phi (* alphay alphay))))
             (if (<= t_0 10.0)
               (/
                (* (* alphay alphay) u0)
                (+ sin2phi (/ (* (* alphay alphay) cos2phi) (* alphax alphax))))
               (/ (- (log1p (- u0))) t_0))))
          float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
          	float t_0 = sin2phi / (alphay * alphay);
          	float tmp;
          	if (t_0 <= 10.0f) {
          		tmp = ((alphay * alphay) * u0) / (sin2phi + (((alphay * alphay) * cos2phi) / (alphax * alphax)));
          	} else {
          		tmp = -log1pf(-u0) / t_0;
          	}
          	return tmp;
          }
          
          function code(alphax, alphay, u0, cos2phi, sin2phi)
          	t_0 = Float32(sin2phi / Float32(alphay * alphay))
          	tmp = Float32(0.0)
          	if (t_0 <= Float32(10.0))
          		tmp = Float32(Float32(Float32(alphay * alphay) * u0) / Float32(sin2phi + Float32(Float32(Float32(alphay * alphay) * cos2phi) / Float32(alphax * alphax))));
          	else
          		tmp = Float32(Float32(-log1p(Float32(-u0))) / t_0);
          	end
          	return tmp
          end
          
          \begin{array}{l}
          
          \\
          \begin{array}{l}
          t_0 := \frac{sin2phi}{alphay \cdot alphay}\\
          \mathbf{if}\;t\_0 \leq 10:\\
          \;\;\;\;\frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{alphax \cdot alphax}}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 10

            1. Initial program 59.9%

              \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
              3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{{alphax}^{2}}} \]
              10. pow2N/A

                \[\leadsto \frac{\left(alphay \cdot alphay\right) \cdot u0}{sin2phi + \frac{\left(alphay \cdot alphay\right) \cdot cos2phi}{alphax \cdot \color{blue}{alphax}}} \]
              11. lift-*.f3276.7

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

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

            if 10 < (/.f32 sin2phi (*.f32 alphay alphay))

            1. Initial program 59.9%

              \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
            2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
              3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

              \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
            9. Step-by-step derivation
              1. Applied rewrites74.0%

                \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
            10. Recombined 2 regimes into one program.
            11. Add Preprocessing

            Alternative 9: 87.1% accurate, 0.9× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;t\_0 \leq 10:\\ \;\;\;\;\frac{u0}{\frac{\mathsf{fma}\left(t\_0, alphax, \frac{cos2phi}{alphax}\right)}{alphax}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\ \end{array} \end{array} \]
            (FPCore (alphax alphay u0 cos2phi sin2phi)
             :precision binary32
             (let* ((t_0 (/ sin2phi (* alphay alphay))))
               (if (<= t_0 10.0)
                 (/ u0 (/ (fma t_0 alphax (/ cos2phi alphax)) alphax))
                 (/ (- (log1p (- u0))) t_0))))
            float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
            	float t_0 = sin2phi / (alphay * alphay);
            	float tmp;
            	if (t_0 <= 10.0f) {
            		tmp = u0 / (fmaf(t_0, alphax, (cos2phi / alphax)) / alphax);
            	} else {
            		tmp = -log1pf(-u0) / t_0;
            	}
            	return tmp;
            }
            
            function code(alphax, alphay, u0, cos2phi, sin2phi)
            	t_0 = Float32(sin2phi / Float32(alphay * alphay))
            	tmp = Float32(0.0)
            	if (t_0 <= Float32(10.0))
            		tmp = Float32(u0 / Float32(fma(t_0, alphax, Float32(cos2phi / alphax)) / alphax));
            	else
            		tmp = Float32(Float32(-log1p(Float32(-u0))) / t_0);
            	end
            	return tmp
            end
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            t_0 := \frac{sin2phi}{alphay \cdot alphay}\\
            \mathbf{if}\;t\_0 \leq 10:\\
            \;\;\;\;\frac{u0}{\frac{\mathsf{fma}\left(t\_0, alphax, \frac{cos2phi}{alphax}\right)}{alphax}}\\
            
            \mathbf{else}:\\
            \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 2 regimes
            2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 10

              1. Initial program 59.9%

                \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
              2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                  \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{sin2phi}{alphay \cdot alphay} + \frac{\color{blue}{\frac{cos2phi}{alphax}}}{alphax}} \]
                15. add-to-fractionN/A

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

                  \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\color{blue}{\frac{\frac{sin2phi}{alphay \cdot alphay} \cdot alphax + \frac{cos2phi}{alphax}}{alphax}}} \]
                17. lower-fma.f3298.2

                  \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{\mathsf{fma}\left(\frac{sin2phi}{alphay \cdot alphay}, alphax, \frac{cos2phi}{alphax}\right)}}{alphax}} \]
              5. Applied rewrites98.2%

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

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

                  \[\leadsto \frac{\color{blue}{u0}}{\frac{\mathsf{fma}\left(\frac{sin2phi}{alphay \cdot alphay}, alphax, \frac{cos2phi}{alphax}\right)}{alphax}} \]

                if 10 < (/.f32 sin2phi (*.f32 alphay alphay))

                1. Initial program 59.9%

                  \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                    \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                  3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

                  \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
                9. Step-by-step derivation
                  1. Applied rewrites74.0%

                    \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
                10. Recombined 2 regimes into one program.
                11. Add Preprocessing

                Alternative 10: 87.1% accurate, 0.9× speedup?

                \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ \mathbf{if}\;t\_0 \leq 10:\\ \;\;\;\;\frac{u0}{\frac{cos2phi}{alphax} + \frac{alphax \cdot sin2phi}{alphay \cdot alphay}} \cdot alphax\\ \mathbf{else}:\\ \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\ \end{array} \end{array} \]
                (FPCore (alphax alphay u0 cos2phi sin2phi)
                 :precision binary32
                 (let* ((t_0 (/ sin2phi (* alphay alphay))))
                   (if (<= t_0 10.0)
                     (*
                      (/ u0 (+ (/ cos2phi alphax) (/ (* alphax sin2phi) (* alphay alphay))))
                      alphax)
                     (/ (- (log1p (- u0))) t_0))))
                float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                	float t_0 = sin2phi / (alphay * alphay);
                	float tmp;
                	if (t_0 <= 10.0f) {
                		tmp = (u0 / ((cos2phi / alphax) + ((alphax * sin2phi) / (alphay * alphay)))) * alphax;
                	} else {
                		tmp = -log1pf(-u0) / t_0;
                	}
                	return tmp;
                }
                
                function code(alphax, alphay, u0, cos2phi, sin2phi)
                	t_0 = Float32(sin2phi / Float32(alphay * alphay))
                	tmp = Float32(0.0)
                	if (t_0 <= Float32(10.0))
                		tmp = Float32(Float32(u0 / Float32(Float32(cos2phi / alphax) + Float32(Float32(alphax * sin2phi) / Float32(alphay * alphay)))) * alphax);
                	else
                		tmp = Float32(Float32(-log1p(Float32(-u0))) / t_0);
                	end
                	return tmp
                end
                
                \begin{array}{l}
                
                \\
                \begin{array}{l}
                t_0 := \frac{sin2phi}{alphay \cdot alphay}\\
                \mathbf{if}\;t\_0 \leq 10:\\
                \;\;\;\;\frac{u0}{\frac{cos2phi}{alphax} + \frac{alphax \cdot sin2phi}{alphay \cdot alphay}} \cdot alphax\\
                
                \mathbf{else}:\\
                \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{t\_0}\\
                
                
                \end{array}
                \end{array}
                
                Derivation
                1. Split input into 2 regimes
                2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 10

                  1. Initial program 59.9%

                    \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                  2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                  if 10 < (/.f32 sin2phi (*.f32 alphay alphay))

                  1. Initial program 59.9%

                    \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                  2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                      \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                    3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

                    \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
                  9. Step-by-step derivation
                    1. Applied rewrites74.0%

                      \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
                  10. Recombined 2 regimes into one program.
                  11. Add Preprocessing

                  Alternative 11: 84.3% accurate, 0.9× speedup?

                  \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{sin2phi}{alphay \cdot alphay}\\ t_1 := -\mathsf{log1p}\left(-u0\right)\\ \mathbf{if}\;t\_0 \leq 1.0000000036274937 \cdot 10^{-15}:\\ \;\;\;\;\frac{t\_1}{\frac{cos2phi}{alphax \cdot alphax}}\\ \mathbf{else}:\\ \;\;\;\;\frac{t\_1}{t\_0}\\ \end{array} \end{array} \]
                  (FPCore (alphax alphay u0 cos2phi sin2phi)
                   :precision binary32
                   (let* ((t_0 (/ sin2phi (* alphay alphay))) (t_1 (- (log1p (- u0)))))
                     (if (<= t_0 1.0000000036274937e-15)
                       (/ t_1 (/ cos2phi (* alphax alphax)))
                       (/ t_1 t_0))))
                  float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                  	float t_0 = sin2phi / (alphay * alphay);
                  	float t_1 = -log1pf(-u0);
                  	float tmp;
                  	if (t_0 <= 1.0000000036274937e-15f) {
                  		tmp = t_1 / (cos2phi / (alphax * alphax));
                  	} else {
                  		tmp = t_1 / t_0;
                  	}
                  	return tmp;
                  }
                  
                  function code(alphax, alphay, u0, cos2phi, sin2phi)
                  	t_0 = Float32(sin2phi / Float32(alphay * alphay))
                  	t_1 = Float32(-log1p(Float32(-u0)))
                  	tmp = Float32(0.0)
                  	if (t_0 <= Float32(1.0000000036274937e-15))
                  		tmp = Float32(t_1 / Float32(cos2phi / Float32(alphax * alphax)));
                  	else
                  		tmp = Float32(t_1 / t_0);
                  	end
                  	return tmp
                  end
                  
                  \begin{array}{l}
                  
                  \\
                  \begin{array}{l}
                  t_0 := \frac{sin2phi}{alphay \cdot alphay}\\
                  t_1 := -\mathsf{log1p}\left(-u0\right)\\
                  \mathbf{if}\;t\_0 \leq 1.0000000036274937 \cdot 10^{-15}:\\
                  \;\;\;\;\frac{t\_1}{\frac{cos2phi}{alphax \cdot alphax}}\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;\frac{t\_1}{t\_0}\\
                  
                  
                  \end{array}
                  \end{array}
                  
                  Derivation
                  1. Split input into 2 regimes
                  2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 1e-15

                    1. Initial program 59.9%

                      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                    2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                      3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

                      \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                    9. Step-by-step derivation
                      1. pow2N/A

                        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{alphax \cdot \color{blue}{alphax}}} \]
                      2. lift-/.f32N/A

                        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                      3. lift-*.f3227.9

                        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{alphax \cdot \color{blue}{alphax}}} \]
                    10. Applied rewrites27.9%

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

                    if 1e-15 < (/.f32 sin2phi (*.f32 alphay alphay))

                    1. Initial program 59.9%

                      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                    2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                      3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

                      \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
                    9. Step-by-step derivation
                      1. Applied rewrites74.0%

                        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\color{blue}{sin2phi}}{alphay \cdot alphay}} \]
                    10. Recombined 2 regimes into one program.
                    11. Add Preprocessing

                    Alternative 12: 62.0% accurate, 1.1× speedup?

                    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;sin2phi \leq 1.4999999397961872 \cdot 10^{-13}:\\ \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{alphax \cdot alphax}}\\ \mathbf{else}:\\ \;\;\;\;-1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi}\\ \end{array} \end{array} \]
                    (FPCore (alphax alphay u0 cos2phi sin2phi)
                     :precision binary32
                     (if (<= sin2phi 1.4999999397961872e-13)
                       (/ (- (log1p (- u0))) (/ cos2phi (* alphax alphax)))
                       (* -1.0 (/ (* (* alphay alphay) (log (- 1.0 u0))) sin2phi))))
                    float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                    	float tmp;
                    	if (sin2phi <= 1.4999999397961872e-13f) {
                    		tmp = -log1pf(-u0) / (cos2phi / (alphax * alphax));
                    	} else {
                    		tmp = -1.0f * (((alphay * alphay) * logf((1.0f - u0))) / sin2phi);
                    	}
                    	return tmp;
                    }
                    
                    function code(alphax, alphay, u0, cos2phi, sin2phi)
                    	tmp = Float32(0.0)
                    	if (sin2phi <= Float32(1.4999999397961872e-13))
                    		tmp = Float32(Float32(-log1p(Float32(-u0))) / Float32(cos2phi / Float32(alphax * alphax)));
                    	else
                    		tmp = Float32(Float32(-1.0) * Float32(Float32(Float32(alphay * alphay) * log(Float32(Float32(1.0) - u0))) / sin2phi));
                    	end
                    	return tmp
                    end
                    
                    \begin{array}{l}
                    
                    \\
                    \begin{array}{l}
                    \mathbf{if}\;sin2phi \leq 1.4999999397961872 \cdot 10^{-13}:\\
                    \;\;\;\;\frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{alphax \cdot alphax}}\\
                    
                    \mathbf{else}:\\
                    \;\;\;\;-1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi}\\
                    
                    
                    \end{array}
                    \end{array}
                    
                    Derivation
                    1. Split input into 2 regimes
                    2. if sin2phi < 1.49999994e-13

                      1. Initial program 59.9%

                        \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                      2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                        3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

                        \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\color{blue}{\frac{cos2phi}{{alphax}^{2}}}} \]
                      9. Step-by-step derivation
                        1. pow2N/A

                          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{alphax \cdot \color{blue}{alphax}}} \]
                        2. lift-/.f32N/A

                          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                        3. lift-*.f3227.9

                          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{cos2phi}{alphax \cdot \color{blue}{alphax}}} \]
                      10. Applied rewrites27.9%

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

                      if 1.49999994e-13 < sin2phi

                      1. Initial program 59.9%

                        \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                      2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                        3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto -1 \cdot \frac{{alphay}^{2} \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        4. pow2N/A

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        5. lift-*.f32N/A

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

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        7. lift--.f3249.0

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                      10. Applied rewrites49.0%

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

                    Alternative 13: 54.3% accurate, 0.9× speedup?

                    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \log \left(1 - u0\right)\\ \mathbf{if}\;\frac{sin2phi}{alphay \cdot alphay} \leq 1.0000000036274937 \cdot 10^{-15}:\\ \;\;\;\;\frac{t\_0}{-1 \cdot \frac{cos2phi}{alphax \cdot alphax}}\\ \mathbf{else}:\\ \;\;\;\;-1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot t\_0}{sin2phi}\\ \end{array} \end{array} \]
                    (FPCore (alphax alphay u0 cos2phi sin2phi)
                     :precision binary32
                     (let* ((t_0 (log (- 1.0 u0))))
                       (if (<= (/ sin2phi (* alphay alphay)) 1.0000000036274937e-15)
                         (/ t_0 (* -1.0 (/ cos2phi (* alphax alphax))))
                         (* -1.0 (/ (* (* alphay alphay) t_0) sin2phi)))))
                    float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                    	float t_0 = logf((1.0f - u0));
                    	float tmp;
                    	if ((sin2phi / (alphay * alphay)) <= 1.0000000036274937e-15f) {
                    		tmp = t_0 / (-1.0f * (cos2phi / (alphax * alphax)));
                    	} else {
                    		tmp = -1.0f * (((alphay * alphay) * t_0) / sin2phi);
                    	}
                    	return tmp;
                    }
                    
                    module fmin_fmax_functions
                        implicit none
                        private
                        public fmax
                        public fmin
                    
                        interface fmax
                            module procedure fmax88
                            module procedure fmax44
                            module procedure fmax84
                            module procedure fmax48
                        end interface
                        interface fmin
                            module procedure fmin88
                            module procedure fmin44
                            module procedure fmin84
                            module procedure fmin48
                        end interface
                    contains
                        real(8) function fmax88(x, y) result (res)
                            real(8), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                        end function
                        real(4) function fmax44(x, y) result (res)
                            real(4), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                        end function
                        real(8) function fmax84(x, y) result(res)
                            real(8), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                        end function
                        real(8) function fmax48(x, y) result(res)
                            real(4), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                        end function
                        real(8) function fmin88(x, y) result (res)
                            real(8), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                        end function
                        real(4) function fmin44(x, y) result (res)
                            real(4), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                        end function
                        real(8) function fmin84(x, y) result(res)
                            real(8), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                        end function
                        real(8) function fmin48(x, y) result(res)
                            real(4), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                        end function
                    end module
                    
                    real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                    use fmin_fmax_functions
                        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 = log((1.0e0 - u0))
                        if ((sin2phi / (alphay * alphay)) <= 1.0000000036274937e-15) then
                            tmp = t_0 / ((-1.0e0) * (cos2phi / (alphax * alphax)))
                        else
                            tmp = (-1.0e0) * (((alphay * alphay) * t_0) / sin2phi)
                        end if
                        code = tmp
                    end function
                    
                    function code(alphax, alphay, u0, cos2phi, sin2phi)
                    	t_0 = log(Float32(Float32(1.0) - u0))
                    	tmp = Float32(0.0)
                    	if (Float32(sin2phi / Float32(alphay * alphay)) <= Float32(1.0000000036274937e-15))
                    		tmp = Float32(t_0 / Float32(Float32(-1.0) * Float32(cos2phi / Float32(alphax * alphax))));
                    	else
                    		tmp = Float32(Float32(-1.0) * Float32(Float32(Float32(alphay * alphay) * t_0) / sin2phi));
                    	end
                    	return tmp
                    end
                    
                    function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
                    	t_0 = log((single(1.0) - u0));
                    	tmp = single(0.0);
                    	if ((sin2phi / (alphay * alphay)) <= single(1.0000000036274937e-15))
                    		tmp = t_0 / (single(-1.0) * (cos2phi / (alphax * alphax)));
                    	else
                    		tmp = single(-1.0) * (((alphay * alphay) * t_0) / sin2phi);
                    	end
                    	tmp_2 = tmp;
                    end
                    
                    \begin{array}{l}
                    
                    \\
                    \begin{array}{l}
                    t_0 := \log \left(1 - u0\right)\\
                    \mathbf{if}\;\frac{sin2phi}{alphay \cdot alphay} \leq 1.0000000036274937 \cdot 10^{-15}:\\
                    \;\;\;\;\frac{t\_0}{-1 \cdot \frac{cos2phi}{alphax \cdot alphax}}\\
                    
                    \mathbf{else}:\\
                    \;\;\;\;-1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot t\_0}{sin2phi}\\
                    
                    
                    \end{array}
                    \end{array}
                    
                    Derivation
                    1. Split input into 2 regimes
                    2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 1e-15

                      1. Initial program 59.9%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto \frac{\log \left(1 - u0\right)}{\frac{sin2phi}{\color{blue}{\left(\mathsf{neg}\left(alphay\right)\right) \cdot alphay}} - \frac{cos2phi}{alphax \cdot alphax}} \]
                        16. lower-neg.f3259.9

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

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

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

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

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

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

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

                        \[\leadsto \frac{\log \left(1 - u0\right)}{\color{blue}{\frac{\frac{sin2phi}{-alphay}}{alphay}} - \frac{cos2phi}{alphax \cdot alphax}} \]
                      6. Taylor expanded in alphax around 0

                        \[\leadsto \frac{\log \left(1 - u0\right)}{\color{blue}{-1 \cdot \frac{cos2phi}{{alphax}^{2}}}} \]
                      7. Step-by-step derivation
                        1. lower-*.f32N/A

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

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

                          \[\leadsto \frac{\log \left(1 - u0\right)}{-1 \cdot \frac{cos2phi}{\color{blue}{alphax \cdot alphax}}} \]
                        4. lift-*.f3222.0

                          \[\leadsto \frac{\log \left(1 - u0\right)}{-1 \cdot \frac{cos2phi}{alphax \cdot \color{blue}{alphax}}} \]
                      8. Applied rewrites22.0%

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

                      if 1e-15 < (/.f32 sin2phi (*.f32 alphay alphay))

                      1. Initial program 59.9%

                        \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                      2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                        3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto -1 \cdot \frac{{alphay}^{2} \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        4. pow2N/A

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        5. lift-*.f32N/A

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

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        7. lift--.f3249.0

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                      10. Applied rewrites49.0%

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

                    Alternative 14: 54.3% accurate, 0.9× speedup?

                    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \log \left(1 - u0\right)\\ \mathbf{if}\;\frac{sin2phi}{alphay \cdot alphay} \leq 1.0000000036274937 \cdot 10^{-15}:\\ \;\;\;\;\frac{-t\_0}{\frac{cos2phi}{alphax}} \cdot alphax\\ \mathbf{else}:\\ \;\;\;\;-1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot t\_0}{sin2phi}\\ \end{array} \end{array} \]
                    (FPCore (alphax alphay u0 cos2phi sin2phi)
                     :precision binary32
                     (let* ((t_0 (log (- 1.0 u0))))
                       (if (<= (/ sin2phi (* alphay alphay)) 1.0000000036274937e-15)
                         (* (/ (- t_0) (/ cos2phi alphax)) alphax)
                         (* -1.0 (/ (* (* alphay alphay) t_0) sin2phi)))))
                    float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                    	float t_0 = logf((1.0f - u0));
                    	float tmp;
                    	if ((sin2phi / (alphay * alphay)) <= 1.0000000036274937e-15f) {
                    		tmp = (-t_0 / (cos2phi / alphax)) * alphax;
                    	} else {
                    		tmp = -1.0f * (((alphay * alphay) * t_0) / sin2phi);
                    	}
                    	return tmp;
                    }
                    
                    module fmin_fmax_functions
                        implicit none
                        private
                        public fmax
                        public fmin
                    
                        interface fmax
                            module procedure fmax88
                            module procedure fmax44
                            module procedure fmax84
                            module procedure fmax48
                        end interface
                        interface fmin
                            module procedure fmin88
                            module procedure fmin44
                            module procedure fmin84
                            module procedure fmin48
                        end interface
                    contains
                        real(8) function fmax88(x, y) result (res)
                            real(8), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                        end function
                        real(4) function fmax44(x, y) result (res)
                            real(4), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                        end function
                        real(8) function fmax84(x, y) result(res)
                            real(8), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                        end function
                        real(8) function fmax48(x, y) result(res)
                            real(4), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                        end function
                        real(8) function fmin88(x, y) result (res)
                            real(8), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                        end function
                        real(4) function fmin44(x, y) result (res)
                            real(4), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                        end function
                        real(8) function fmin84(x, y) result(res)
                            real(8), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                        end function
                        real(8) function fmin48(x, y) result(res)
                            real(4), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                        end function
                    end module
                    
                    real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                    use fmin_fmax_functions
                        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 = log((1.0e0 - u0))
                        if ((sin2phi / (alphay * alphay)) <= 1.0000000036274937e-15) then
                            tmp = (-t_0 / (cos2phi / alphax)) * alphax
                        else
                            tmp = (-1.0e0) * (((alphay * alphay) * t_0) / sin2phi)
                        end if
                        code = tmp
                    end function
                    
                    function code(alphax, alphay, u0, cos2phi, sin2phi)
                    	t_0 = log(Float32(Float32(1.0) - u0))
                    	tmp = Float32(0.0)
                    	if (Float32(sin2phi / Float32(alphay * alphay)) <= Float32(1.0000000036274937e-15))
                    		tmp = Float32(Float32(Float32(-t_0) / Float32(cos2phi / alphax)) * alphax);
                    	else
                    		tmp = Float32(Float32(-1.0) * Float32(Float32(Float32(alphay * alphay) * t_0) / sin2phi));
                    	end
                    	return tmp
                    end
                    
                    function tmp_2 = code(alphax, alphay, u0, cos2phi, sin2phi)
                    	t_0 = log((single(1.0) - u0));
                    	tmp = single(0.0);
                    	if ((sin2phi / (alphay * alphay)) <= single(1.0000000036274937e-15))
                    		tmp = (-t_0 / (cos2phi / alphax)) * alphax;
                    	else
                    		tmp = single(-1.0) * (((alphay * alphay) * t_0) / sin2phi);
                    	end
                    	tmp_2 = tmp;
                    end
                    
                    \begin{array}{l}
                    
                    \\
                    \begin{array}{l}
                    t_0 := \log \left(1 - u0\right)\\
                    \mathbf{if}\;\frac{sin2phi}{alphay \cdot alphay} \leq 1.0000000036274937 \cdot 10^{-15}:\\
                    \;\;\;\;\frac{-t\_0}{\frac{cos2phi}{alphax}} \cdot alphax\\
                    
                    \mathbf{else}:\\
                    \;\;\;\;-1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot t\_0}{sin2phi}\\
                    
                    
                    \end{array}
                    \end{array}
                    
                    Derivation
                    1. Split input into 2 regimes
                    2. if (/.f32 sin2phi (*.f32 alphay alphay)) < 1e-15

                      1. Initial program 59.9%

                        \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                      2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                        \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{cos2phi}{alphax}}} \cdot alphax \]
                      8. Step-by-step derivation
                        1. lift-/.f3222.0

                          \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{\color{blue}{alphax}}} \cdot alphax \]
                      9. Applied rewrites22.0%

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

                      if 1e-15 < (/.f32 sin2phi (*.f32 alphay alphay))

                      1. Initial program 59.9%

                        \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                      2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto \frac{-\mathsf{log1p}\left(-u0\right)}{\frac{\frac{1}{alphax}}{\frac{alphax}{cos2phi}} + \color{blue}{\frac{sin2phi}{alphay \cdot alphay}}} \]
                        3. add-to-fractionN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                          \[\leadsto -1 \cdot \frac{{alphay}^{2} \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        4. pow2N/A

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        5. lift-*.f32N/A

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

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                        7. lift--.f3249.0

                          \[\leadsto -1 \cdot \frac{\left(alphay \cdot alphay\right) \cdot \log \left(1 - u0\right)}{sin2phi} \]
                      10. Applied rewrites49.0%

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

                    Alternative 15: 22.0% accurate, 1.4× speedup?

                    \[\begin{array}{l} \\ \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax}} \cdot alphax \end{array} \]
                    (FPCore (alphax alphay u0 cos2phi sin2phi)
                     :precision binary32
                     (* (/ (- (log (- 1.0 u0))) (/ cos2phi alphax)) alphax))
                    float code(float alphax, float alphay, float u0, float cos2phi, float sin2phi) {
                    	return (-logf((1.0f - u0)) / (cos2phi / alphax)) * alphax;
                    }
                    
                    module fmin_fmax_functions
                        implicit none
                        private
                        public fmax
                        public fmin
                    
                        interface fmax
                            module procedure fmax88
                            module procedure fmax44
                            module procedure fmax84
                            module procedure fmax48
                        end interface
                        interface fmin
                            module procedure fmin88
                            module procedure fmin44
                            module procedure fmin84
                            module procedure fmin48
                        end interface
                    contains
                        real(8) function fmax88(x, y) result (res)
                            real(8), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                        end function
                        real(4) function fmax44(x, y) result (res)
                            real(4), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                        end function
                        real(8) function fmax84(x, y) result(res)
                            real(8), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                        end function
                        real(8) function fmax48(x, y) result(res)
                            real(4), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                        end function
                        real(8) function fmin88(x, y) result (res)
                            real(8), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                        end function
                        real(4) function fmin44(x, y) result (res)
                            real(4), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                        end function
                        real(8) function fmin84(x, y) result(res)
                            real(8), intent (in) :: x
                            real(4), intent (in) :: y
                            res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                        end function
                        real(8) function fmin48(x, y) result(res)
                            real(4), intent (in) :: x
                            real(8), intent (in) :: y
                            res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                        end function
                    end module
                    
                    real(4) function code(alphax, alphay, u0, cos2phi, sin2phi)
                    use fmin_fmax_functions
                        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
                    end function
                    
                    function code(alphax, alphay, u0, cos2phi, sin2phi)
                    	return Float32(Float32(Float32(-log(Float32(Float32(1.0) - u0))) / Float32(cos2phi / alphax)) * alphax)
                    end
                    
                    function tmp = code(alphax, alphay, u0, cos2phi, sin2phi)
                    	tmp = (-log((single(1.0) - u0)) / (cos2phi / alphax)) * alphax;
                    end
                    
                    \begin{array}{l}
                    
                    \\
                    \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax}} \cdot alphax
                    \end{array}
                    
                    Derivation
                    1. Initial program 59.9%

                      \[\frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{alphax \cdot alphax} + \frac{sin2phi}{alphay \cdot alphay}} \]
                    2. 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. sub-flipN/A

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

                      \[\leadsto \frac{-\log \left(1 - u0\right)}{\color{blue}{\frac{cos2phi}{alphax}}} \cdot alphax \]
                    8. Step-by-step derivation
                      1. lift-/.f3222.0

                        \[\leadsto \frac{-\log \left(1 - u0\right)}{\frac{cos2phi}{\color{blue}{alphax}}} \cdot alphax \]
                    9. Applied rewrites22.0%

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

                    Reproduce

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