_divideComplex, real part

Percentage Accurate: 61.6% → 80.1%
Time: 8.2s
Alternatives: 9
Speedup: 1.6×

Specification

?
\[\begin{array}{l} \\ \frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \end{array} \]
(FPCore (x.re x.im y.re y.im)
 :precision binary64
 (/ (+ (* x.re y.re) (* x.im y.im)) (+ (* y.re y.re) (* y.im y.im))))
double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
	return ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
}
real(8) function code(x_46re, x_46im, y_46re, y_46im)
    real(8), intent (in) :: x_46re
    real(8), intent (in) :: x_46im
    real(8), intent (in) :: y_46re
    real(8), intent (in) :: y_46im
    code = ((x_46re * y_46re) + (x_46im * y_46im)) / ((y_46re * y_46re) + (y_46im * y_46im))
end function
public static double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
	return ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
}
def code(x_46_re, x_46_im, y_46_re, y_46_im):
	return ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im))
function code(x_46_re, x_46_im, y_46_re, y_46_im)
	return Float64(Float64(Float64(x_46_re * y_46_re) + Float64(x_46_im * y_46_im)) / Float64(Float64(y_46_re * y_46_re) + Float64(y_46_im * y_46_im)))
end
function tmp = code(x_46_re, x_46_im, y_46_re, y_46_im)
	tmp = ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
end
code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := N[(N[(N[(x$46$re * y$46$re), $MachinePrecision] + N[(x$46$im * y$46$im), $MachinePrecision]), $MachinePrecision] / N[(N[(y$46$re * y$46$re), $MachinePrecision] + N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}
\end{array}

Sampling outcomes in binary64 precision:

Local Percentage Accuracy vs ?

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

Accuracy vs Speed?

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

\[\begin{array}{l} \\ \frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \end{array} \]
(FPCore (x.re x.im y.re y.im)
 :precision binary64
 (/ (+ (* x.re y.re) (* x.im y.im)) (+ (* y.re y.re) (* y.im y.im))))
double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
	return ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
}
real(8) function code(x_46re, x_46im, y_46re, y_46im)
    real(8), intent (in) :: x_46re
    real(8), intent (in) :: x_46im
    real(8), intent (in) :: y_46re
    real(8), intent (in) :: y_46im
    code = ((x_46re * y_46re) + (x_46im * y_46im)) / ((y_46re * y_46re) + (y_46im * y_46im))
end function
public static double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
	return ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
}
def code(x_46_re, x_46_im, y_46_re, y_46_im):
	return ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im))
function code(x_46_re, x_46_im, y_46_re, y_46_im)
	return Float64(Float64(Float64(x_46_re * y_46_re) + Float64(x_46_im * y_46_im)) / Float64(Float64(y_46_re * y_46_re) + Float64(y_46_im * y_46_im)))
