\[\frac{x.im \cdot y.re - x.re \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}
\]
↓
\[\begin{array}{l}
t_0 := \mathsf{fma}\left(\frac{1}{\mathsf{hypot}\left(y.re, y.im\right)}, y.re \cdot \frac{x.im}{\mathsf{hypot}\left(y.re, y.im\right)}, \frac{x.re}{\frac{{\left(\mathsf{hypot}\left(y.re, y.im\right)\right)}^{2}}{-y.im}}\right)\\
t_1 := \frac{\frac{y.re}{y.im} \cdot x.im - x.re}{y.im}\\
\mathbf{if}\;y.im \leq -4 \cdot 10^{+163}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;y.im \leq -3.6 \cdot 10^{-116}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 2.6 \cdot 10^{-148}:\\
\;\;\;\;\frac{x.im - \frac{y.im}{\frac{y.re}{x.re}}}{y.re}\\
\mathbf{elif}\;y.im \leq 5.2 \cdot 10^{+159}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
\]
(FPCore (x.re x.im y.re y.im)
:precision binary64
(/ (- (* x.im y.re) (* x.re y.im)) (+ (* y.re y.re) (* y.im y.im))))
↓
(FPCore (x.re x.im y.re y.im)
:precision binary64
(let* ((t_0
(fma
(/ 1.0 (hypot y.re y.im))
(* y.re (/ x.im (hypot y.re y.im)))
(/ x.re (/ (pow (hypot y.re y.im) 2.0) (- y.im)))))
(t_1 (/ (- (* (/ y.re y.im) x.im) x.re) y.im)))
(if (<= y.im -4e+163)
t_1
(if (<= y.im -3.6e-116)
t_0
(if (<= y.im 2.6e-148)
(/ (- x.im (/ y.im (/ y.re x.re))) y.re)
(if (<= y.im 5.2e+159) t_0 t_1))))))double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
return ((x_46_im * y_46_re) - (x_46_re * y_46_im)) / ((y_46_re * y_46_re) + (y_46_im * y_46_im));
}
↓
double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
double t_0 = fma((1.0 / hypot(y_46_re, y_46_im)), (y_46_re * (x_46_im / hypot(y_46_re, y_46_im))), (x_46_re / (pow(hypot(y_46_re, y_46_im), 2.0) / -y_46_im)));
double t_1 = (((y_46_re / y_46_im) * x_46_im) - x_46_re) / y_46_im;
double tmp;
if (y_46_im <= -4e+163) {
tmp = t_1;
} else if (y_46_im <= -3.6e-116) {
tmp = t_0;
} else if (y_46_im <= 2.6e-148) {
tmp = (x_46_im - (y_46_im / (y_46_re / x_46_re))) / y_46_re;
} else if (y_46_im <= 5.2e+159) {
tmp = t_0;
} else {
tmp = t_1;
}
return tmp;
}
function code(x_46_re, x_46_im, y_46_re, y_46_im)
return Float64(Float64(Float64(x_46_im * y_46_re) - Float64(x_46_re * y_46_im)) / Float64(Float64(y_46_re * y_46_re) + Float64(y_46_im * y_46_im)))
end
↓
function code(x_46_re, x_46_im, y_46_re, y_46_im)
t_0 = fma(Float64(1.0 / hypot(y_46_re, y_46_im)), Float64(y_46_re * Float64(x_46_im / hypot(y_46_re, y_46_im))), Float64(x_46_re / Float64((hypot(y_46_re, y_46_im) ^ 2.0) / Float64(-y_46_im))))
t_1 = Float64(Float64(Float64(Float64(y_46_re / y_46_im) * x_46_im) - x_46_re) / y_46_im)
tmp = 0.0
if (y_46_im <= -4e+163)
tmp = t_1;
elseif (y_46_im <= -3.6e-116)
tmp = t_0;
elseif (y_46_im <= 2.6e-148)
tmp = Float64(Float64(x_46_im - Float64(y_46_im / Float64(y_46_re / x_46_re))) / y_46_re);
elseif (y_46_im <= 5.2e+159)
tmp = t_0;
else
tmp = t_1;
end
return tmp
end
code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := N[(N[(N[(x$46$im * y$46$re), $MachinePrecision] - N[(x$46$re * y$46$im), $MachinePrecision]), $MachinePrecision] / N[(N[(y$46$re * y$46$re), $MachinePrecision] + N[(y$46$im * y$46$im), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
↓
code[x$46$re_, x$46$im_, y$46$re_, y$46$im_] := Block[{t$95$0 = N[(N[(1.0 / N[Sqrt[y$46$re ^ 2 + y$46$im ^ 2], $MachinePrecision]), $MachinePrecision] * N[(y$46$re * N[(x$46$im / N[Sqrt[y$46$re ^ 2 + y$46$im ^ 2], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(x$46$re / N[(N[Power[N[Sqrt[y$46$re ^ 2 + y$46$im ^ 2], $MachinePrecision], 2.0], $MachinePrecision] / (-y$46$im)), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(N[(y$46$re / y$46$im), $MachinePrecision] * x$46$im), $MachinePrecision] - x$46$re), $MachinePrecision] / y$46$im), $MachinePrecision]}, If[LessEqual[y$46$im, -4e+163], t$95$1, If[LessEqual[y$46$im, -3.6e-116], t$95$0, If[LessEqual[y$46$im, 2.6e-148], N[(N[(x$46$im - N[(y$46$im / N[(y$46$re / x$46$re), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / y$46$re), $MachinePrecision], If[LessEqual[y$46$im, 5.2e+159], t$95$0, t$95$1]]]]]]
\frac{x.im \cdot y.re - x.re \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}
↓
\begin{array}{l}
t_0 := \mathsf{fma}\left(\frac{1}{\mathsf{hypot}\left(y.re, y.im\right)}, y.re \cdot \frac{x.im}{\mathsf{hypot}\left(y.re, y.im\right)}, \frac{x.re}{\frac{{\left(\mathsf{hypot}\left(y.re, y.im\right)\right)}^{2}}{-y.im}}\right)\\
t_1 := \frac{\frac{y.re}{y.im} \cdot x.im - x.re}{y.im}\\
\mathbf{if}\;y.im \leq -4 \cdot 10^{+163}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;y.im \leq -3.6 \cdot 10^{-116}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 2.6 \cdot 10^{-148}:\\
\;\;\;\;\frac{x.im - \frac{y.im}{\frac{y.re}{x.re}}}{y.re}\\
\mathbf{elif}\;y.im \leq 5.2 \cdot 10^{+159}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
Alternatives
| Alternative 1 |
|---|
| Error | 9.4 |
|---|
| Cost | 14288 |
|---|
\[\begin{array}{l}
t_0 := \frac{1}{\mathsf{hypot}\left(y.re, y.im\right)} \cdot \frac{y.re \cdot x.im - y.im \cdot x.re}{\mathsf{hypot}\left(y.re, y.im\right)}\\
t_1 := \frac{x.im}{y.re} - \frac{y.im}{y.re} \cdot \frac{x.re}{y.re}\\
\mathbf{if}\;y.re \leq -5.2 \cdot 10^{+141}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;y.re \leq -7.5 \cdot 10^{-77}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.re \leq 1.6 \cdot 10^{-141}:\\
\;\;\;\;\frac{\frac{y.re}{y.im} \cdot x.im - x.re}{y.im}\\
\mathbf{elif}\;y.re \leq 6.5 \cdot 10^{+113}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
\]
| Alternative 2 |
|---|
| Error | 14.6 |
|---|
| Cost | 13904 |
|---|
\[\begin{array}{l}
t_0 := \frac{\frac{y.re}{y.im} \cdot x.im - x.re}{y.im}\\
\mathbf{if}\;y.im \leq -5.5 \cdot 10^{+39}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 3.6 \cdot 10^{-64}:\\
\;\;\;\;\frac{x.im - x.re \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{elif}\;y.im \leq 8 \cdot 10^{+56}:\\
\;\;\;\;\frac{y.re \cdot x.im - y.im \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
\mathbf{elif}\;y.im \leq 2.7 \cdot 10^{+112}:\\
\;\;\;\;\frac{x.im}{\mathsf{hypot}\left(y.re, y.im\right)} \cdot \frac{y.re}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{elif}\;y.im \leq 2.2 \cdot 10^{+140}:\\
\;\;\;\;\frac{y.im \cdot \left(-x.re\right)}{\mathsf{fma}\left(y.re, y.re, y.im \cdot y.im\right)}\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 3 |
|---|
| Error | 12.1 |
|---|
| Cost | 1488 |
|---|
\[\begin{array}{l}
t_0 := \frac{y.re \cdot x.im - y.im \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
t_1 := \frac{\frac{y.re}{y.im} \cdot x.im - x.re}{y.im}\\
\mathbf{if}\;y.re \leq -6 \cdot 10^{+101}:\\
\;\;\;\;\frac{x.im - \frac{y.im}{\frac{y.re}{x.re}}}{y.re}\\
\mathbf{elif}\;y.re \leq -2.05 \cdot 10^{-76}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.re \leq 7.2 \cdot 10^{-135}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;y.re \leq 11600:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.re \leq 2.1 \cdot 10^{+42}:\\
\;\;\;\;t_1\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im}{y.re} - \frac{y.im}{y.re} \cdot \frac{x.re}{y.re}\\
\end{array}
\]
| Alternative 4 |
|---|
| Error | 19.3 |
|---|
| Cost | 1104 |
|---|
\[\begin{array}{l}
t_0 := \frac{-x.re}{y.im}\\
t_1 := \frac{x.im - x.re \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{if}\;y.im \leq -1.3 \cdot 10^{+41}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 1.9 \cdot 10^{-9}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;y.im \leq 4.8 \cdot 10^{+66}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 6.5 \cdot 10^{+112}:\\
\;\;\;\;t_1\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 5 |
|---|
| Error | 19.3 |
|---|
| Cost | 1104 |
|---|
\[\begin{array}{l}
t_0 := \frac{-x.re}{y.im}\\
\mathbf{if}\;y.im \leq -2 \cdot 10^{+42}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 1.9 \cdot 10^{-9}:\\
\;\;\;\;\frac{x.im - x.re \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{elif}\;y.im \leq 2.5 \cdot 10^{+67}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 1.25 \cdot 10^{+113}:\\
\;\;\;\;\frac{x.im - \frac{y.im}{\frac{y.re}{x.re}}}{y.re}\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 6 |
|---|
| Error | 15.1 |
|---|
| Cost | 968 |
|---|
\[\begin{array}{l}
\mathbf{if}\;y.im \leq -1.45 \cdot 10^{+41}:\\
\;\;\;\;\frac{\frac{y.re}{y.im} \cdot x.im - x.re}{y.im}\\
\mathbf{elif}\;y.im \leq 4.4 \cdot 10^{-10}:\\
\;\;\;\;\frac{x.im - x.re \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{else}:\\
\;\;\;\;\frac{y.re}{y.im} \cdot \frac{x.im}{y.im} - \frac{x.re}{y.im}\\
\end{array}
\]
| Alternative 7 |
|---|
| Error | 15.2 |
|---|
| Cost | 840 |
|---|
\[\begin{array}{l}
t_0 := \frac{\frac{y.re}{y.im} \cdot x.im - x.re}{y.im}\\
\mathbf{if}\;y.im \leq -2.3 \cdot 10^{+40}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 3.1 \cdot 10^{-10}:\\
\;\;\;\;\frac{x.im - x.re \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 8 |
|---|
| Error | 22.8 |
|---|
| Cost | 520 |
|---|
\[\begin{array}{l}
\mathbf{if}\;y.re \leq -5.6 \cdot 10^{+16}:\\
\;\;\;\;\frac{x.im}{y.re}\\
\mathbf{elif}\;y.re \leq 9.2 \cdot 10^{+45}:\\
\;\;\;\;\frac{-x.re}{y.im}\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im}{y.re}\\
\end{array}
\]
| Alternative 9 |
|---|
| Error | 35.6 |
|---|
| Cost | 324 |
|---|
\[\begin{array}{l}
\mathbf{if}\;y.im \leq 7.8 \cdot 10^{+115}:\\
\;\;\;\;\frac{x.im}{y.re}\\
\mathbf{else}:\\
\;\;\;\;0\\
\end{array}
\]
| Alternative 10 |
|---|
| Error | 51.8 |
|---|
| Cost | 64 |
|---|
\[0
\]