
(FPCore (x y z) :precision binary64 (+ x (* (* (- y x) 6.0) z)))
double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * z);
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + (((y - x) * 6.0d0) * z)
end function
public static double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * z);
}
def code(x, y, z): return x + (((y - x) * 6.0) * z)
function code(x, y, z) return Float64(x + Float64(Float64(Float64(y - x) * 6.0) * z)) end
function tmp = code(x, y, z) tmp = x + (((y - x) * 6.0) * z); end
code[x_, y_, z_] := N[(x + N[(N[(N[(y - x), $MachinePrecision] * 6.0), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(\left(y - x\right) \cdot 6\right) \cdot z
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 14 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y z) :precision binary64 (+ x (* (* (- y x) 6.0) z)))
double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * z);
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + (((y - x) * 6.0d0) * z)
end function
public static double code(double x, double y, double z) {
return x + (((y - x) * 6.0) * z);
}
def code(x, y, z): return x + (((y - x) * 6.0) * z)
function code(x, y, z) return Float64(x + Float64(Float64(Float64(y - x) * 6.0) * z)) end
function tmp = code(x, y, z) tmp = x + (((y - x) * 6.0) * z); end
code[x_, y_, z_] := N[(x + N[(N[(N[(y - x), $MachinePrecision] * 6.0), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(\left(y - x\right) \cdot 6\right) \cdot z
\end{array}
(FPCore (x y z) :precision binary64 (+ x (* (- y x) (* 6.0 z))))
double code(double x, double y, double z) {
return x + ((y - x) * (6.0 * z));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + ((y - x) * (6.0d0 * z))
end function
public static double code(double x, double y, double z) {
return x + ((y - x) * (6.0 * z));
}
def code(x, y, z): return x + ((y - x) * (6.0 * z))
function code(x, y, z) return Float64(x + Float64(Float64(y - x) * Float64(6.0 * z))) end
function tmp = code(x, y, z) tmp = x + ((y - x) * (6.0 * z)); end
code[x_, y_, z_] := N[(x + N[(N[(y - x), $MachinePrecision] * N[(6.0 * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + \left(y - x\right) \cdot \left(6 \cdot z\right)
\end{array}
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* -6.0 (* x z))) (t_1 (* 6.0 (* y z))))
(if (<= z -44000000000.0)
t_0
(if (<= z -4.6e-40)
t_1
(if (<= z 1.7e-54)
x
(if (or (<= z 1.1e+143) (and (not (<= z 3e+181)) (<= z 8.6e+245)))
t_1
t_0))))))
double code(double x, double y, double z) {
double t_0 = -6.0 * (x * z);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -44000000000.0) {
tmp = t_0;
} else if (z <= -4.6e-40) {
tmp = t_1;
} else if (z <= 1.7e-54) {
tmp = x;
} else if ((z <= 1.1e+143) || (!(z <= 3e+181) && (z <= 8.6e+245))) {
tmp = t_1;
} else {
tmp = t_0;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = (-6.0d0) * (x * z)
t_1 = 6.0d0 * (y * z)
if (z <= (-44000000000.0d0)) then
tmp = t_0
else if (z <= (-4.6d-40)) then
tmp = t_1
else if (z <= 1.7d-54) then
tmp = x
else if ((z <= 1.1d+143) .or. (.not. (z <= 3d+181)) .and. (z <= 8.6d+245)) then
tmp = t_1
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = -6.0 * (x * z);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -44000000000.0) {
tmp = t_0;
} else if (z <= -4.6e-40) {
tmp = t_1;
} else if (z <= 1.7e-54) {
tmp = x;
} else if ((z <= 1.1e+143) || (!(z <= 3e+181) && (z <= 8.6e+245))) {
tmp = t_1;
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = -6.0 * (x * z) t_1 = 6.0 * (y * z) tmp = 0 if z <= -44000000000.0: tmp = t_0 elif z <= -4.6e-40: tmp = t_1 elif z <= 1.7e-54: tmp = x elif (z <= 1.1e+143) or (not (z <= 3e+181) and (z <= 8.6e+245)): tmp = t_1 else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(-6.0 * Float64(x * z)) t_1 = Float64(6.0 * Float64(y * z)) tmp = 0.0 if (z <= -44000000000.0) tmp = t_0; elseif (z <= -4.6e-40) tmp = t_1; elseif (z <= 1.7e-54) tmp = x; elseif ((z <= 1.1e+143) || (!(z <= 3e+181) && (z <= 8.6e+245))) tmp = t_1; else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = -6.0 * (x * z); t_1 = 6.0 * (y * z); tmp = 0.0; if (z <= -44000000000.0) tmp = t_0; elseif (z <= -4.6e-40) tmp = t_1; elseif (z <= 1.7e-54) tmp = x; elseif ((z <= 1.1e+143) || (~((z <= 3e+181)) && (z <= 8.6e+245))) tmp = t_1; else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(-6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -44000000000.0], t$95$0, If[LessEqual[z, -4.6e-40], t$95$1, If[LessEqual[z, 1.7e-54], x, If[Or[LessEqual[z, 1.1e+143], And[N[Not[LessEqual[z, 3e+181]], $MachinePrecision], LessEqual[z, 8.6e+245]]], t$95$1, t$95$0]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := -6 \cdot \left(x \cdot z\right)\\
t_1 := 6 \cdot \left(y \cdot z\right)\\
\mathbf{if}\;z \leq -44000000000:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq -4.6 \cdot 10^{-40}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 1.7 \cdot 10^{-54}:\\
\;\;\;\;x\\
\mathbf{elif}\;z \leq 1.1 \cdot 10^{+143} \lor \neg \left(z \leq 3 \cdot 10^{+181}\right) \land z \leq 8.6 \cdot 10^{+245}:\\
\;\;\;\;t_1\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\end{array}
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* x (* z -6.0))) (t_1 (* 6.0 (* y z))))
(if (<= z -3000000000.0)
t_0
(if (<= z -1.22e-36)
t_1
(if (<= z 3.1e-57)
x
(if (<= z 9.5e+142)
t_1
(if (<= z 5.6e+181)
(* -6.0 (* x z))
(if (<= z 9.4e+240) t_1 t_0))))))))
double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -3000000000.0) {
tmp = t_0;
} else if (z <= -1.22e-36) {
tmp = t_1;
} else if (z <= 3.1e-57) {
tmp = x;
} else if (z <= 9.5e+142) {
tmp = t_1;
} else if (z <= 5.6e+181) {
tmp = -6.0 * (x * z);
} else if (z <= 9.4e+240) {
tmp = t_1;
} else {
tmp = t_0;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = x * (z * (-6.0d0))
t_1 = 6.0d0 * (y * z)
if (z <= (-3000000000.0d0)) then
tmp = t_0
else if (z <= (-1.22d-36)) then
tmp = t_1
else if (z <= 3.1d-57) then
tmp = x
else if (z <= 9.5d+142) then
tmp = t_1
else if (z <= 5.6d+181) then
tmp = (-6.0d0) * (x * z)
else if (z <= 9.4d+240) then
tmp = t_1
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -3000000000.0) {
tmp = t_0;
} else if (z <= -1.22e-36) {
tmp = t_1;
} else if (z <= 3.1e-57) {
tmp = x;
} else if (z <= 9.5e+142) {
tmp = t_1;
} else if (z <= 5.6e+181) {
tmp = -6.0 * (x * z);
} else if (z <= 9.4e+240) {
tmp = t_1;
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = x * (z * -6.0) t_1 = 6.0 * (y * z) tmp = 0 if z <= -3000000000.0: tmp = t_0 elif z <= -1.22e-36: tmp = t_1 elif z <= 3.1e-57: tmp = x elif z <= 9.5e+142: tmp = t_1 elif z <= 5.6e+181: tmp = -6.0 * (x * z) elif z <= 9.4e+240: tmp = t_1 else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(x * Float64(z * -6.0)) t_1 = Float64(6.0 * Float64(y * z)) tmp = 0.0 if (z <= -3000000000.0) tmp = t_0; elseif (z <= -1.22e-36) tmp = t_1; elseif (z <= 3.1e-57) tmp = x; elseif (z <= 9.5e+142) tmp = t_1; elseif (z <= 5.6e+181) tmp = Float64(-6.0 * Float64(x * z)); elseif (z <= 9.4e+240) tmp = t_1; else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = x * (z * -6.0); t_1 = 6.0 * (y * z); tmp = 0.0; if (z <= -3000000000.0) tmp = t_0; elseif (z <= -1.22e-36) tmp = t_1; elseif (z <= 3.1e-57) tmp = x; elseif (z <= 9.5e+142) tmp = t_1; elseif (z <= 5.6e+181) tmp = -6.0 * (x * z); elseif (z <= 9.4e+240) tmp = t_1; else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(x * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -3000000000.0], t$95$0, If[LessEqual[z, -1.22e-36], t$95$1, If[LessEqual[z, 3.1e-57], x, If[LessEqual[z, 9.5e+142], t$95$1, If[LessEqual[z, 5.6e+181], N[(-6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 9.4e+240], t$95$1, t$95$0]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x \cdot \left(z \cdot -6\right)\\
t_1 := 6 \cdot \left(y \cdot z\right)\\
\mathbf{if}\;z \leq -3000000000:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq -1.22 \cdot 10^{-36}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 3.1 \cdot 10^{-57}:\\
\;\;\;\;x\\
\mathbf{elif}\;z \leq 9.5 \cdot 10^{+142}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 5.6 \cdot 10^{+181}:\\
\;\;\;\;-6 \cdot \left(x \cdot z\right)\\
\mathbf{elif}\;z \leq 9.4 \cdot 10^{+240}:\\
\;\;\;\;t_1\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\end{array}
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* x (* z -6.0))) (t_1 (* 6.0 (* y z))))
(if (<= z -116000000000.0)
t_0
(if (<= z -1.62e-38)
t_1
(if (<= z 2.35e-60)
x
(if (<= z 2.5e+143)
t_1
(if (<= z 5e+182)
(* -6.0 (* x z))
(if (<= z 9.8e+244) (* y (* 6.0 z)) t_0))))))))
double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -116000000000.0) {
tmp = t_0;
} else if (z <= -1.62e-38) {
tmp = t_1;
} else if (z <= 2.35e-60) {
tmp = x;
} else if (z <= 2.5e+143) {
tmp = t_1;
} else if (z <= 5e+182) {
tmp = -6.0 * (x * z);
} else if (z <= 9.8e+244) {
tmp = y * (6.0 * z);
} else {
tmp = t_0;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = x * (z * (-6.0d0))
t_1 = 6.0d0 * (y * z)
if (z <= (-116000000000.0d0)) then
tmp = t_0
else if (z <= (-1.62d-38)) then
tmp = t_1
else if (z <= 2.35d-60) then
tmp = x
else if (z <= 2.5d+143) then
tmp = t_1
else if (z <= 5d+182) then
tmp = (-6.0d0) * (x * z)
else if (z <= 9.8d+244) then
tmp = y * (6.0d0 * z)
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -116000000000.0) {
tmp = t_0;
} else if (z <= -1.62e-38) {
tmp = t_1;
} else if (z <= 2.35e-60) {
tmp = x;
} else if (z <= 2.5e+143) {
tmp = t_1;
} else if (z <= 5e+182) {
tmp = -6.0 * (x * z);
} else if (z <= 9.8e+244) {
tmp = y * (6.0 * z);
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = x * (z * -6.0) t_1 = 6.0 * (y * z) tmp = 0 if z <= -116000000000.0: tmp = t_0 elif z <= -1.62e-38: tmp = t_1 elif z <= 2.35e-60: tmp = x elif z <= 2.5e+143: tmp = t_1 elif z <= 5e+182: tmp = -6.0 * (x * z) elif z <= 9.8e+244: tmp = y * (6.0 * z) else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(x * Float64(z * -6.0)) t_1 = Float64(6.0 * Float64(y * z)) tmp = 0.0 if (z <= -116000000000.0) tmp = t_0; elseif (z <= -1.62e-38) tmp = t_1; elseif (z <= 2.35e-60) tmp = x; elseif (z <= 2.5e+143) tmp = t_1; elseif (z <= 5e+182) tmp = Float64(-6.0 * Float64(x * z)); elseif (z <= 9.8e+244) tmp = Float64(y * Float64(6.0 * z)); else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = x * (z * -6.0); t_1 = 6.0 * (y * z); tmp = 0.0; if (z <= -116000000000.0) tmp = t_0; elseif (z <= -1.62e-38) tmp = t_1; elseif (z <= 2.35e-60) tmp = x; elseif (z <= 2.5e+143) tmp = t_1; elseif (z <= 5e+182) tmp = -6.0 * (x * z); elseif (z <= 9.8e+244) tmp = y * (6.0 * z); else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(x * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -116000000000.0], t$95$0, If[LessEqual[z, -1.62e-38], t$95$1, If[LessEqual[z, 2.35e-60], x, If[LessEqual[z, 2.5e+143], t$95$1, If[LessEqual[z, 5e+182], N[(-6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 9.8e+244], N[(y * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], t$95$0]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x \cdot \left(z \cdot -6\right)\\
t_1 := 6 \cdot \left(y \cdot z\right)\\
\mathbf{if}\;z \leq -116000000000:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq -1.62 \cdot 10^{-38}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 2.35 \cdot 10^{-60}:\\
\;\;\;\;x\\
\mathbf{elif}\;z \leq 2.5 \cdot 10^{+143}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 5 \cdot 10^{+182}:\\
\;\;\;\;-6 \cdot \left(x \cdot z\right)\\
\mathbf{elif}\;z \leq 9.8 \cdot 10^{+244}:\\
\;\;\;\;y \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\end{array}
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* x (* z -6.0))) (t_1 (* 6.0 (* y z))))
(if (<= z -102000000000.0)
t_0
(if (<= z -3.3e-38)
t_1
(if (<= z 1.35e-56)
x
(if (<= z 1.35e+143)
t_1
(if (<= z 3.25e+181)
(* z (* x -6.0))
(if (<= z 5.3e+240) (* y (* 6.0 z)) t_0))))))))
double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -102000000000.0) {
tmp = t_0;
} else if (z <= -3.3e-38) {
tmp = t_1;
} else if (z <= 1.35e-56) {
tmp = x;
} else if (z <= 1.35e+143) {
tmp = t_1;
} else if (z <= 3.25e+181) {
tmp = z * (x * -6.0);
} else if (z <= 5.3e+240) {
tmp = y * (6.0 * z);
} else {
tmp = t_0;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: t_1
real(8) :: tmp
t_0 = x * (z * (-6.0d0))
t_1 = 6.0d0 * (y * z)
if (z <= (-102000000000.0d0)) then
tmp = t_0
else if (z <= (-3.3d-38)) then
tmp = t_1
else if (z <= 1.35d-56) then
tmp = x
else if (z <= 1.35d+143) then
tmp = t_1
else if (z <= 3.25d+181) then
tmp = z * (x * (-6.0d0))
else if (z <= 5.3d+240) then
tmp = y * (6.0d0 * z)
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double t_1 = 6.0 * (y * z);
double tmp;
if (z <= -102000000000.0) {
tmp = t_0;
} else if (z <= -3.3e-38) {
tmp = t_1;
} else if (z <= 1.35e-56) {
tmp = x;
} else if (z <= 1.35e+143) {
tmp = t_1;
} else if (z <= 3.25e+181) {
tmp = z * (x * -6.0);
} else if (z <= 5.3e+240) {
tmp = y * (6.0 * z);
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = x * (z * -6.0) t_1 = 6.0 * (y * z) tmp = 0 if z <= -102000000000.0: tmp = t_0 elif z <= -3.3e-38: tmp = t_1 elif z <= 1.35e-56: tmp = x elif z <= 1.35e+143: tmp = t_1 elif z <= 3.25e+181: tmp = z * (x * -6.0) elif z <= 5.3e+240: tmp = y * (6.0 * z) else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(x * Float64(z * -6.0)) t_1 = Float64(6.0 * Float64(y * z)) tmp = 0.0 if (z <= -102000000000.0) tmp = t_0; elseif (z <= -3.3e-38) tmp = t_1; elseif (z <= 1.35e-56) tmp = x; elseif (z <= 1.35e+143) tmp = t_1; elseif (z <= 3.25e+181) tmp = Float64(z * Float64(x * -6.0)); elseif (z <= 5.3e+240) tmp = Float64(y * Float64(6.0 * z)); else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = x * (z * -6.0); t_1 = 6.0 * (y * z); tmp = 0.0; if (z <= -102000000000.0) tmp = t_0; elseif (z <= -3.3e-38) tmp = t_1; elseif (z <= 1.35e-56) tmp = x; elseif (z <= 1.35e+143) tmp = t_1; elseif (z <= 3.25e+181) tmp = z * (x * -6.0); elseif (z <= 5.3e+240) tmp = y * (6.0 * z); else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(x * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -102000000000.0], t$95$0, If[LessEqual[z, -3.3e-38], t$95$1, If[LessEqual[z, 1.35e-56], x, If[LessEqual[z, 1.35e+143], t$95$1, If[LessEqual[z, 3.25e+181], N[(z * N[(x * -6.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 5.3e+240], N[(y * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], t$95$0]]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x \cdot \left(z \cdot -6\right)\\
t_1 := 6 \cdot \left(y \cdot z\right)\\
\mathbf{if}\;z \leq -102000000000:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq -3.3 \cdot 10^{-38}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 1.35 \cdot 10^{-56}:\\
\;\;\;\;x\\
\mathbf{elif}\;z \leq 1.35 \cdot 10^{+143}:\\
\;\;\;\;t_1\\
\mathbf{elif}\;z \leq 3.25 \cdot 10^{+181}:\\
\;\;\;\;z \cdot \left(x \cdot -6\right)\\
\mathbf{elif}\;z \leq 5.3 \cdot 10^{+240}:\\
\;\;\;\;y \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\end{array}
(FPCore (x y z)
:precision binary64
(let* ((t_0 (* x (* z -6.0))))
(if (<= z -150000000000.0)
t_0
(if (<= z -8.2e-38)
(* 6.0 (* y z))
(if (<= z 9.5e-66)
x
(if (<= z 1.85e+143)
(* z (* y 6.0))
(if (<= z 1.1e+182)
(* z (* x -6.0))
(if (<= z 2.9e+245) (* y (* 6.0 z)) t_0))))))))
double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double tmp;
if (z <= -150000000000.0) {
tmp = t_0;
} else if (z <= -8.2e-38) {
tmp = 6.0 * (y * z);
} else if (z <= 9.5e-66) {
tmp = x;
} else if (z <= 1.85e+143) {
tmp = z * (y * 6.0);
} else if (z <= 1.1e+182) {
tmp = z * (x * -6.0);
} else if (z <= 2.9e+245) {
tmp = y * (6.0 * z);
} else {
tmp = t_0;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: t_0
real(8) :: tmp
t_0 = x * (z * (-6.0d0))
if (z <= (-150000000000.0d0)) then
tmp = t_0
else if (z <= (-8.2d-38)) then
tmp = 6.0d0 * (y * z)
else if (z <= 9.5d-66) then
tmp = x
else if (z <= 1.85d+143) then
tmp = z * (y * 6.0d0)
else if (z <= 1.1d+182) then
tmp = z * (x * (-6.0d0))
else if (z <= 2.9d+245) then
tmp = y * (6.0d0 * z)
else
tmp = t_0
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double t_0 = x * (z * -6.0);
double tmp;
if (z <= -150000000000.0) {
tmp = t_0;
} else if (z <= -8.2e-38) {
tmp = 6.0 * (y * z);
} else if (z <= 9.5e-66) {
tmp = x;
} else if (z <= 1.85e+143) {
tmp = z * (y * 6.0);
} else if (z <= 1.1e+182) {
tmp = z * (x * -6.0);
} else if (z <= 2.9e+245) {
tmp = y * (6.0 * z);
} else {
tmp = t_0;
}
return tmp;
}
def code(x, y, z): t_0 = x * (z * -6.0) tmp = 0 if z <= -150000000000.0: tmp = t_0 elif z <= -8.2e-38: tmp = 6.0 * (y * z) elif z <= 9.5e-66: tmp = x elif z <= 1.85e+143: tmp = z * (y * 6.0) elif z <= 1.1e+182: tmp = z * (x * -6.0) elif z <= 2.9e+245: tmp = y * (6.0 * z) else: tmp = t_0 return tmp
function code(x, y, z) t_0 = Float64(x * Float64(z * -6.0)) tmp = 0.0 if (z <= -150000000000.0) tmp = t_0; elseif (z <= -8.2e-38) tmp = Float64(6.0 * Float64(y * z)); elseif (z <= 9.5e-66) tmp = x; elseif (z <= 1.85e+143) tmp = Float64(z * Float64(y * 6.0)); elseif (z <= 1.1e+182) tmp = Float64(z * Float64(x * -6.0)); elseif (z <= 2.9e+245) tmp = Float64(y * Float64(6.0 * z)); else tmp = t_0; end return tmp end
function tmp_2 = code(x, y, z) t_0 = x * (z * -6.0); tmp = 0.0; if (z <= -150000000000.0) tmp = t_0; elseif (z <= -8.2e-38) tmp = 6.0 * (y * z); elseif (z <= 9.5e-66) tmp = x; elseif (z <= 1.85e+143) tmp = z * (y * 6.0); elseif (z <= 1.1e+182) tmp = z * (x * -6.0); elseif (z <= 2.9e+245) tmp = y * (6.0 * z); else tmp = t_0; end tmp_2 = tmp; end
code[x_, y_, z_] := Block[{t$95$0 = N[(x * N[(z * -6.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[z, -150000000000.0], t$95$0, If[LessEqual[z, -8.2e-38], N[(6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 9.5e-66], x, If[LessEqual[z, 1.85e+143], N[(z * N[(y * 6.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 1.1e+182], N[(z * N[(x * -6.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[z, 2.9e+245], N[(y * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], t$95$0]]]]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x \cdot \left(z \cdot -6\right)\\
\mathbf{if}\;z \leq -150000000000:\\
\;\;\;\;t_0\\
\mathbf{elif}\;z \leq -8.2 \cdot 10^{-38}:\\
\;\;\;\;6 \cdot \left(y \cdot z\right)\\
\mathbf{elif}\;z \leq 9.5 \cdot 10^{-66}:\\
\;\;\;\;x\\
\mathbf{elif}\;z \leq 1.85 \cdot 10^{+143}:\\
\;\;\;\;z \cdot \left(y \cdot 6\right)\\
\mathbf{elif}\;z \leq 1.1 \cdot 10^{+182}:\\
\;\;\;\;z \cdot \left(x \cdot -6\right)\\
\mathbf{elif}\;z \leq 2.9 \cdot 10^{+245}:\\
\;\;\;\;y \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;t_0\\
\end{array}
\end{array}
(FPCore (x y z) :precision binary64 (if (or (<= z -7.8e-42) (not (<= z 9.2e-57))) (* (- y x) (* 6.0 z)) x))
double code(double x, double y, double z) {
double tmp;
if ((z <= -7.8e-42) || !(z <= 9.2e-57)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if ((z <= (-7.8d-42)) .or. (.not. (z <= 9.2d-57))) then
tmp = (y - x) * (6.0d0 * z)
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if ((z <= -7.8e-42) || !(z <= 9.2e-57)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): tmp = 0 if (z <= -7.8e-42) or not (z <= 9.2e-57): tmp = (y - x) * (6.0 * z) else: tmp = x return tmp
function code(x, y, z) tmp = 0.0 if ((z <= -7.8e-42) || !(z <= 9.2e-57)) tmp = Float64(Float64(y - x) * Float64(6.0 * z)); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if ((z <= -7.8e-42) || ~((z <= 9.2e-57))) tmp = (y - x) * (6.0 * z); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := If[Or[LessEqual[z, -7.8e-42], N[Not[LessEqual[z, 9.2e-57]], $MachinePrecision]], N[(N[(y - x), $MachinePrecision] * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], x]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -7.8 \cdot 10^{-42} \lor \neg \left(z \leq 9.2 \cdot 10^{-57}\right):\\
\;\;\;\;\left(y - x\right) \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
(FPCore (x y z) :precision binary64 (if (or (<= z -2.85e-44) (not (<= z 1.25e-58))) (* (- y x) (* 6.0 z)) (+ x (* -6.0 (* x z)))))
double code(double x, double y, double z) {
double tmp;
if ((z <= -2.85e-44) || !(z <= 1.25e-58)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x + (-6.0 * (x * z));
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if ((z <= (-2.85d-44)) .or. (.not. (z <= 1.25d-58))) then
tmp = (y - x) * (6.0d0 * z)
else
tmp = x + ((-6.0d0) * (x * z))
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if ((z <= -2.85e-44) || !(z <= 1.25e-58)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x + (-6.0 * (x * z));
}
return tmp;
}
def code(x, y, z): tmp = 0 if (z <= -2.85e-44) or not (z <= 1.25e-58): tmp = (y - x) * (6.0 * z) else: tmp = x + (-6.0 * (x * z)) return tmp
function code(x, y, z) tmp = 0.0 if ((z <= -2.85e-44) || !(z <= 1.25e-58)) tmp = Float64(Float64(y - x) * Float64(6.0 * z)); else tmp = Float64(x + Float64(-6.0 * Float64(x * z))); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if ((z <= -2.85e-44) || ~((z <= 1.25e-58))) tmp = (y - x) * (6.0 * z); else tmp = x + (-6.0 * (x * z)); end tmp_2 = tmp; end
code[x_, y_, z_] := If[Or[LessEqual[z, -2.85e-44], N[Not[LessEqual[z, 1.25e-58]], $MachinePrecision]], N[(N[(y - x), $MachinePrecision] * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], N[(x + N[(-6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -2.85 \cdot 10^{-44} \lor \neg \left(z \leq 1.25 \cdot 10^{-58}\right):\\
\;\;\;\;\left(y - x\right) \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;x + -6 \cdot \left(x \cdot z\right)\\
\end{array}
\end{array}
(FPCore (x y z) :precision binary64 (if (or (<= z -210000000.0) (not (<= z 0.17))) (* (- y x) (* 6.0 z)) (+ x (* 6.0 (* y z)))))
double code(double x, double y, double z) {
double tmp;
if ((z <= -210000000.0) || !(z <= 0.17)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x + (6.0 * (y * z));
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if ((z <= (-210000000.0d0)) .or. (.not. (z <= 0.17d0))) then
tmp = (y - x) * (6.0d0 * z)
else
tmp = x + (6.0d0 * (y * z))
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if ((z <= -210000000.0) || !(z <= 0.17)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x + (6.0 * (y * z));
}
return tmp;
}
def code(x, y, z): tmp = 0 if (z <= -210000000.0) or not (z <= 0.17): tmp = (y - x) * (6.0 * z) else: tmp = x + (6.0 * (y * z)) return tmp
function code(x, y, z) tmp = 0.0 if ((z <= -210000000.0) || !(z <= 0.17)) tmp = Float64(Float64(y - x) * Float64(6.0 * z)); else tmp = Float64(x + Float64(6.0 * Float64(y * z))); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if ((z <= -210000000.0) || ~((z <= 0.17))) tmp = (y - x) * (6.0 * z); else tmp = x + (6.0 * (y * z)); end tmp_2 = tmp; end
code[x_, y_, z_] := If[Or[LessEqual[z, -210000000.0], N[Not[LessEqual[z, 0.17]], $MachinePrecision]], N[(N[(y - x), $MachinePrecision] * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], N[(x + N[(6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -210000000 \lor \neg \left(z \leq 0.17\right):\\
\;\;\;\;\left(y - x\right) \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;x + 6 \cdot \left(y \cdot z\right)\\
\end{array}
\end{array}
(FPCore (x y z) :precision binary64 (if (or (<= z -210000000.0) (not (<= z 165000.0))) (* (- y x) (* 6.0 z)) (+ x (* z (* y 6.0)))))
double code(double x, double y, double z) {
double tmp;
if ((z <= -210000000.0) || !(z <= 165000.0)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x + (z * (y * 6.0));
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if ((z <= (-210000000.0d0)) .or. (.not. (z <= 165000.0d0))) then
tmp = (y - x) * (6.0d0 * z)
else
tmp = x + (z * (y * 6.0d0))
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if ((z <= -210000000.0) || !(z <= 165000.0)) {
tmp = (y - x) * (6.0 * z);
} else {
tmp = x + (z * (y * 6.0));
}
return tmp;
}
def code(x, y, z): tmp = 0 if (z <= -210000000.0) or not (z <= 165000.0): tmp = (y - x) * (6.0 * z) else: tmp = x + (z * (y * 6.0)) return tmp
function code(x, y, z) tmp = 0.0 if ((z <= -210000000.0) || !(z <= 165000.0)) tmp = Float64(Float64(y - x) * Float64(6.0 * z)); else tmp = Float64(x + Float64(z * Float64(y * 6.0))); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if ((z <= -210000000.0) || ~((z <= 165000.0))) tmp = (y - x) * (6.0 * z); else tmp = x + (z * (y * 6.0)); end tmp_2 = tmp; end
code[x_, y_, z_] := If[Or[LessEqual[z, -210000000.0], N[Not[LessEqual[z, 165000.0]], $MachinePrecision]], N[(N[(y - x), $MachinePrecision] * N[(6.0 * z), $MachinePrecision]), $MachinePrecision], N[(x + N[(z * N[(y * 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -210000000 \lor \neg \left(z \leq 165000\right):\\
\;\;\;\;\left(y - x\right) \cdot \left(6 \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;x + z \cdot \left(y \cdot 6\right)\\
\end{array}
\end{array}
(FPCore (x y z) :precision binary64 (if (<= y -4.2e+62) (* 6.0 (* y z)) (if (<= y 9.6e+95) (* x (+ 1.0 (* z -6.0))) (* z (* y 6.0)))))
double code(double x, double y, double z) {
double tmp;
if (y <= -4.2e+62) {
tmp = 6.0 * (y * z);
} else if (y <= 9.6e+95) {
tmp = x * (1.0 + (z * -6.0));
} else {
tmp = z * (y * 6.0);
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if (y <= (-4.2d+62)) then
tmp = 6.0d0 * (y * z)
else if (y <= 9.6d+95) then
tmp = x * (1.0d0 + (z * (-6.0d0)))
else
tmp = z * (y * 6.0d0)
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if (y <= -4.2e+62) {
tmp = 6.0 * (y * z);
} else if (y <= 9.6e+95) {
tmp = x * (1.0 + (z * -6.0));
} else {
tmp = z * (y * 6.0);
}
return tmp;
}
def code(x, y, z): tmp = 0 if y <= -4.2e+62: tmp = 6.0 * (y * z) elif y <= 9.6e+95: tmp = x * (1.0 + (z * -6.0)) else: tmp = z * (y * 6.0) return tmp
function code(x, y, z) tmp = 0.0 if (y <= -4.2e+62) tmp = Float64(6.0 * Float64(y * z)); elseif (y <= 9.6e+95) tmp = Float64(x * Float64(1.0 + Float64(z * -6.0))); else tmp = Float64(z * Float64(y * 6.0)); end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if (y <= -4.2e+62) tmp = 6.0 * (y * z); elseif (y <= 9.6e+95) tmp = x * (1.0 + (z * -6.0)); else tmp = z * (y * 6.0); end tmp_2 = tmp; end
code[x_, y_, z_] := If[LessEqual[y, -4.2e+62], N[(6.0 * N[(y * z), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 9.6e+95], N[(x * N[(1.0 + N[(z * -6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(z * N[(y * 6.0), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;y \leq -4.2 \cdot 10^{+62}:\\
\;\;\;\;6 \cdot \left(y \cdot z\right)\\
\mathbf{elif}\;y \leq 9.6 \cdot 10^{+95}:\\
\;\;\;\;x \cdot \left(1 + z \cdot -6\right)\\
\mathbf{else}:\\
\;\;\;\;z \cdot \left(y \cdot 6\right)\\
\end{array}
\end{array}
(FPCore (x y z) :precision binary64 (if (or (<= z -0.165) (not (<= z 470.0))) (* -6.0 (* x z)) x))
double code(double x, double y, double z) {
double tmp;
if ((z <= -0.165) || !(z <= 470.0)) {
tmp = -6.0 * (x * z);
} else {
tmp = x;
}
return tmp;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8) :: tmp
if ((z <= (-0.165d0)) .or. (.not. (z <= 470.0d0))) then
tmp = (-6.0d0) * (x * z)
else
tmp = x
end if
code = tmp
end function
public static double code(double x, double y, double z) {
double tmp;
if ((z <= -0.165) || !(z <= 470.0)) {
tmp = -6.0 * (x * z);
} else {
tmp = x;
}
return tmp;
}
def code(x, y, z): tmp = 0 if (z <= -0.165) or not (z <= 470.0): tmp = -6.0 * (x * z) else: tmp = x return tmp
function code(x, y, z) tmp = 0.0 if ((z <= -0.165) || !(z <= 470.0)) tmp = Float64(-6.0 * Float64(x * z)); else tmp = x; end return tmp end
function tmp_2 = code(x, y, z) tmp = 0.0; if ((z <= -0.165) || ~((z <= 470.0))) tmp = -6.0 * (x * z); else tmp = x; end tmp_2 = tmp; end
code[x_, y_, z_] := If[Or[LessEqual[z, -0.165], N[Not[LessEqual[z, 470.0]], $MachinePrecision]], N[(-6.0 * N[(x * z), $MachinePrecision]), $MachinePrecision], x]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;z \leq -0.165 \lor \neg \left(z \leq 470\right):\\
\;\;\;\;-6 \cdot \left(x \cdot z\right)\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}
\end{array}
(FPCore (x y z) :precision binary64 (+ x (* z (* (- y x) 6.0))))
double code(double x, double y, double z) {
return x + (z * ((y - x) * 6.0));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x + (z * ((y - x) * 6.0d0))
end function
public static double code(double x, double y, double z) {
return x + (z * ((y - x) * 6.0));
}
def code(x, y, z): return x + (z * ((y - x) * 6.0))
function code(x, y, z) return Float64(x + Float64(z * Float64(Float64(y - x) * 6.0))) end
function tmp = code(x, y, z) tmp = x + (z * ((y - x) * 6.0)); end
code[x_, y_, z_] := N[(x + N[(z * N[(N[(y - x), $MachinePrecision] * 6.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x + z \cdot \left(\left(y - x\right) \cdot 6\right)
\end{array}
(FPCore (x y z) :precision binary64 x)
double code(double x, double y, double z) {
return x;
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x
end function
public static double code(double x, double y, double z) {
return x;
}
def code(x, y, z): return x
function code(x, y, z) return x end
function tmp = code(x, y, z) tmp = x; end
code[x_, y_, z_] := x
\begin{array}{l}
\\
x
\end{array}
(FPCore (x y z) :precision binary64 (- x (* (* 6.0 z) (- x y))))
double code(double x, double y, double z) {
return x - ((6.0 * z) * (x - y));
}
real(8) function code(x, y, z)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
code = x - ((6.0d0 * z) * (x - y))
end function
public static double code(double x, double y, double z) {
return x - ((6.0 * z) * (x - y));
}
def code(x, y, z): return x - ((6.0 * z) * (x - y))
function code(x, y, z) return Float64(x - Float64(Float64(6.0 * z) * Float64(x - y))) end
function tmp = code(x, y, z) tmp = x - ((6.0 * z) * (x - y)); end
code[x_, y_, z_] := N[(x - N[(N[(6.0 * z), $MachinePrecision] * N[(x - y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
x - \left(6 \cdot z\right) \cdot \left(x - y\right)
\end{array}
herbie shell --seed 2024010
(FPCore (x y z)
:name "Data.Colour.RGBSpace.HSL:hsl from colour-2.3.3, E"
:precision binary64
:herbie-target
(- x (* (* 6.0 z) (- x y)))
(+ x (* (* (- y x) 6.0) z)))