\[\frac{x}{x \cdot x + 1}
\]
↓
\[\begin{array}{l}
t_0 := x \cdot x + -1\\
\mathbf{if}\;x \leq -40000000000:\\
\;\;\;\;\frac{1}{x}\\
\mathbf{elif}\;x \leq 5000:\\
\;\;\;\;\frac{\frac{x \cdot t_0}{1 + x \cdot x}}{t_0}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{x} - {x}^{-3}\\
\end{array}
\]
(FPCore (x) :precision binary64 (/ x (+ (* x x) 1.0)))
↓
(FPCore (x)
:precision binary64
(let* ((t_0 (+ (* x x) -1.0)))
(if (<= x -40000000000.0)
(/ 1.0 x)
(if (<= x 5000.0)
(/ (/ (* x t_0) (+ 1.0 (* x x))) t_0)
(- (/ 1.0 x) (pow x -3.0))))))double code(double x) {
return x / ((x * x) + 1.0);
}
↓
double code(double x) {
double t_0 = (x * x) + -1.0;
double tmp;
if (x <= -40000000000.0) {
tmp = 1.0 / x;
} else if (x <= 5000.0) {
tmp = ((x * t_0) / (1.0 + (x * x))) / t_0;
} else {
tmp = (1.0 / x) - pow(x, -3.0);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
code = x / ((x * x) + 1.0d0)
end function
↓
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
real(8) :: tmp
t_0 = (x * x) + (-1.0d0)
if (x <= (-40000000000.0d0)) then
tmp = 1.0d0 / x
else if (x <= 5000.0d0) then
tmp = ((x * t_0) / (1.0d0 + (x * x))) / t_0
else
tmp = (1.0d0 / x) - (x ** (-3.0d0))
end if
code = tmp
end function
public static double code(double x) {
return x / ((x * x) + 1.0);
}
↓
public static double code(double x) {
double t_0 = (x * x) + -1.0;
double tmp;
if (x <= -40000000000.0) {
tmp = 1.0 / x;
} else if (x <= 5000.0) {
tmp = ((x * t_0) / (1.0 + (x * x))) / t_0;
} else {
tmp = (1.0 / x) - Math.pow(x, -3.0);
}
return tmp;
}
def code(x):
return x / ((x * x) + 1.0)
↓
def code(x):
t_0 = (x * x) + -1.0
tmp = 0
if x <= -40000000000.0:
tmp = 1.0 / x
elif x <= 5000.0:
tmp = ((x * t_0) / (1.0 + (x * x))) / t_0
else:
tmp = (1.0 / x) - math.pow(x, -3.0)
return tmp
function code(x)
return Float64(x / Float64(Float64(x * x) + 1.0))
end
↓
function code(x)
t_0 = Float64(Float64(x * x) + -1.0)
tmp = 0.0
if (x <= -40000000000.0)
tmp = Float64(1.0 / x);
elseif (x <= 5000.0)
tmp = Float64(Float64(Float64(x * t_0) / Float64(1.0 + Float64(x * x))) / t_0);
else
tmp = Float64(Float64(1.0 / x) - (x ^ -3.0));
end
return tmp
end
function tmp = code(x)
tmp = x / ((x * x) + 1.0);
end
↓
function tmp_2 = code(x)
t_0 = (x * x) + -1.0;
tmp = 0.0;
if (x <= -40000000000.0)
tmp = 1.0 / x;
elseif (x <= 5000.0)
tmp = ((x * t_0) / (1.0 + (x * x))) / t_0;
else
tmp = (1.0 / x) - (x ^ -3.0);
end
tmp_2 = tmp;
end
code[x_] := N[(x / N[(N[(x * x), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]
↓
code[x_] := Block[{t$95$0 = N[(N[(x * x), $MachinePrecision] + -1.0), $MachinePrecision]}, If[LessEqual[x, -40000000000.0], N[(1.0 / x), $MachinePrecision], If[LessEqual[x, 5000.0], N[(N[(N[(x * t$95$0), $MachinePrecision] / N[(1.0 + N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / t$95$0), $MachinePrecision], N[(N[(1.0 / x), $MachinePrecision] - N[Power[x, -3.0], $MachinePrecision]), $MachinePrecision]]]]
\frac{x}{x \cdot x + 1}
↓
\begin{array}{l}
t_0 := x \cdot x + -1\\
\mathbf{if}\;x \leq -40000000000:\\
\;\;\;\;\frac{1}{x}\\
\mathbf{elif}\;x \leq 5000:\\
\;\;\;\;\frac{\frac{x \cdot t_0}{1 + x \cdot x}}{t_0}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{x} - {x}^{-3}\\
\end{array}