\[\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}
\]
↓
\[\begin{array}{l}
t_0 := \frac{\frac{\mathsf{fma}\left(x.re, y.re, x.im \cdot y.im\right)}{\mathsf{hypot}\left(y.re, y.im\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
t_1 := \frac{x.im \cdot \frac{y.im}{\mathsf{hypot}\left(y.im, y.re\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{if}\;x.im \leq -4.8 \cdot 10^{+21}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;x.im \leq -1.36 \cdot 10^{-161}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;x.im \leq 2 \cdot 10^{-181}:\\
\;\;\;\;\frac{y.re \cdot \frac{x.re}{\mathsf{hypot}\left(y.im, y.re\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{elif}\;x.im \leq 1.6 \cdot 10^{+110}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\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))))
↓
(FPCore (x.re x.im y.re y.im)
:precision binary64
(let* ((t_0
(/
(/ (fma x.re y.re (* x.im y.im)) (hypot y.re y.im))
(hypot y.re y.im)))
(t_1 (/ (* x.im (/ y.im (hypot y.im y.re))) (hypot y.re y.im))))
(if (<= x.im -4.8e+21)
t_1
(if (<= x.im -1.36e-161)
t_0
(if (<= x.im 2e-181)
(/ (* y.re (/ x.re (hypot y.im y.re))) (hypot y.re y.im))
(if (<= x.im 1.6e+110) 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_re * y_46_re) + (x_46_im * 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(x_46_re, y_46_re, (x_46_im * y_46_im)) / hypot(y_46_re, y_46_im)) / hypot(y_46_re, y_46_im);
double t_1 = (x_46_im * (y_46_im / hypot(y_46_im, y_46_re))) / hypot(y_46_re, y_46_im);
double tmp;
if (x_46_im <= -4.8e+21) {
tmp = t_1;
} else if (x_46_im <= -1.36e-161) {
tmp = t_0;
} else if (x_46_im <= 2e-181) {
tmp = (y_46_re * (x_46_re / hypot(y_46_im, y_46_re))) / hypot(y_46_re, y_46_im);
} else if (x_46_im <= 1.6e+110) {
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_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 code(x_46_re, x_46_im, y_46_re, y_46_im)
t_0 = Float64(Float64(fma(x_46_re, y_46_re, Float64(x_46_im * y_46_im)) / hypot(y_46_re, y_46_im)) / hypot(y_46_re, y_46_im))
t_1 = Float64(Float64(x_46_im * Float64(y_46_im / hypot(y_46_im, y_46_re))) / hypot(y_46_re, y_46_im))
tmp = 0.0
if (x_46_im <= -4.8e+21)
tmp = t_1;
elseif (x_46_im <= -1.36e-161)
tmp = t_0;
elseif (x_46_im <= 2e-181)
tmp = Float64(Float64(y_46_re * Float64(x_46_re / hypot(y_46_im, y_46_re))) / hypot(y_46_re, y_46_im));
elseif (x_46_im <= 1.6e+110)
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$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]
↓
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$re + N[(x$46$im * y$46$im), $MachinePrecision]), $MachinePrecision] / N[Sqrt[y$46$re ^ 2 + y$46$im ^ 2], $MachinePrecision]), $MachinePrecision] / N[Sqrt[y$46$re ^ 2 + y$46$im ^ 2], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(x$46$im * N[(y$46$im / N[Sqrt[y$46$im ^ 2 + y$46$re ^ 2], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[Sqrt[y$46$re ^ 2 + y$46$im ^ 2], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x$46$im, -4.8e+21], t$95$1, If[LessEqual[x$46$im, -1.36e-161], t$95$0, If[LessEqual[x$46$im, 2e-181], N[(N[(y$46$re * N[(x$46$re / N[Sqrt[y$46$im ^ 2 + y$46$re ^ 2], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[Sqrt[y$46$re ^ 2 + y$46$im ^ 2], $MachinePrecision]), $MachinePrecision], If[LessEqual[x$46$im, 1.6e+110], t$95$0, t$95$1]]]]]]
\frac{x.re \cdot y.re + x.im \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}
↓
\begin{array}{l}
t_0 := \frac{\frac{\mathsf{fma}\left(x.re, y.re, x.im \cdot y.im\right)}{\mathsf{hypot}\left(y.re, y.im\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
t_1 := \frac{x.im \cdot \frac{y.im}{\mathsf{hypot}\left(y.im, y.re\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{if}\;x.im \leq -4.8 \cdot 10^{+21}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;x.im \leq -1.36 \cdot 10^{-161}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;x.im \leq 2 \cdot 10^{-181}:\\
\;\;\;\;\frac{y.re \cdot \frac{x.re}{\mathsf{hypot}\left(y.im, y.re\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{elif}\;x.im \leq 1.6 \cdot 10^{+110}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
Alternatives
| Alternative 1 |
|---|
| Error | 13.9 |
|---|
| Cost | 13904 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
\mathbf{if}\;y.re \leq -2.15 \cdot 10^{+145}:\\
\;\;\;\;\frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{elif}\;y.re \leq -1.8 \cdot 10^{-63}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.re \leq -6.8 \cdot 10^{-129}:\\
\;\;\;\;\mathsf{fma}\left(x.re, y.re \cdot \frac{\frac{1}{y.im}}{y.im}, \frac{x.im}{y.im}\right)\\
\mathbf{elif}\;y.re \leq -1.15 \cdot 10^{-234}:\\
\;\;\;\;\frac{x.im \cdot \frac{y.im}{\mathsf{hypot}\left(y.im, y.re\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{elif}\;y.re \leq 1.62 \cdot 10^{-71}:\\
\;\;\;\;\left(x.im + y.re \cdot \frac{x.re}{y.im}\right) \cdot \frac{1}{y.im}\\
\mathbf{elif}\;y.re \leq 2.05 \cdot 10^{-12}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.re \leq 39:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{else}:\\
\;\;\;\;\frac{x.re + \frac{y.im}{\frac{y.re}{x.im}}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\end{array}
\]
| Alternative 2 |
|---|
| Error | 12.8 |
|---|
| Cost | 7700 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
\mathbf{if}\;y.im \leq -1 \cdot 10^{+145}:\\
\;\;\;\;\frac{x.im}{y.im} + \frac{x.re}{y.im} \cdot \frac{y.re}{y.im}\\
\mathbf{elif}\;y.im \leq -2.55 \cdot 10^{-135}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 5.5 \cdot 10^{-103}:\\
\;\;\;\;\frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{elif}\;y.im \leq 3 \cdot 10^{-9}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 4.2 \cdot 10^{+54}:\\
\;\;\;\;\frac{x.re}{y.re} + x.im \cdot \frac{y.im}{y.re \cdot y.re}\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im + y.re \cdot \frac{x.re}{y.im}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\end{array}
\]
| Alternative 3 |
|---|
| Error | 12.9 |
|---|
| Cost | 7700 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
\mathbf{if}\;y.im \leq -1.15 \cdot 10^{+145}:\\
\;\;\;\;\frac{\left(-x.im\right) - \frac{x.re}{\frac{y.im}{y.re}}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{elif}\;y.im \leq -1.08 \cdot 10^{-138}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 3.5 \cdot 10^{-104}:\\
\;\;\;\;\frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{elif}\;y.im \leq 2.4 \cdot 10^{-16}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 1.15 \cdot 10^{+54}:\\
\;\;\;\;\frac{x.re}{y.re} + x.im \cdot \frac{y.im}{y.re \cdot y.re}\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im + y.re \cdot \frac{x.re}{y.im}}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\end{array}
\]
| Alternative 4 |
|---|
| Error | 12.5 |
|---|
| Cost | 7700 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
t_1 := x.im + y.re \cdot \frac{x.re}{y.im}\\
\mathbf{if}\;y.im \leq -1.32 \cdot 10^{+76}:\\
\;\;\;\;t_1 \cdot \frac{-1}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\mathbf{elif}\;y.im \leq -4.4 \cdot 10^{-138}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 1.8 \cdot 10^{-103}:\\
\;\;\;\;\frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{elif}\;y.im \leq 3 \cdot 10^{-9}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 1.2 \cdot 10^{+54}:\\
\;\;\;\;\frac{x.re}{y.re} + x.im \cdot \frac{y.im}{y.re \cdot y.re}\\
\mathbf{else}:\\
\;\;\;\;\frac{t_1}{\mathsf{hypot}\left(y.re, y.im\right)}\\
\end{array}
\]
| Alternative 5 |
|---|
| Error | 19.1 |
|---|
| Cost | 1496 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{if}\;y.re \leq -4.2 \cdot 10^{-9}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.re \leq -4.3 \cdot 10^{-108}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.re \leq -1.25 \cdot 10^{-128}:\\
\;\;\;\;\left(y.re \cdot x.re\right) \cdot \frac{\frac{-1}{y.im}}{-y.im}\\
\mathbf{elif}\;y.re \leq 1.5 \cdot 10^{-72}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.re \leq 1.95 \cdot 10^{-44}:\\
\;\;\;\;\frac{y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
\mathbf{elif}\;y.re \leq 50:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 6 |
|---|
| Error | 13.0 |
|---|
| Cost | 1488 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.im \cdot y.im + y.re \cdot x.re}{y.re \cdot y.re + y.im \cdot y.im}\\
t_1 := \frac{x.im}{y.im} + \frac{x.re}{y.im} \cdot \frac{y.re}{y.im}\\
\mathbf{if}\;y.im \leq -9.5 \cdot 10^{+144}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;y.im \leq -6.9 \cdot 10^{-130}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 3.5 \cdot 10^{-103}:\\
\;\;\;\;\frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{elif}\;y.im \leq 3 \cdot 10^{-9}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 4.8 \cdot 10^{+54}:\\
\;\;\;\;\frac{x.re}{y.re} + x.im \cdot \frac{y.im}{y.re \cdot y.re}\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
\]
| Alternative 7 |
|---|
| Error | 19.4 |
|---|
| Cost | 1232 |
|---|
\[\begin{array}{l}
t_0 := \frac{1}{y.re} \cdot \left(x.re + x.im \cdot \frac{y.im}{y.re}\right)\\
\mathbf{if}\;y.im \leq -5.8 \cdot 10^{+53}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq -3.5 \cdot 10^{-39}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq -1.8 \cdot 10^{-66}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq 1.35 \cdot 10^{+54}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\end{array}
\]
| Alternative 8 |
|---|
| Error | 19.6 |
|---|
| Cost | 1232 |
|---|
\[\begin{array}{l}
\mathbf{if}\;y.im \leq -1 \cdot 10^{+53}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq -3.5 \cdot 10^{-39}:\\
\;\;\;\;\frac{x.re}{y.re} + x.im \cdot \frac{y.im}{y.re \cdot y.re}\\
\mathbf{elif}\;y.im \leq -5.5 \cdot 10^{-67}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq 3.8 \cdot 10^{+54}:\\
\;\;\;\;\frac{1}{y.re} \cdot \left(x.re + x.im \cdot \frac{y.im}{y.re}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\end{array}
\]
| Alternative 9 |
|---|
| Error | 19.5 |
|---|
| Cost | 1232 |
|---|
\[\begin{array}{l}
\mathbf{if}\;y.im \leq -9 \cdot 10^{+52}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq -3.5 \cdot 10^{-39}:\\
\;\;\;\;\frac{x.re}{y.re} + x.im \cdot \frac{y.im}{y.re \cdot y.re}\\
\mathbf{elif}\;y.im \leq -1.8 \cdot 10^{-66}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq 3.6 \cdot 10^{+54}:\\
\;\;\;\;\frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\end{array}
\]
| Alternative 10 |
|---|
| Error | 16.1 |
|---|
| Cost | 1232 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.im}{y.im} + \frac{x.re}{y.im} \cdot \frac{y.re}{y.im}\\
\mathbf{if}\;y.im \leq -8.5 \cdot 10^{+52}:\\
\;\;\;\;\left(x.im + y.re \cdot \frac{x.re}{y.im}\right) \cdot \frac{1}{y.im}\\
\mathbf{elif}\;y.im \leq -3.5 \cdot 10^{-39}:\\
\;\;\;\;\frac{x.re}{y.re} + x.im \cdot \frac{y.im}{y.re \cdot y.re}\\
\mathbf{elif}\;y.im \leq -1.6 \cdot 10^{-68}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.im \leq 1.85 \cdot 10^{+54}:\\
\;\;\;\;\frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 11 |
|---|
| Error | 15.4 |
|---|
| Cost | 968 |
|---|
\[\begin{array}{l}
t_0 := \frac{x.re}{y.re} + \frac{x.im \cdot \frac{y.im}{y.re}}{y.re}\\
\mathbf{if}\;y.re \leq -4 \cdot 10^{-6}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;y.re \leq 100:\\
\;\;\;\;\left(x.im + y.re \cdot \frac{x.re}{y.im}\right) \cdot \frac{1}{y.im}\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 12 |
|---|
| Error | 23.4 |
|---|
| Cost | 720 |
|---|
\[\begin{array}{l}
\mathbf{if}\;y.im \leq -3.8 \cdot 10^{+53}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq -3.5 \cdot 10^{-39}:\\
\;\;\;\;\frac{x.re}{y.re}\\
\mathbf{elif}\;y.im \leq -1.25 \cdot 10^{-68}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\mathbf{elif}\;y.im \leq 4.8 \cdot 10^{+19}:\\
\;\;\;\;\frac{x.re}{y.re}\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im}{y.im}\\
\end{array}
\]
| Alternative 13 |
|---|
| Error | 37.1 |
|---|
| Cost | 192 |
|---|
\[\frac{x.im}{y.im}
\]