end
function tmp = code(x_46_re, x_46_im, y_46_re, y_46_im)
	tmp = ((x_46_re * y_46_re) + (x_46_im * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
end
code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := N[(N[(N[(x$46$re * y$46$re), $MachinePrecision] + N[(x$46$im * y$46$im), $MachinePrecision]), $MachinePrecision] / N[(N[(y$46$re * y$46$re), $MachinePrecision] + N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}
\end{array}

Alternative 1: 80.1% accurate, 0.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\ \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;t\_0\\ \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\ \;\;\;\;\frac{x.re - \frac{\mathsf{fma}\left(-x.im, y.im, \frac{\left(y.im \cdot y.im\right) \cdot x.re}{y.re}\right)}{y.re}}{y.re}\\ \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\ \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;t\_0\\ \end{array} \end{array} \]
(FPCore (x.re x.im y.re y.im)
 :precision binary64
 (let* ((t_0 (/ (fma (/ 1.0 (/ y.im x.re)) y.re x.im) y.im)))
   (if (<= y.im -0.0001107)
     t_0
     (if (<= y.im 9.5e-64)
       (/
        (- x.re (/ (fma (- x.im) y.im (/ (* (* y.im y.im) x.re) y.re)) y.re))
        y.re)
       (if (<= y.im 1.85e+75)
         (/ (+ (* x.im y.im) (* y.re x.re)) (+ (* y.re y.re) (* y.im y.im)))
         t_0)))))
double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
	double t_0 = fma((1.0 / (y_46_im / x_46_re)), y_46_re, x_46_im) / y_46_im;
	double tmp;
	if (y_46_im <= -0.0001107) {
		tmp = t_0;
	} else if (y_46_im <= 9.5e-64) {
		tmp = (x_46_re - (fma(-x_46_im, y_46_im, (((y_46_im * y_46_im) * x_46_re) / y_46_re)) / y_46_re)) / y_46_re;
	} else if (y_46_im <= 1.85e+75) {
		tmp = ((x_46_im * y_46_im) + (y_46_re * x_46_re)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
	} else {
		tmp = t_0;
	}
	return tmp;
}
function code(x_46_re, x_46_im, y_46_re, y_46_im)
	t_0 = Float64(fma(Float64(1.0 / Float64(y_46_im / x_46_re)), y_46_re, x_46_im) / y_46_im)
	tmp = 0.0
	if (y_46_im <= -0.0001107)
		tmp = t_0;
	elseif (y_46_im <= 9.5e-64)
		tmp = Float64(Float64(x_46_re - Float64(fma(Float64(-x_46_im), y_46_im, Float64(Float64(Float64(y_46_im * y_46_im) * x_46_re) / y_46_re)) / y_46_re)) / y_46_re);
	elseif (y_46_im <= 1.85e+75)
		tmp = Float64(Float64(Float64(x_46_im * y_46_im) + Float64(y_46_re * x_46_re)) / Float64(Float64(y_46_re * y_46_re) + Float64(y_46_im * y_46_im)));
	else
		tmp = t_0;
	end
	return tmp
end
code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := Block[{t$95$0 = N[(N[(N[(1.0 / N[(y$46$im / x$46$re), $MachinePrecision]), $MachinePrecision] * y$46$re + x$46$im), $MachinePrecision] / y$46$im), $MachinePrecision]}, If[LessEqual[y$46$im, -0.0001107], t$95$0, If[LessEqual[y$46$im, 9.5e-64], N[(N[(x$46$re - N[(N[((-x$46$im) * y$46$im + N[(N[(N[(y$46$im * y$46$im), $MachinePrecision] * x$46$re), $MachinePrecision] / y$46$re), $MachinePrecision]), $MachinePrecision] / y$46$re), $MachinePrecision]), $MachinePrecision] / y$46$re), $MachinePrecision], If[LessEqual[y$46$im, 1.85e+75], N[(N[(N[(x$46$im * y$46$im), $MachinePrecision] + N[(y$46$re * x$46$re), $MachinePrecision]), $MachinePrecision] / N[(N[(y$46$re * y$46$re), $MachinePrecision] + N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$0]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\
\mathbf{if}\;y.im \leq -0.0001107:\\
\;\;\;\;t\_0\\

\mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\
\;\;\;\;\frac{x.re - \frac{\mathsf{fma}\left(-x.im, y.im, \frac{\left(y.im \cdot y.im\right) \cdot x.re}{y.re}\right)}{y.re}}{y.re}\\

\mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\
\;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\

\mathbf{else}:\\
\;\;\;\;t\_0\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if y.im < -1.10699999999999994e-4 or 1.85000000000000005e75 < y.im

    1. Initial program 55.2%

      \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
    2. Add Preprocessing
    3. Taylor expanded in y.im around inf

      \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
    4. Step-by-step derivation
      1. lower-/.f64N/A

        \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
      2. +-commutativeN/A

        \[\leadsto \frac{\color{blue}{\frac{x.re \cdot y.re}{y.im} + x.im}}{y.im} \]
      3. *-commutativeN/A

        \[\leadsto \frac{\frac{\color{blue}{y.re \cdot x.re}}{y.im} + x.im}{y.im} \]
      4. associate-/l*N/A

        \[\leadsto \frac{\color{blue}{y.re \cdot \frac{x.re}{y.im}} + x.im}{y.im} \]
      5. *-commutativeN/A

        \[\leadsto \frac{\color{blue}{\frac{x.re}{y.im} \cdot y.re} + x.im}{y.im} \]
      6. lower-fma.f64N/A

        \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}}{y.im} \]
      7. lower-/.f6486.5

        \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.re}{y.im}}, y.re, x.im\right)}{y.im} \]
    5. Applied rewrites86.5%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}} \]
    6. Step-by-step derivation
      1. Applied rewrites86.5%

        \[\leadsto \frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im} \]

      if -1.10699999999999994e-4 < y.im < 9.50000000000000043e-64

      1. Initial program 70.1%

        \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
      2. Add Preprocessing
      3. Taylor expanded in y.re around inf

        \[\leadsto \color{blue}{\frac{x.re + \left(-1 \cdot \frac{x.re \cdot {y.im}^{2}}{{y.re}^{2}} + \frac{x.im \cdot y.im}{y.re}\right)}{y.re}} \]
      4. Step-by-step derivation
        1. +-commutativeN/A

          \[\leadsto \frac{x.re + \color{blue}{\left(\frac{x.im \cdot y.im}{y.re} + -1 \cdot \frac{x.re \cdot {y.im}^{2}}{{y.re}^{2}}\right)}}{y.re} \]
        2. mul-1-negN/A

          \[\leadsto \frac{x.re + \left(\frac{x.im \cdot y.im}{y.re} + \color{blue}{\left(\mathsf{neg}\left(\frac{x.re \cdot {y.im}^{2}}{{y.re}^{2}}\right)\right)}\right)}{y.re} \]
        3. unsub-negN/A

          \[\leadsto \frac{x.re + \color{blue}{\left(\frac{x.im \cdot y.im}{y.re} - \frac{x.re \cdot {y.im}^{2}}{{y.re}^{2}}\right)}}{y.re} \]
        4. unpow2N/A

          \[\leadsto \frac{x.re + \left(\frac{x.im \cdot y.im}{y.re} - \frac{x.re \cdot {y.im}^{2}}{\color{blue}{y.re \cdot y.re}}\right)}{y.re} \]
        5. associate-/r*N/A

          \[\leadsto \frac{x.re + \left(\frac{x.im \cdot y.im}{y.re} - \color{blue}{\frac{\frac{x.re \cdot {y.im}^{2}}{y.re}}{y.re}}\right)}{y.re} \]
        6. div-subN/A

          \[\leadsto \frac{x.re + \color{blue}{\frac{x.im \cdot y.im - \frac{x.re \cdot {y.im}^{2}}{y.re}}{y.re}}}{y.re} \]
        7. unsub-negN/A

          \[\leadsto \frac{x.re + \frac{\color{blue}{x.im \cdot y.im + \left(\mathsf{neg}\left(\frac{x.re \cdot {y.im}^{2}}{y.re}\right)\right)}}{y.re}}{y.re} \]
        8. mul-1-negN/A

          \[\leadsto \frac{x.re + \frac{x.im \cdot y.im + \color{blue}{-1 \cdot \frac{x.re \cdot {y.im}^{2}}{y.re}}}{y.re}}{y.re} \]
        9. +-commutativeN/A

          \[\leadsto \frac{x.re + \frac{\color{blue}{-1 \cdot \frac{x.re \cdot {y.im}^{2}}{y.re} + x.im \cdot y.im}}{y.re}}{y.re} \]
        10. lower-/.f64N/A

          \[\leadsto \color{blue}{\frac{x.re + \frac{-1 \cdot \frac{x.re \cdot {y.im}^{2}}{y.re} + x.im \cdot y.im}{y.re}}{y.re}} \]
      5. Applied rewrites91.6%

        \[\leadsto \color{blue}{\frac{x.re - \frac{\mathsf{fma}\left(-x.im, y.im, \frac{\left(y.im \cdot y.im\right) \cdot x.re}{y.re}\right)}{y.re}}{y.re}} \]

      if 9.50000000000000043e-64 < y.im < 1.85000000000000005e75

      1. Initial program 91.3%

        \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
      2. Add Preprocessing
    7. Recombined 3 regimes into one program.
    8. Final simplification89.2%

      \[\leadsto \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\ \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\ \;\;\;\;\frac{x.re - \frac{\mathsf{fma}\left(-x.im, y.im, \frac{\left(y.im \cdot y.im\right) \cdot x.re}{y.re}\right)}{y.re}}{y.re}\\ \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\ \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\ \end{array} \]
    9. Add Preprocessing

    Alternative 2: 79.5% accurate, 0.7× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\ \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;t\_0\\ \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\ \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\ \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;t\_0\\ \end{array} \end{array} \]
    (FPCore (x.re x.im y.re y.im)
     :precision binary64
     (let* ((t_0 (/ (fma (/ 1.0 (/ y.im x.re)) y.re x.im) y.im)))
       (if (<= y.im -0.0001107)
         t_0
         (if (<= y.im 9.5e-64)
           (/ (fma (/ x.im y.re) y.im x.re) y.re)
           (if (<= y.im 1.85e+75)
             (/ (+ (* x.im y.im) (* y.re x.re)) (+ (* y.re y.re) (* y.im y.im)))
             t_0)))))
    double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
    	double t_0 = fma((1.0 / (y_46_im / x_46_re)), y_46_re, x_46_im) / y_46_im;
    	double tmp;
    	if (y_46_im <= -0.0001107) {
    		tmp = t_0;
    	} else if (y_46_im <= 9.5e-64) {
    		tmp = fma((x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re;
    	} else if (y_46_im <= 1.85e+75) {
    		tmp = ((x_46_im * y_46_im) + (y_46_re * x_46_re)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
    	} else {
    		tmp = t_0;
    	}
    	return tmp;
    }
    
    function code(x_46_re, x_46_im, y_46_re, y_46_im)
    	t_0 = Float64(fma(Float64(1.0 / Float64(y_46_im / x_46_re)), y_46_re, x_46_im) / y_46_im)
    	tmp = 0.0
    	if (y_46_im <= -0.0001107)
    		tmp = t_0;
    	elseif (y_46_im <= 9.5e-64)
    		tmp = Float64(fma(Float64(x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re);
    	elseif (y_46_im <= 1.85e+75)
    		tmp = Float64(Float64(Float64(x_46_im * y_46_im) + Float64(y_46_re * x_46_re)) / Float64(Float64(y_46_re * y_46_re) + Float64(y_46_im * y_46_im)));
    	else
    		tmp = t_0;
    	end
    	return tmp
    end
    
    code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := Block[{t$95$0 = N[(N[(N[(1.0 / N[(y$46$im / x$46$re), $MachinePrecision]), $MachinePrecision] * y$46$re + x$46$im), $MachinePrecision] / y$46$im), $MachinePrecision]}, If[LessEqual[y$46$im, -0.0001107], t$95$0, If[LessEqual[y$46$im, 9.5e-64], N[(N[(N[(x$46$im / y$46$re), $MachinePrecision] * y$46$im + x$46$re), $MachinePrecision] / y$46$re), $MachinePrecision], If[LessEqual[y$46$im, 1.85e+75], N[(N[(N[(x$46$im * y$46$im), $MachinePrecision] + N[(y$46$re * x$46$re), $MachinePrecision]), $MachinePrecision] / N[(N[(y$46$re * y$46$re), $MachinePrecision] + N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$0]]]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\
    \mathbf{if}\;y.im \leq -0.0001107:\\
    \;\;\;\;t\_0\\
    
    \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\
    \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\
    
    \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\
    \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
    
    \mathbf{else}:\\
    \;\;\;\;t\_0\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 3 regimes
    2. if y.im < -1.10699999999999994e-4 or 1.85000000000000005e75 < y.im

      1. Initial program 55.2%

        \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
      2. Add Preprocessing
      3. Taylor expanded in y.im around inf

        \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
      4. Step-by-step derivation
        1. lower-/.f64N/A

          \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
        2. +-commutativeN/A

          \[\leadsto \frac{\color{blue}{\frac{x.re \cdot y.re}{y.im} + x.im}}{y.im} \]
        3. *-commutativeN/A

          \[\leadsto \frac{\frac{\color{blue}{y.re \cdot x.re}}{y.im} + x.im}{y.im} \]
        4. associate-/l*N/A

          \[\leadsto \frac{\color{blue}{y.re \cdot \frac{x.re}{y.im}} + x.im}{y.im} \]
        5. *-commutativeN/A

          \[\leadsto \frac{\color{blue}{\frac{x.re}{y.im} \cdot y.re} + x.im}{y.im} \]
        6. lower-fma.f64N/A

          \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}}{y.im} \]
        7. lower-/.f6486.5

          \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.re}{y.im}}, y.re, x.im\right)}{y.im} \]
      5. Applied rewrites86.5%

        \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}} \]
      6. Step-by-step derivation
        1. Applied rewrites86.5%

          \[\leadsto \frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im} \]

        if -1.10699999999999994e-4 < y.im < 9.50000000000000043e-64

        1. Initial program 70.1%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
        3. Taylor expanded in y.re around inf

          \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
        4. Step-by-step derivation
          1. lower-/.f64N/A

            \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
          2. +-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.im \cdot y.im}{y.re} + x.re}}{y.re} \]
          3. *-commutativeN/A

            \[\leadsto \frac{\frac{\color{blue}{y.im \cdot x.im}}{y.re} + x.re}{y.re} \]
          4. associate-/l*N/A

            \[\leadsto \frac{\color{blue}{y.im \cdot \frac{x.im}{y.re}} + x.re}{y.re} \]
          5. *-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.im}{y.re} \cdot y.im} + x.re}{y.re} \]
          6. lower-fma.f64N/A

            \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}}{y.re} \]
          7. lower-/.f6490.9

            \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.im}{y.re}}, y.im, x.re\right)}{y.re} \]
        5. Applied rewrites90.9%

          \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}} \]

        if 9.50000000000000043e-64 < y.im < 1.85000000000000005e75

        1. Initial program 91.3%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
      7. Recombined 3 regimes into one program.
      8. Final simplification88.9%

        \[\leadsto \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\ \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\ \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\ \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{1}{\frac{y.im}{x.re}}, y.re, x.im\right)}{y.im}\\ \end{array} \]
      9. Add Preprocessing

      Alternative 3: 79.5% accurate, 0.7× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}\\ \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;t\_0\\ \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\ \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\ \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;t\_0\\ \end{array} \end{array} \]
      (FPCore (x.re x.im y.re y.im)
       :precision binary64
       (let* ((t_0 (/ (fma (/ x.re y.im) y.re x.im) y.im)))
         (if (<= y.im -0.0001107)
           t_0
           (if (<= y.im 9.5e-64)
             (/ (fma (/ x.im y.re) y.im x.re) y.re)
             (if (<= y.im 1.85e+75)
               (/ (+ (* x.im y.im) (* y.re x.re)) (+ (* y.re y.re) (* y.im y.im)))
               t_0)))))
      double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
      	double t_0 = fma((x_46_re / y_46_im), y_46_re, x_46_im) / y_46_im;
      	double tmp;
      	if (y_46_im <= -0.0001107) {
      		tmp = t_0;
      	} else if (y_46_im <= 9.5e-64) {
      		tmp = fma((x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re;
      	} else if (y_46_im <= 1.85e+75) {
      		tmp = ((x_46_im * y_46_im) + (y_46_re * x_46_re)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
      	} else {
      		tmp = t_0;
      	}
      	return tmp;
      }
      
      function code(x_46_re, x_46_im, y_46_re, y_46_im)
      	t_0 = Float64(fma(Float64(x_46_re / y_46_im), y_46_re, x_46_im) / y_46_im)
      	tmp = 0.0
      	if (y_46_im <= -0.0001107)
      		tmp = t_0;
      	elseif (y_46_im <= 9.5e-64)
      		tmp = Float64(fma(Float64(x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re);
      	elseif (y_46_im <= 1.85e+75)
      		tmp = Float64(Float64(Float64(x_46_im * y_46_im) + Float64(y_46_re * x_46_re)) / Float64(Float64(y_46_re * y_46_re) + Float64(y_46_im * y_46_im)));
      	else
      		tmp = t_0;
      	end
      	return tmp
      end
      
      code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := Block[{t$95$0 = N[(N[(N[(x$46$re / y$46$im), $MachinePrecision] * y$46$re + x$46$im), $MachinePrecision] / y$46$im), $MachinePrecision]}, If[LessEqual[y$46$im, -0.0001107], t$95$0, If[LessEqual[y$46$im, 9.5e-64], N[(N[(N[(x$46$im / y$46$re), $MachinePrecision] * y$46$im + x$46$re), $MachinePrecision] / y$46$re), $MachinePrecision], If[LessEqual[y$46$im, 1.85e+75], N[(N[(N[(x$46$im * y$46$im), $MachinePrecision] + N[(y$46$re * x$46$re), $MachinePrecision]), $MachinePrecision] / N[(N[(y$46$re * y$46$re), $MachinePrecision] + N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$0]]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}\\
      \mathbf{if}\;y.im \leq -0.0001107:\\
      \;\;\;\;t\_0\\
      
      \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\
      \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\
      
      \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\
      \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
      
      \mathbf{else}:\\
      \;\;\;\;t\_0\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 3 regimes
      2. if y.im < -1.10699999999999994e-4 or 1.85000000000000005e75 < y.im

        1. Initial program 55.2%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
        3. Taylor expanded in y.im around inf

          \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
        4. Step-by-step derivation
          1. lower-/.f64N/A

            \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
          2. +-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.re \cdot y.re}{y.im} + x.im}}{y.im} \]
          3. *-commutativeN/A

            \[\leadsto \frac{\frac{\color{blue}{y.re \cdot x.re}}{y.im} + x.im}{y.im} \]
          4. associate-/l*N/A

            \[\leadsto \frac{\color{blue}{y.re \cdot \frac{x.re}{y.im}} + x.im}{y.im} \]
          5. *-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.re}{y.im} \cdot y.re} + x.im}{y.im} \]
          6. lower-fma.f64N/A

            \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}}{y.im} \]
          7. lower-/.f6486.5

            \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.re}{y.im}}, y.re, x.im\right)}{y.im} \]
        5. Applied rewrites86.5%

          \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}} \]

        if -1.10699999999999994e-4 < y.im < 9.50000000000000043e-64

        1. Initial program 70.1%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
        3. Taylor expanded in y.re around inf

          \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
        4. Step-by-step derivation
          1. lower-/.f64N/A

            \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
          2. +-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.im \cdot y.im}{y.re} + x.re}}{y.re} \]
          3. *-commutativeN/A

            \[\leadsto \frac{\frac{\color{blue}{y.im \cdot x.im}}{y.re} + x.re}{y.re} \]
          4. associate-/l*N/A

            \[\leadsto \frac{\color{blue}{y.im \cdot \frac{x.im}{y.re}} + x.re}{y.re} \]
          5. *-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.im}{y.re} \cdot y.im} + x.re}{y.re} \]
          6. lower-fma.f64N/A

            \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}}{y.re} \]
          7. lower-/.f6490.9

            \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.im}{y.re}}, y.im, x.re\right)}{y.re} \]
        5. Applied rewrites90.9%

          \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}} \]

        if 9.50000000000000043e-64 < y.im < 1.85000000000000005e75

        1. Initial program 91.3%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
      3. Recombined 3 regimes into one program.
      4. Final simplification88.9%

        \[\leadsto \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}\\ \mathbf{elif}\;y.im \leq 9.5 \cdot 10^{-64}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\ \mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+75}:\\ \;\;\;\;\frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}\\ \end{array} \]
      5. Add Preprocessing

      Alternative 4: 64.1% accurate, 0.7× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{x.im}{y.im}\\ \mathbf{elif}\;y.im \leq 2.65 \cdot 10^{-246}:\\ \;\;\;\;\frac{x.re}{y.re}\\ \mathbf{elif}\;y.im \leq 4.3 \cdot 10^{-45}:\\ \;\;\;\;\frac{\mathsf{fma}\left(x.re, y.re, x.im \cdot y.im\right)}{y.re \cdot y.re}\\ \mathbf{elif}\;y.im \leq 4.4 \cdot 10^{+155}:\\ \;\;\;\;\frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;\frac{x.im}{y.im}\\ \end{array} \end{array} \]
      (FPCore (x.re x.im y.re y.im)
       :precision binary64
       (if (<= y.im -0.0001107)
         (/ x.im y.im)
         (if (<= y.im 2.65e-246)
           (/ x.re y.re)
           (if (<= y.im 4.3e-45)
             (/ (fma x.re y.re (* x.im y.im)) (* y.re y.re))
             (if (<= y.im 4.4e+155)
               (/ (fma y.im x.im (* y.re x.re)) (* y.im y.im))
               (/ x.im y.im))))))
      double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
      	double tmp;
      	if (y_46_im <= -0.0001107) {
      		tmp = x_46_im / y_46_im;
      	} else if (y_46_im <= 2.65e-246) {
      		tmp = x_46_re / y_46_re;
      	} else if (y_46_im <= 4.3e-45) {
      		tmp = fma(x_46_re, y_46_re, (x_46_im * y_46_im)) / (y_46_re * y_46_re);
      	} else if (y_46_im <= 4.4e+155) {
      		tmp = fma(y_46_im, x_46_im, (y_46_re * x_46_re)) / (y_46_im * y_46_im);
      	} else {
      		tmp = x_46_im / y_46_im;
      	}
      	return tmp;
      }
      
      function code(x_46_re, x_46_im, y_46_re, y_46_im)
      	tmp = 0.0
      	if (y_46_im <= -0.0001107)
      		tmp = Float64(x_46_im / y_46_im);
      	elseif (y_46_im <= 2.65e-246)
      		tmp = Float64(x_46_re / y_46_re);
      	elseif (y_46_im <= 4.3e-45)
      		tmp = Float64(fma(x_46_re, y_46_re, Float64(x_46_im * y_46_im)) / Float64(y_46_re * y_46_re));
      	elseif (y_46_im <= 4.4e+155)
      		tmp = Float64(fma(y_46_im, x_46_im, Float64(y_46_re * x_46_re)) / Float64(y_46_im * y_46_im));
      	else
      		tmp = Float64(x_46_im / y_46_im);
      	end
      	return tmp
      end
      
      code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := If[LessEqual[y$46$im, -0.0001107], N[(x$46$im / y$46$im), $MachinePrecision], If[LessEqual[y$46$im, 2.65e-246], N[(x$46$re / y$46$re), $MachinePrecision], If[LessEqual[y$46$im, 4.3e-45], N[(N[(x$46$re * y$46$re + N[(x$46$im * y$46$im), $MachinePrecision]), $MachinePrecision] / N[(y$46$re * y$46$re), $MachinePrecision]), $MachinePrecision], If[LessEqual[y$46$im, 4.4e+155], N[(N[(y$46$im * x$46$im + N[(y$46$re * x$46$re), $MachinePrecision]), $MachinePrecision] / N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision], N[(x$46$im / y$46$im), $MachinePrecision]]]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      \mathbf{if}\;y.im \leq -0.0001107:\\
      \;\;\;\;\frac{x.im}{y.im}\\
      
      \mathbf{elif}\;y.im \leq 2.65 \cdot 10^{-246}:\\
      \;\;\;\;\frac{x.re}{y.re}\\
      
      \mathbf{elif}\;y.im \leq 4.3 \cdot 10^{-45}:\\
      \;\;\;\;\frac{\mathsf{fma}\left(x.re, y.re, x.im \cdot y.im\right)}{y.re \cdot y.re}\\
      
      \mathbf{elif}\;y.im \leq 4.4 \cdot 10^{+155}:\\
      \;\;\;\;\frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{y.im \cdot y.im}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{x.im}{y.im}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 4 regimes
      2. if y.im < -1.10699999999999994e-4 or 4.4000000000000005e155 < y.im

        1. Initial program 53.5%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
        3. Taylor expanded in y.re around 0

          \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
        4. Step-by-step derivation
          1. lower-/.f6478.6

            \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
        5. Applied rewrites78.6%

          \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]

        if -1.10699999999999994e-4 < y.im < 2.64999999999999988e-246

        1. Initial program 64.8%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
        3. Taylor expanded in y.re around inf

          \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]
        4. Step-by-step derivation
          1. lower-/.f6472.8

            \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]
        5. Applied rewrites72.8%

          \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]

        if 2.64999999999999988e-246 < y.im < 4.2999999999999999e-45

        1. Initial program 80.8%

          \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
        2. Add Preprocessing
        3. Taylor expanded in y.re around inf

          \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
        4. Step-by-step derivation
          1. lower-/.f64N/A

            \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
          2. +-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.im \cdot y.im}{y.re} + x.re}}{y.re} \]
          3. *-commutativeN/A

            \[\leadsto \frac{\frac{\color{blue}{y.im \cdot x.im}}{y.re} + x.re}{y.re} \]
          4. associate-/l*N/A

            \[\leadsto \frac{\color{blue}{y.im \cdot \frac{x.im}{y.re}} + x.re}{y.re} \]
          5. *-commutativeN/A

            \[\leadsto \frac{\color{blue}{\frac{x.im}{y.re} \cdot y.im} + x.re}{y.re} \]
          6. lower-fma.f64N/A

            \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}}{y.re} \]
          7. lower-/.f6489.0

            \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.im}{y.re}}, y.im, x.re\right)}{y.re} \]
        5. Applied rewrites89.0%

          \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}} \]
        6. Taylor expanded in y.re around 0

          \[\leadsto \frac{x.im \cdot y.im + x.re \cdot y.re}{\color{blue}{{y.re}^{2}}} \]
        7. Step-by-step derivation
          1. Applied rewrites73.9%

            \[\leadsto \frac{\mathsf{fma}\left(x.re, y.re, y.im \cdot x.im\right)}{\color{blue}{y.re \cdot y.re}} \]

          if 4.2999999999999999e-45 < y.im < 4.4000000000000005e155

          1. Initial program 79.7%

            \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
          2. Add Preprocessing
          3. Taylor expanded in y.re around 0

            \[\leadsto \color{blue}{\frac{x.im}{y.im} + \frac{x.re \cdot y.re}{{y.im}^{2}}} \]
          4. Step-by-step derivation
            1. +-commutativeN/A

              \[\leadsto \color{blue}{\frac{x.re \cdot y.re}{{y.im}^{2}} + \frac{x.im}{y.im}} \]
            2. associate-/l*N/A

              \[\leadsto \color{blue}{x.re \cdot \frac{y.re}{{y.im}^{2}}} + \frac{x.im}{y.im} \]
            3. *-commutativeN/A

              \[\leadsto \color{blue}{\frac{y.re}{{y.im}^{2}} \cdot x.re} + \frac{x.im}{y.im} \]
            4. lower-fma.f64N/A

              \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y.re}{{y.im}^{2}}, x.re, \frac{x.im}{y.im}\right)} \]
            5. lower-/.f64N/A

              \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{y.re}{{y.im}^{2}}}, x.re, \frac{x.im}{y.im}\right) \]
            6. unpow2N/A

              \[\leadsto \mathsf{fma}\left(\frac{y.re}{\color{blue}{y.im \cdot y.im}}, x.re, \frac{x.im}{y.im}\right) \]
            7. lower-*.f64N/A

              \[\leadsto \mathsf{fma}\left(\frac{y.re}{\color{blue}{y.im \cdot y.im}}, x.re, \frac{x.im}{y.im}\right) \]
            8. lower-/.f6461.0

              \[\leadsto \mathsf{fma}\left(\frac{y.re}{y.im \cdot y.im}, x.re, \color{blue}{\frac{x.im}{y.im}}\right) \]
          5. Applied rewrites61.0%

            \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y.re}{y.im \cdot y.im}, x.re, \frac{x.im}{y.im}\right)} \]
          6. Taylor expanded in y.im around 0

            \[\leadsto \frac{x.im \cdot y.im + x.re \cdot y.re}{\color{blue}{{y.im}^{2}}} \]
          7. Step-by-step derivation
            1. Applied rewrites65.9%

              \[\leadsto \frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{\color{blue}{y.im \cdot y.im}} \]
          8. Recombined 4 regimes into one program.
          9. Final simplification74.5%

            \[\leadsto \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{x.im}{y.im}\\ \mathbf{elif}\;y.im \leq 2.65 \cdot 10^{-246}:\\ \;\;\;\;\frac{x.re}{y.re}\\ \mathbf{elif}\;y.im \leq 4.3 \cdot 10^{-45}:\\ \;\;\;\;\frac{\mathsf{fma}\left(x.re, y.re, x.im \cdot y.im\right)}{y.re \cdot y.re}\\ \mathbf{elif}\;y.im \leq 4.4 \cdot 10^{+155}:\\ \;\;\;\;\frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;\frac{x.im}{y.im}\\ \end{array} \]
          10. Add Preprocessing

          Alternative 5: 71.4% accurate, 0.8× speedup?

          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{x.im}{y.im}\\ \mathbf{elif}\;y.im \leq 1.2 \cdot 10^{-42}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\ \mathbf{elif}\;y.im \leq 4.4 \cdot 10^{+155}:\\ \;\;\;\;\frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;\frac{x.im}{y.im}\\ \end{array} \end{array} \]
          (FPCore (x.re x.im y.re y.im)
           :precision binary64
           (if (<= y.im -0.0001107)
             (/ x.im y.im)
             (if (<= y.im 1.2e-42)
               (/ (fma (/ x.im y.re) y.im x.re) y.re)
               (if (<= y.im 4.4e+155)
                 (/ (fma y.im x.im (* y.re x.re)) (* y.im y.im))
                 (/ x.im y.im)))))
          double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
          	double tmp;
          	if (y_46_im <= -0.0001107) {
          		tmp = x_46_im / y_46_im;
          	} else if (y_46_im <= 1.2e-42) {
          		tmp = fma((x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re;
          	} else if (y_46_im <= 4.4e+155) {
          		tmp = fma(y_46_im, x_46_im, (y_46_re * x_46_re)) / (y_46_im * y_46_im);
          	} else {
          		tmp = x_46_im / y_46_im;
          	}
          	return tmp;
          }
          
          function code(x_46_re, x_46_im, y_46_re, y_46_im)
          	tmp = 0.0
          	if (y_46_im <= -0.0001107)
          		tmp = Float64(x_46_im / y_46_im);
          	elseif (y_46_im <= 1.2e-42)
          		tmp = Float64(fma(Float64(x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re);
          	elseif (y_46_im <= 4.4e+155)
          		tmp = Float64(fma(y_46_im, x_46_im, Float64(y_46_re * x_46_re)) / Float64(y_46_im * y_46_im));
          	else
          		tmp = Float64(x_46_im / y_46_im);
          	end
          	return tmp
          end
          
          code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := If[LessEqual[y$46$im, -0.0001107], N[(x$46$im / y$46$im), $MachinePrecision], If[LessEqual[y$46$im, 1.2e-42], N[(N[(N[(x$46$im / y$46$re), $MachinePrecision] * y$46$im + x$46$re), $MachinePrecision] / y$46$re), $MachinePrecision], If[LessEqual[y$46$im, 4.4e+155], N[(N[(y$46$im * x$46$im + N[(y$46$re * x$46$re), $MachinePrecision]), $MachinePrecision] / N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision], N[(x$46$im / y$46$im), $MachinePrecision]]]]
          
          \begin{array}{l}
          
          \\
          \begin{array}{l}
          \mathbf{if}\;y.im \leq -0.0001107:\\
          \;\;\;\;\frac{x.im}{y.im}\\
          
          \mathbf{elif}\;y.im \leq 1.2 \cdot 10^{-42}:\\
          \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\
          
          \mathbf{elif}\;y.im \leq 4.4 \cdot 10^{+155}:\\
          \;\;\;\;\frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{y.im \cdot y.im}\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{x.im}{y.im}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 3 regimes
          2. if y.im < -1.10699999999999994e-4 or 4.4000000000000005e155 < y.im

            1. Initial program 53.5%

              \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
            2. Add Preprocessing
            3. Taylor expanded in y.re around 0

              \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
            4. Step-by-step derivation
              1. lower-/.f6478.6

                \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
            5. Applied rewrites78.6%

              \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]

            if -1.10699999999999994e-4 < y.im < 1.20000000000000001e-42

            1. Initial program 71.1%

              \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
            2. Add Preprocessing
            3. Taylor expanded in y.re around inf

              \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
            4. Step-by-step derivation
              1. lower-/.f64N/A

                \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
              2. +-commutativeN/A

                \[\leadsto \frac{\color{blue}{\frac{x.im \cdot y.im}{y.re} + x.re}}{y.re} \]
              3. *-commutativeN/A

                \[\leadsto \frac{\frac{\color{blue}{y.im \cdot x.im}}{y.re} + x.re}{y.re} \]
              4. associate-/l*N/A

                \[\leadsto \frac{\color{blue}{y.im \cdot \frac{x.im}{y.re}} + x.re}{y.re} \]
              5. *-commutativeN/A

                \[\leadsto \frac{\color{blue}{\frac{x.im}{y.re} \cdot y.im} + x.re}{y.re} \]
              6. lower-fma.f64N/A

                \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}}{y.re} \]
              7. lower-/.f6490.0

                \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.im}{y.re}}, y.im, x.re\right)}{y.re} \]
            5. Applied rewrites90.0%

              \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}} \]

            if 1.20000000000000001e-42 < y.im < 4.4000000000000005e155

            1. Initial program 79.7%

              \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
            2. Add Preprocessing
            3. Taylor expanded in y.re around 0

              \[\leadsto \color{blue}{\frac{x.im}{y.im} + \frac{x.re \cdot y.re}{{y.im}^{2}}} \]
            4. Step-by-step derivation
              1. +-commutativeN/A

                \[\leadsto \color{blue}{\frac{x.re \cdot y.re}{{y.im}^{2}} + \frac{x.im}{y.im}} \]
              2. associate-/l*N/A

                \[\leadsto \color{blue}{x.re \cdot \frac{y.re}{{y.im}^{2}}} + \frac{x.im}{y.im} \]
              3. *-commutativeN/A

                \[\leadsto \color{blue}{\frac{y.re}{{y.im}^{2}} \cdot x.re} + \frac{x.im}{y.im} \]
              4. lower-fma.f64N/A

                \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y.re}{{y.im}^{2}}, x.re, \frac{x.im}{y.im}\right)} \]
              5. lower-/.f64N/A

                \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{y.re}{{y.im}^{2}}}, x.re, \frac{x.im}{y.im}\right) \]
              6. unpow2N/A

                \[\leadsto \mathsf{fma}\left(\frac{y.re}{\color{blue}{y.im \cdot y.im}}, x.re, \frac{x.im}{y.im}\right) \]
              7. lower-*.f64N/A

                \[\leadsto \mathsf{fma}\left(\frac{y.re}{\color{blue}{y.im \cdot y.im}}, x.re, \frac{x.im}{y.im}\right) \]
              8. lower-/.f6461.0

                \[\leadsto \mathsf{fma}\left(\frac{y.re}{y.im \cdot y.im}, x.re, \color{blue}{\frac{x.im}{y.im}}\right) \]
            5. Applied rewrites61.0%

              \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y.re}{y.im \cdot y.im}, x.re, \frac{x.im}{y.im}\right)} \]
            6. Taylor expanded in y.im around 0

              \[\leadsto \frac{x.im \cdot y.im + x.re \cdot y.re}{\color{blue}{{y.im}^{2}}} \]
            7. Step-by-step derivation
              1. Applied rewrites65.9%

                \[\leadsto \frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{\color{blue}{y.im \cdot y.im}} \]
            8. Recombined 3 regimes into one program.
            9. Add Preprocessing

            Alternative 6: 64.2% accurate, 0.8× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{x.im}{y.im}\\ \mathbf{elif}\;y.im \leq 1.95 \cdot 10^{-56}:\\ \;\;\;\;\frac{x.re}{y.re}\\ \mathbf{elif}\;y.im \leq 4.4 \cdot 10^{+155}:\\ \;\;\;\;\frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{y.im \cdot y.im}\\ \mathbf{else}:\\ \;\;\;\;\frac{x.im}{y.im}\\ \end{array} \end{array} \]
            (FPCore (x.re x.im y.re y.im)
             :precision binary64
             (if (<= y.im -0.0001107)
               (/ x.im y.im)
               (if (<= y.im 1.95e-56)
                 (/ x.re y.re)
                 (if (<= y.im 4.4e+155)
                   (/ (fma y.im x.im (* y.re x.re)) (* y.im y.im))
                   (/ x.im y.im)))))
            double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
            	double tmp;
            	if (y_46_im <= -0.0001107) {
            		tmp = x_46_im / y_46_im;
            	} else if (y_46_im <= 1.95e-56) {
            		tmp = x_46_re / y_46_re;
            	} else if (y_46_im <= 4.4e+155) {
            		tmp = fma(y_46_im, x_46_im, (y_46_re * x_46_re)) / (y_46_im * y_46_im);
            	} else {
            		tmp = x_46_im / y_46_im;
            	}
            	return tmp;
            }
            
            function code(x_46_re, x_46_im, y_46_re, y_46_im)
            	tmp = 0.0
            	if (y_46_im <= -0.0001107)
            		tmp = Float64(x_46_im / y_46_im);
            	elseif (y_46_im <= 1.95e-56)
            		tmp = Float64(x_46_re / y_46_re);
            	elseif (y_46_im <= 4.4e+155)
            		tmp = Float64(fma(y_46_im, x_46_im, Float64(y_46_re * x_46_re)) / Float64(y_46_im * y_46_im));
            	else
            		tmp = Float64(x_46_im / y_46_im);
            	end
            	return tmp
            end
            
            code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := If[LessEqual[y$46$im, -0.0001107], N[(x$46$im / y$46$im), $MachinePrecision], If[LessEqual[y$46$im, 1.95e-56], N[(x$46$re / y$46$re), $MachinePrecision], If[LessEqual[y$46$im, 4.4e+155], N[(N[(y$46$im * x$46$im + N[(y$46$re * x$46$re), $MachinePrecision]), $MachinePrecision] / N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision], N[(x$46$im / y$46$im), $MachinePrecision]]]]
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            \mathbf{if}\;y.im \leq -0.0001107:\\
            \;\;\;\;\frac{x.im}{y.im}\\
            
            \mathbf{elif}\;y.im \leq 1.95 \cdot 10^{-56}:\\
            \;\;\;\;\frac{x.re}{y.re}\\
            
            \mathbf{elif}\;y.im \leq 4.4 \cdot 10^{+155}:\\
            \;\;\;\;\frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{y.im \cdot y.im}\\
            
            \mathbf{else}:\\
            \;\;\;\;\frac{x.im}{y.im}\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 3 regimes
            2. if y.im < -1.10699999999999994e-4 or 4.4000000000000005e155 < y.im

              1. Initial program 53.5%

                \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
              2. Add Preprocessing
              3. Taylor expanded in y.re around 0

                \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
              4. Step-by-step derivation
                1. lower-/.f6478.6

                  \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
              5. Applied rewrites78.6%

                \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]

              if -1.10699999999999994e-4 < y.im < 1.95e-56

              1. Initial program 70.9%

                \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
              2. Add Preprocessing
              3. Taylor expanded in y.re around inf

                \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]
              4. Step-by-step derivation
                1. lower-/.f6470.0

                  \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]
              5. Applied rewrites70.0%

                \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]

              if 1.95e-56 < y.im < 4.4000000000000005e155

              1. Initial program 80.3%

                \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
              2. Add Preprocessing
              3. Taylor expanded in y.re around 0

                \[\leadsto \color{blue}{\frac{x.im}{y.im} + \frac{x.re \cdot y.re}{{y.im}^{2}}} \]
              4. Step-by-step derivation
                1. +-commutativeN/A

                  \[\leadsto \color{blue}{\frac{x.re \cdot y.re}{{y.im}^{2}} + \frac{x.im}{y.im}} \]
                2. associate-/l*N/A

                  \[\leadsto \color{blue}{x.re \cdot \frac{y.re}{{y.im}^{2}}} + \frac{x.im}{y.im} \]
                3. *-commutativeN/A

                  \[\leadsto \color{blue}{\frac{y.re}{{y.im}^{2}} \cdot x.re} + \frac{x.im}{y.im} \]
                4. lower-fma.f64N/A

                  \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y.re}{{y.im}^{2}}, x.re, \frac{x.im}{y.im}\right)} \]
                5. lower-/.f64N/A

                  \[\leadsto \mathsf{fma}\left(\color{blue}{\frac{y.re}{{y.im}^{2}}}, x.re, \frac{x.im}{y.im}\right) \]
                6. unpow2N/A

                  \[\leadsto \mathsf{fma}\left(\frac{y.re}{\color{blue}{y.im \cdot y.im}}, x.re, \frac{x.im}{y.im}\right) \]
                7. lower-*.f64N/A

                  \[\leadsto \mathsf{fma}\left(\frac{y.re}{\color{blue}{y.im \cdot y.im}}, x.re, \frac{x.im}{y.im}\right) \]
                8. lower-/.f6459.6

                  \[\leadsto \mathsf{fma}\left(\frac{y.re}{y.im \cdot y.im}, x.re, \color{blue}{\frac{x.im}{y.im}}\right) \]
              5. Applied rewrites59.6%

                \[\leadsto \color{blue}{\mathsf{fma}\left(\frac{y.re}{y.im \cdot y.im}, x.re, \frac{x.im}{y.im}\right)} \]
              6. Taylor expanded in y.im around 0

                \[\leadsto \frac{x.im \cdot y.im + x.re \cdot y.re}{\color{blue}{{y.im}^{2}}} \]
              7. Step-by-step derivation
                1. Applied rewrites64.3%

                  \[\leadsto \frac{\mathsf{fma}\left(y.im, x.im, y.re \cdot x.re\right)}{\color{blue}{y.im \cdot y.im}} \]
              8. Recombined 3 regimes into one program.
              9. Add Preprocessing

              Alternative 7: 77.0% accurate, 0.9× speedup?

              \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}\\ \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;t\_0\\ \mathbf{elif}\;y.im \leq 1.2 \cdot 10^{-42}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\ \mathbf{else}:\\ \;\;\;\;t\_0\\ \end{array} \end{array} \]
              (FPCore (x.re x.im y.re y.im)
               :precision binary64
               (let* ((t_0 (/ (fma (/ x.re y.im) y.re x.im) y.im)))
                 (if (<= y.im -0.0001107)
                   t_0
                   (if (<= y.im 1.2e-42) (/ (fma (/ x.im y.re) y.im x.re) y.re) t_0))))
              double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
              	double t_0 = fma((x_46_re / y_46_im), y_46_re, x_46_im) / y_46_im;
              	double tmp;
              	if (y_46_im <= -0.0001107) {
              		tmp = t_0;
              	} else if (y_46_im <= 1.2e-42) {
              		tmp = fma((x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re;
              	} else {
              		tmp = t_0;
              	}
              	return tmp;
              }
              
              function code(x_46_re, x_46_im, y_46_re, y_46_im)
              	t_0 = Float64(fma(Float64(x_46_re / y_46_im), y_46_re, x_46_im) / y_46_im)
              	tmp = 0.0
              	if (y_46_im <= -0.0001107)
              		tmp = t_0;
              	elseif (y_46_im <= 1.2e-42)
              		tmp = Float64(fma(Float64(x_46_im / y_46_re), y_46_im, x_46_re) / y_46_re);
              	else
              		tmp = t_0;
              	end
              	return tmp
              end
              
              code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := Block[{t$95$0 = N[(N[(N[(x$46$re / y$46$im), $MachinePrecision] * y$46$re + x$46$im), $MachinePrecision] / y$46$im), $MachinePrecision]}, If[LessEqual[y$46$im, -0.0001107], t$95$0, If[LessEqual[y$46$im, 1.2e-42], N[(N[(N[(x$46$im / y$46$re), $MachinePrecision] * y$46$im + x$46$re), $MachinePrecision] / y$46$re), $MachinePrecision], t$95$0]]]
              
              \begin{array}{l}
              
              \\
              \begin{array}{l}
              t_0 := \frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}\\
              \mathbf{if}\;y.im \leq -0.0001107:\\
              \;\;\;\;t\_0\\
              
              \mathbf{elif}\;y.im \leq 1.2 \cdot 10^{-42}:\\
              \;\;\;\;\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}\\
              
              \mathbf{else}:\\
              \;\;\;\;t\_0\\
              
              
              \end{array}
              \end{array}
              
              Derivation
              1. Split input into 2 regimes
              2. if y.im < -1.10699999999999994e-4 or 1.20000000000000001e-42 < y.im

                1. Initial program 59.9%

                  \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
                2. Add Preprocessing
                3. Taylor expanded in y.im around inf

                  \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
                4. Step-by-step derivation
                  1. lower-/.f64N/A

                    \[\leadsto \color{blue}{\frac{x.im + \frac{x.re \cdot y.re}{y.im}}{y.im}} \]
                  2. +-commutativeN/A

                    \[\leadsto \frac{\color{blue}{\frac{x.re \cdot y.re}{y.im} + x.im}}{y.im} \]
                  3. *-commutativeN/A

                    \[\leadsto \frac{\frac{\color{blue}{y.re \cdot x.re}}{y.im} + x.im}{y.im} \]
                  4. associate-/l*N/A

                    \[\leadsto \frac{\color{blue}{y.re \cdot \frac{x.re}{y.im}} + x.im}{y.im} \]
                  5. *-commutativeN/A

                    \[\leadsto \frac{\color{blue}{\frac{x.re}{y.im} \cdot y.re} + x.im}{y.im} \]
                  6. lower-fma.f64N/A

                    \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}}{y.im} \]
                  7. lower-/.f6483.5

                    \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.re}{y.im}}, y.re, x.im\right)}{y.im} \]
                5. Applied rewrites83.5%

                  \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.re}{y.im}, y.re, x.im\right)}{y.im}} \]

                if -1.10699999999999994e-4 < y.im < 1.20000000000000001e-42

                1. Initial program 71.1%

                  \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
                2. Add Preprocessing
                3. Taylor expanded in y.re around inf

                  \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
                4. Step-by-step derivation
                  1. lower-/.f64N/A

                    \[\leadsto \color{blue}{\frac{x.re + \frac{x.im \cdot y.im}{y.re}}{y.re}} \]
                  2. +-commutativeN/A

                    \[\leadsto \frac{\color{blue}{\frac{x.im \cdot y.im}{y.re} + x.re}}{y.re} \]
                  3. *-commutativeN/A

                    \[\leadsto \frac{\frac{\color{blue}{y.im \cdot x.im}}{y.re} + x.re}{y.re} \]
                  4. associate-/l*N/A

                    \[\leadsto \frac{\color{blue}{y.im \cdot \frac{x.im}{y.re}} + x.re}{y.re} \]
                  5. *-commutativeN/A

                    \[\leadsto \frac{\color{blue}{\frac{x.im}{y.re} \cdot y.im} + x.re}{y.re} \]
                  6. lower-fma.f64N/A

                    \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}}{y.re} \]
                  7. lower-/.f6490.0

                    \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\frac{x.im}{y.re}}, y.im, x.re\right)}{y.re} \]
                5. Applied rewrites90.0%

                  \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\frac{x.im}{y.re}, y.im, x.re\right)}{y.re}} \]
              3. Recombined 2 regimes into one program.
              4. Add Preprocessing

              Alternative 8: 63.3% accurate, 1.6× speedup?

              \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y.im \leq -0.0001107:\\ \;\;\;\;\frac{x.im}{y.im}\\ \mathbf{elif}\;y.im \leq 2.05 \cdot 10^{-55}:\\ \;\;\;\;\frac{x.re}{y.re}\\ \mathbf{else}:\\ \;\;\;\;\frac{x.im}{y.im}\\ \end{array} \end{array} \]
              (FPCore (x.re x.im y.re y.im)
               :precision binary64
               (if (<= y.im -0.0001107)
                 (/ x.im y.im)
                 (if (<= y.im 2.05e-55) (/ x.re y.re) (/ x.im y.im))))
              double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
              	double tmp;
              	if (y_46_im <= -0.0001107) {
              		tmp = x_46_im / y_46_im;
              	} else if (y_46_im <= 2.05e-55) {
              		tmp = x_46_re / y_46_re;
              	} else {
              		tmp = x_46_im / y_46_im;
              	}
              	return tmp;
              }
              
              real(8) function code(x_46re, x_46im, y_46re, y_46im)
                  real(8), intent (in) :: x_46re
                  real(8), intent (in) :: x_46im
                  real(8), intent (in) :: y_46re
                  real(8), intent (in) :: y_46im
                  real(8) :: tmp
                  if (y_46im <= (-0.0001107d0)) then
                      tmp = x_46im / y_46im
                  else if (y_46im <= 2.05d-55) then
                      tmp = x_46re / y_46re
                  else
                      tmp = x_46im / y_46im
                  end if
                  code = tmp
              end function
              
              public static double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
              	double tmp;
              	if (y_46_im <= -0.0001107) {
              		tmp = x_46_im / y_46_im;
              	} else if (y_46_im <= 2.05e-55) {
              		tmp = x_46_re / y_46_re;
              	} else {
              		tmp = x_46_im / y_46_im;
              	}
              	return tmp;
              }
              
              def code(x_46_re, x_46_im, y_46_re, y_46_im):
              	tmp = 0
              	if y_46_im <= -0.0001107:
              		tmp = x_46_im / y_46_im
              	elif y_46_im <= 2.05e-55:
              		tmp = x_46_re / y_46_re
              	else:
              		tmp = x_46_im / y_46_im
              	return tmp
              
              function code(x_46_re, x_46_im, y_46_re, y_46_im)
              	tmp = 0.0
              	if (y_46_im <= -0.0001107)
              		tmp = Float64(x_46_im / y_46_im);
              	elseif (y_46_im <= 2.05e-55)
              		tmp = Float64(x_46_re / y_46_re);
              	else
              		tmp = Float64(x_46_im / y_46_im);
              	end
              	return tmp
              end
              
              function tmp_2 = code(x_46_re, x_46_im, y_46_re, y_46_im)
              	tmp = 0.0;
              	if (y_46_im <= -0.0001107)
              		tmp = x_46_im / y_46_im;
              	elseif (y_46_im <= 2.05e-55)
              		tmp = x_46_re / y_46_re;
              	else
              		tmp = x_46_im / y_46_im;
              	end
              	tmp_2 = tmp;
              end
              
              code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := If[LessEqual[y$46$im, -0.0001107], N[(x$46$im / y$46$im), $MachinePrecision], If[LessEqual[y$46$im, 2.05e-55], N[(x$46$re / y$46$re), $MachinePrecision], N[(x$46$im / y$46$im), $MachinePrecision]]]
              
              \begin{array}{l}
              
              \\
              \begin{array}{l}
              \mathbf{if}\;y.im \leq -0.0001107:\\
              \;\;\;\;\frac{x.im}{y.im}\\
              
              \mathbf{elif}\;y.im \leq 2.05 \cdot 10^{-55}:\\
              \;\;\;\;\frac{x.re}{y.re}\\
              
              \mathbf{else}:\\
              \;\;\;\;\frac{x.im}{y.im}\\
              
              
              \end{array}
              \end{array}
              
              Derivation
              1. Split input into 2 regimes
              2. if y.im < -1.10699999999999994e-4 or 2.0499999999999999e-55 < y.im

                1. Initial program 60.2%

                  \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
                2. Add Preprocessing
                3. Taylor expanded in y.re around 0

                  \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
                4. Step-by-step derivation
                  1. lower-/.f6468.9

                    \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
                5. Applied rewrites68.9%

                  \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]

                if -1.10699999999999994e-4 < y.im < 2.0499999999999999e-55

                1. Initial program 70.9%

                  \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
                2. Add Preprocessing
                3. Taylor expanded in y.re around inf

                  \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]
                4. Step-by-step derivation
                  1. lower-/.f6470.0

                    \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]
                5. Applied rewrites70.0%

                  \[\leadsto \color{blue}{\frac{x.re}{y.re}} \]
              3. Recombined 2 regimes into one program.
              4. Add Preprocessing

              Alternative 9: 42.3% accurate, 3.2× speedup?

              \[\begin{array}{l} \\ \frac{x.im}{y.im} \end{array} \]
              (FPCore (x.re x.im y.re y.im) :precision binary64 (/ x.im y.im))
              double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
              	return x_46_im / y_46_im;
              }
              
              real(8) function code(x_46re, x_46im, y_46re, y_46im)
                  real(8), intent (in) :: x_46re
                  real(8), intent (in) :: x_46im
                  real(8), intent (in) :: y_46re
                  real(8), intent (in) :: y_46im
                  code = x_46im / y_46im
              end function
              
              public static double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
              	return x_46_im / y_46_im;
              }
              
              def code(x_46_re, x_46_im, y_46_re, y_46_im):
              	return x_46_im / y_46_im
              
              function code(x_46_re, x_46_im, y_46_re, y_46_im)
              	return Float64(x_46_im / y_46_im)
              end
              
              function tmp = code(x_46_re, x_46_im, y_46_re, y_46_im)
              	tmp = x_46_im / y_46_im;
              end
              
              code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := N[(x$46$im / y$46$im), $MachinePrecision]
              
              \begin{array}{l}
              
              \\
              \frac{x.im}{y.im}
              \end{array}
              
              Derivation
              1. Initial program 65.0%

                \[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im} \]
              2. Add Preprocessing
              3. Taylor expanded in y.re around 0

                \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
              4. Step-by-step derivation
                1. lower-/.f6444.5

                  \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
              5. Applied rewrites44.5%

                \[\leadsto \color{blue}{\frac{x.im}{y.im}} \]
              6. Add Preprocessing

              Reproduce

              ?
              herbie shell --seed 2024235 
              (FPCore (x.re x.im y.re y.im)
                :name "_divideComplex, real part"
                :precision binary64
                (/ (+ (* x.re y.re) (* x.im y.im)) (+ (* y.re y.re) (* y.im y.im))))