\[\left(\left(-2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)\right) \cdot \sqrt{1 + {\left(\frac{U}{\left(2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)}\right)}^{2}}
\]
↓
\[\begin{array}{l}
t_0 := \cos \left(\frac{K}{2}\right)\\
t_1 := J \cdot \left(\mathsf{hypot}\left(1, \frac{U}{t_0 \cdot \left(J \cdot 2\right)}\right) \cdot \left(t_0 \cdot -2\right)\right)\\
\mathbf{if}\;J \leq -1.0377437032178969 \cdot 10^{-236}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;U\\
\mathbf{elif}\;J \leq 1.0640764951653267 \cdot 10^{-249}:\\
\;\;\;\;-U\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
\]
(FPCore (J K U)
:precision binary64
(*
(* (* -2.0 J) (cos (/ K 2.0)))
(sqrt (+ 1.0 (pow (/ U (* (* 2.0 J) (cos (/ K 2.0)))) 2.0)))))
↓
(FPCore (J K U)
:precision binary64
(let* ((t_0 (cos (/ K 2.0)))
(t_1 (* J (* (hypot 1.0 (/ U (* t_0 (* J 2.0)))) (* t_0 -2.0)))))
(if (<= J -1.0377437032178969e-236)
t_1
(if (<= J -1.054361271269357e-266)
U
(if (<= J 1.0640764951653267e-249) (- U) t_1)))))double code(double J, double K, double U) {
return ((-2.0 * J) * cos((K / 2.0))) * sqrt((1.0 + pow((U / ((2.0 * J) * cos((K / 2.0)))), 2.0)));
}
↓
double code(double J, double K, double U) {
double t_0 = cos((K / 2.0));
double t_1 = J * (hypot(1.0, (U / (t_0 * (J * 2.0)))) * (t_0 * -2.0));
double tmp;
if (J <= -1.0377437032178969e-236) {
tmp = t_1;
} else if (J <= -1.054361271269357e-266) {
tmp = U;
} else if (J <= 1.0640764951653267e-249) {
tmp = -U;
} else {
tmp = t_1;
}
return tmp;
}
public static double code(double J, double K, double U) {
return ((-2.0 * J) * Math.cos((K / 2.0))) * Math.sqrt((1.0 + Math.pow((U / ((2.0 * J) * Math.cos((K / 2.0)))), 2.0)));
}
↓
public static double code(double J, double K, double U) {
double t_0 = Math.cos((K / 2.0));
double t_1 = J * (Math.hypot(1.0, (U / (t_0 * (J * 2.0)))) * (t_0 * -2.0));
double tmp;
if (J <= -1.0377437032178969e-236) {
tmp = t_1;
} else if (J <= -1.054361271269357e-266) {
tmp = U;
} else if (J <= 1.0640764951653267e-249) {
tmp = -U;
} else {
tmp = t_1;
}
return tmp;
}
def code(J, K, U):
return ((-2.0 * J) * math.cos((K / 2.0))) * math.sqrt((1.0 + math.pow((U / ((2.0 * J) * math.cos((K / 2.0)))), 2.0)))
↓
def code(J, K, U):
t_0 = math.cos((K / 2.0))
t_1 = J * (math.hypot(1.0, (U / (t_0 * (J * 2.0)))) * (t_0 * -2.0))
tmp = 0
if J <= -1.0377437032178969e-236:
tmp = t_1
elif J <= -1.054361271269357e-266:
tmp = U
elif J <= 1.0640764951653267e-249:
tmp = -U
else:
tmp = t_1
return tmp
function code(J, K, U)
return Float64(Float64(Float64(-2.0 * J) * cos(Float64(K / 2.0))) * sqrt(Float64(1.0 + (Float64(U / Float64(Float64(2.0 * J) * cos(Float64(K / 2.0)))) ^ 2.0))))
end
↓
function code(J, K, U)
t_0 = cos(Float64(K / 2.0))
t_1 = Float64(J * Float64(hypot(1.0, Float64(U / Float64(t_0 * Float64(J * 2.0)))) * Float64(t_0 * -2.0)))
tmp = 0.0
if (J <= -1.0377437032178969e-236)
tmp = t_1;
elseif (J <= -1.054361271269357e-266)
tmp = U;
elseif (J <= 1.0640764951653267e-249)
tmp = Float64(-U);
else
tmp = t_1;
end
return tmp
end
function tmp = code(J, K, U)
tmp = ((-2.0 * J) * cos((K / 2.0))) * sqrt((1.0 + ((U / ((2.0 * J) * cos((K / 2.0)))) ^ 2.0)));
end
↓
function tmp_2 = code(J, K, U)
t_0 = cos((K / 2.0));
t_1 = J * (hypot(1.0, (U / (t_0 * (J * 2.0)))) * (t_0 * -2.0));
tmp = 0.0;
if (J <= -1.0377437032178969e-236)
tmp = t_1;
elseif (J <= -1.054361271269357e-266)
tmp = U;
elseif (J <= 1.0640764951653267e-249)
tmp = -U;
else
tmp = t_1;
end
tmp_2 = tmp;
end
code[J_, K_, U_] := N[(N[(N[(-2.0 * J), $MachinePrecision] * N[Cos[N[(K / 2.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Sqrt[N[(1.0 + N[Power[N[(U / N[(N[(2.0 * J), $MachinePrecision] * N[Cos[N[(K / 2.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
↓
code[J_, K_, U_] := Block[{t$95$0 = N[Cos[N[(K / 2.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$1 = N[(J * N[(N[Sqrt[1.0 ^ 2 + N[(U / N[(t$95$0 * N[(J * 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] ^ 2], $MachinePrecision] * N[(t$95$0 * -2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[J, -1.0377437032178969e-236], t$95$1, If[LessEqual[J, -1.054361271269357e-266], U, If[LessEqual[J, 1.0640764951653267e-249], (-U), t$95$1]]]]]
\left(\left(-2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)\right) \cdot \sqrt{1 + {\left(\frac{U}{\left(2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)}\right)}^{2}}
↓
\begin{array}{l}
t_0 := \cos \left(\frac{K}{2}\right)\\
t_1 := J \cdot \left(\mathsf{hypot}\left(1, \frac{U}{t_0 \cdot \left(J \cdot 2\right)}\right) \cdot \left(t_0 \cdot -2\right)\right)\\
\mathbf{if}\;J \leq -1.0377437032178969 \cdot 10^{-236}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;U\\
\mathbf{elif}\;J \leq 1.0640764951653267 \cdot 10^{-249}:\\
\;\;\;\;-U\\
\mathbf{else}:\\
\;\;\;\;t_1\\
\end{array}
Alternatives
| Alternative 1 |
|---|
| Error | 17.0 |
|---|
| Cost | 20232 |
|---|
\[\begin{array}{l}
t_0 := J \cdot \left(\left(\cos \left(\frac{K}{2}\right) \cdot -2\right) \cdot \mathsf{hypot}\left(1, \frac{U}{J \cdot 2}\right)\right)\\
\mathbf{if}\;J \leq -3.729554411415352 \cdot 10^{-159}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;\mathsf{fma}\left(2, \frac{J}{\frac{U}{J}} \cdot {\cos \left(K \cdot 0.5\right)}^{2}, U\right)\\
\mathbf{elif}\;J \leq 4.739875264948336 \cdot 10^{-235}:\\
\;\;\;\;-U\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 2 |
|---|
| Error | 17.0 |
|---|
| Cost | 14092 |
|---|
\[\begin{array}{l}
t_0 := J \cdot \left(\left(\cos \left(\frac{K}{2}\right) \cdot -2\right) \cdot \mathsf{hypot}\left(1, \frac{U}{J \cdot 2}\right)\right)\\
\mathbf{if}\;J \leq -3.729554411415352 \cdot 10^{-159}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;U + \left(J \cdot 2\right) \cdot \frac{J}{U}\\
\mathbf{elif}\;J \leq 4.739875264948336 \cdot 10^{-235}:\\
\;\;\;\;-U\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 3 |
|---|
| Error | 26.6 |
|---|
| Cost | 7508 |
|---|
\[\begin{array}{l}
t_0 := J \cdot \left(-2 \cdot \cos \left(K \cdot 0.5\right)\right)\\
\mathbf{if}\;J \leq -0.00028224483445998095:\\
\;\;\;\;t_0\\
\mathbf{elif}\;J \leq -5.735573053561281 \cdot 10^{-129}:\\
\;\;\;\;-U\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;U + \left(J \cdot 2\right) \cdot \frac{J}{U}\\
\mathbf{elif}\;J \leq 7.994851098623693 \cdot 10^{-215}:\\
\;\;\;\;-U\\
\mathbf{elif}\;J \leq 7.367002668229626 \cdot 10^{-147}:\\
\;\;\;\;U\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\]
| Alternative 4 |
|---|
| Error | 38.6 |
|---|
| Cost | 1236 |
|---|
\[\begin{array}{l}
t_0 := U + \left(J \cdot 2\right) \cdot \frac{J}{U}\\
\mathbf{if}\;J \leq -8.183055114224356 \cdot 10^{+25}:\\
\;\;\;\;J \cdot -2\\
\mathbf{elif}\;J \leq -5.735573053561281 \cdot 10^{-129}:\\
\;\;\;\;-U\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;t_0\\
\mathbf{elif}\;J \leq 7.994851098623693 \cdot 10^{-215}:\\
\;\;\;\;-U\\
\mathbf{elif}\;J \leq 9.719092662201594 \cdot 10^{+74}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;J \cdot -2\\
\end{array}
\]
| Alternative 5 |
|---|
| Error | 38.6 |
|---|
| Cost | 852 |
|---|
\[\begin{array}{l}
\mathbf{if}\;J \leq -8.183055114224356 \cdot 10^{+25}:\\
\;\;\;\;J \cdot -2\\
\mathbf{elif}\;J \leq -5.735573053561281 \cdot 10^{-129}:\\
\;\;\;\;-U\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;U\\
\mathbf{elif}\;J \leq 7.994851098623693 \cdot 10^{-215}:\\
\;\;\;\;-U\\
\mathbf{elif}\;J \leq 9.719092662201594 \cdot 10^{+74}:\\
\;\;\;\;U\\
\mathbf{else}:\\
\;\;\;\;J \cdot -2\\
\end{array}
\]
| Alternative 6 |
|---|
| Error | 46.9 |
|---|
| Cost | 656 |
|---|
\[\begin{array}{l}
\mathbf{if}\;J \leq -2.870821815076931 \cdot 10^{-23}:\\
\;\;\;\;U\\
\mathbf{elif}\;J \leq -5.735573053561281 \cdot 10^{-129}:\\
\;\;\;\;-U\\
\mathbf{elif}\;J \leq -1.054361271269357 \cdot 10^{-266}:\\
\;\;\;\;U\\
\mathbf{elif}\;J \leq 7.994851098623693 \cdot 10^{-215}:\\
\;\;\;\;-U\\
\mathbf{else}:\\
\;\;\;\;U\\
\end{array}
\]
| Alternative 7 |
|---|
| Error | 46.8 |
|---|
| Cost | 64 |
|---|
\[U
\]
