\[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606}
\]
↓
\[\begin{array}{l}
t_0 := 313.399215894 + x \cdot \left(263.505074721 + x \cdot \left(x + 43.3400022514\right)\right)\\
t_1 := 47.066876606 + x \cdot t_0\\
\mathbf{if}\;x \leq -4.1 \cdot 10^{+71} \lor \neg \left(x \leq 2.2 \cdot 10^{+56}\right):\\
\;\;\;\;\frac{x + -2}{0.24013125253755718}\\
\mathbf{else}:\\
\;\;\;\;\left(x + -2\right) \cdot \left(x \cdot \frac{y}{\mathsf{fma}\left(t_0, x, 47.066876606\right)} + \left(\frac{{x}^{2} \cdot \left(137.519416416 + x \cdot \left(78.6994924154 + x \cdot 4.16438922228\right)\right)}{t_1} + \frac{z}{t_1}\right)\right)\\
\end{array}
\]
(FPCore (x y z)
:precision binary64
(/
(*
(- x 2.0)
(+
(*
(+ (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x) y)
x)
z))
(+
(* (+ (* (+ (* (+ x 43.3400022514) x) 263.505074721) x) 313.399215894) x)
47.066876606)))↓
(FPCore (x y z)
:precision binary64
(let* ((t_0
(+ 313.399215894 (* x (+ 263.505074721 (* x (+ x 43.3400022514))))))
(t_1 (+ 47.066876606 (* x t_0))))
(if (or (<= x -4.1e+71) (not (<= x 2.2e+56)))
(/ (+ x -2.0) 0.24013125253755718)
(*
(+ x -2.0)
(+
(* x (/ y (fma t_0 x 47.066876606)))
(+
(/
(*
(pow x 2.0)
(+ 137.519416416 (* x (+ 78.6994924154 (* x 4.16438922228)))))
t_1)
(/ z t_1)))))))double code(double x, double y, double z) {
return ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606);
}
↓
double code(double x, double y, double z) {
double t_0 = 313.399215894 + (x * (263.505074721 + (x * (x + 43.3400022514))));
double t_1 = 47.066876606 + (x * t_0);
double tmp;
if ((x <= -4.1e+71) || !(x <= 2.2e+56)) {
tmp = (x + -2.0) / 0.24013125253755718;
} else {
tmp = (x + -2.0) * ((x * (y / fma(t_0, x, 47.066876606))) + (((pow(x, 2.0) * (137.519416416 + (x * (78.6994924154 + (x * 4.16438922228))))) / t_1) + (z / t_1)));
}
return tmp;
}
function code(x, y, z)
return Float64(Float64(Float64(x - 2.0) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / Float64(Float64(Float64(Float64(Float64(Float64(Float64(x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606))
end
↓
function code(x, y, z)
t_0 = Float64(313.399215894 + Float64(x * Float64(263.505074721 + Float64(x * Float64(x + 43.3400022514)))))
t_1 = Float64(47.066876606 + Float64(x * t_0))
tmp = 0.0
if ((x <= -4.1e+71) || !(x <= 2.2e+56))
tmp = Float64(Float64(x + -2.0) / 0.24013125253755718);
else
tmp = Float64(Float64(x + -2.0) * Float64(Float64(x * Float64(y / fma(t_0, x, 47.066876606))) + Float64(Float64(Float64((x ^ 2.0) * Float64(137.519416416 + Float64(x * Float64(78.6994924154 + Float64(x * 4.16438922228))))) / t_1) + Float64(z / t_1))));
end
return tmp
end
code[x_, y_, z_] := N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(x * 4.16438922228), $MachinePrecision] + 78.6994924154), $MachinePrecision] * x), $MachinePrecision] + 137.519416416), $MachinePrecision] * x), $MachinePrecision] + y), $MachinePrecision] * x), $MachinePrecision] + z), $MachinePrecision]), $MachinePrecision] / N[(N[(N[(N[(N[(N[(N[(x + 43.3400022514), $MachinePrecision] * x), $MachinePrecision] + 263.505074721), $MachinePrecision] * x), $MachinePrecision] + 313.399215894), $MachinePrecision] * x), $MachinePrecision] + 47.066876606), $MachinePrecision]), $MachinePrecision]
↓
code[x_, y_, z_] := Block[{t$95$0 = N[(313.399215894 + N[(x * N[(263.505074721 + N[(x * N[(x + 43.3400022514), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(47.066876606 + N[(x * t$95$0), $MachinePrecision]), $MachinePrecision]}, If[Or[LessEqual[x, -4.1e+71], N[Not[LessEqual[x, 2.2e+56]], $MachinePrecision]], N[(N[(x + -2.0), $MachinePrecision] / 0.24013125253755718), $MachinePrecision], N[(N[(x + -2.0), $MachinePrecision] * N[(N[(x * N[(y / N[(t$95$0 * x + 47.066876606), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(N[Power[x, 2.0], $MachinePrecision] * N[(137.519416416 + N[(x * N[(78.6994924154 + N[(x * 4.16438922228), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / t$95$1), $MachinePrecision] + N[(z / t$95$1), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606}
↓
\begin{array}{l}
t_0 := 313.399215894 + x \cdot \left(263.505074721 + x \cdot \left(x + 43.3400022514\right)\right)\\
t_1 := 47.066876606 + x \cdot t_0\\
\mathbf{if}\;x \leq -4.1 \cdot 10^{+71} \lor \neg \left(x \leq 2.2 \cdot 10^{+56}\right):\\
\;\;\;\;\frac{x + -2}{0.24013125253755718}\\
\mathbf{else}:\\
\;\;\;\;\left(x + -2\right) \cdot \left(x \cdot \frac{y}{\mathsf{fma}\left(t_0, x, 47.066876606\right)} + \left(\frac{{x}^{2} \cdot \left(137.519416416 + x \cdot \left(78.6994924154 + x \cdot 4.16438922228\right)\right)}{t_1} + \frac{z}{t_1}\right)\right)\\
\end{array}