
(FPCore (x y) :precision binary64 (/ (* (- 1.0 x) (- 3.0 x)) (* y 3.0)))
double code(double x, double y) {
return ((1.0 - x) * (3.0 - x)) / (y * 3.0);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = ((1.0d0 - x) * (3.0d0 - x)) / (y * 3.0d0)
end function
public static double code(double x, double y) {
return ((1.0 - x) * (3.0 - x)) / (y * 3.0);
}
def code(x, y): return ((1.0 - x) * (3.0 - x)) / (y * 3.0)
function code(x, y) return Float64(Float64(Float64(1.0 - x) * Float64(3.0 - x)) / Float64(y * 3.0)) end
function tmp = code(x, y) tmp = ((1.0 - x) * (3.0 - x)) / (y * 3.0); end
code[x_, y_] := N[(N[(N[(1.0 - x), $MachinePrecision] * N[(3.0 - x), $MachinePrecision]), $MachinePrecision] / N[(y * 3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\left(1 - x\right) \cdot \left(3 - x\right)}{y \cdot 3}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y) :precision binary64 (/ (* (- 1.0 x) (- 3.0 x)) (* y 3.0)))
double code(double x, double y) {
return ((1.0 - x) * (3.0 - x)) / (y * 3.0);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = ((1.0d0 - x) * (3.0d0 - x)) / (y * 3.0d0)
end function
public static double code(double x, double y) {
return ((1.0 - x) * (3.0 - x)) / (y * 3.0);
}
def code(x, y): return ((1.0 - x) * (3.0 - x)) / (y * 3.0)
function code(x, y) return Float64(Float64(Float64(1.0 - x) * Float64(3.0 - x)) / Float64(y * 3.0)) end
function tmp = code(x, y) tmp = ((1.0 - x) * (3.0 - x)) / (y * 3.0); end
code[x_, y_] := N[(N[(N[(1.0 - x), $MachinePrecision] * N[(3.0 - x), $MachinePrecision]), $MachinePrecision] / N[(y * 3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\left(1 - x\right) \cdot \left(3 - x\right)}{y \cdot 3}
\end{array}
(FPCore (x y) :precision binary64 (* (/ (- 1.0 x) y) (/ (- 3.0 x) 3.0)))
double code(double x, double y) {
return ((1.0 - x) / y) * ((3.0 - x) / 3.0);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = ((1.0d0 - x) / y) * ((3.0d0 - x) / 3.0d0)
end function
public static double code(double x, double y) {
return ((1.0 - x) / y) * ((3.0 - x) / 3.0);
}
def code(x, y): return ((1.0 - x) / y) * ((3.0 - x) / 3.0)
function code(x, y) return Float64(Float64(Float64(1.0 - x) / y) * Float64(Float64(3.0 - x) / 3.0)) end
function tmp = code(x, y) tmp = ((1.0 - x) / y) * ((3.0 - x) / 3.0); end
code[x_, y_] := N[(N[(N[(1.0 - x), $MachinePrecision] / y), $MachinePrecision] * N[(N[(3.0 - x), $MachinePrecision] / 3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1 - x}{y} \cdot \frac{3 - x}{3}
\end{array}
Initial program 92.7%
times-frac99.9%
Simplified99.9%
Final simplification99.9%
(FPCore (x y) :precision binary64 (if (or (<= x -2.3) (not (<= x 1.3))) (* -0.3333333333333333 (/ (- 3.0 x) (/ y x))) (/ (+ (* x -1.3333333333333333) 1.0) y)))
double code(double x, double y) {
double tmp;
if ((x <= -2.3) || !(x <= 1.3)) {
tmp = -0.3333333333333333 * ((3.0 - x) / (y / x));
} else {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((x <= (-2.3d0)) .or. (.not. (x <= 1.3d0))) then
tmp = (-0.3333333333333333d0) * ((3.0d0 - x) / (y / x))
else
tmp = ((x * (-1.3333333333333333d0)) + 1.0d0) / y
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((x <= -2.3) || !(x <= 1.3)) {
tmp = -0.3333333333333333 * ((3.0 - x) / (y / x));
} else {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
}
return tmp;
}
def code(x, y): tmp = 0 if (x <= -2.3) or not (x <= 1.3): tmp = -0.3333333333333333 * ((3.0 - x) / (y / x)) else: tmp = ((x * -1.3333333333333333) + 1.0) / y return tmp
function code(x, y) tmp = 0.0 if ((x <= -2.3) || !(x <= 1.3)) tmp = Float64(-0.3333333333333333 * Float64(Float64(3.0 - x) / Float64(y / x))); else tmp = Float64(Float64(Float64(x * -1.3333333333333333) + 1.0) / y); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((x <= -2.3) || ~((x <= 1.3))) tmp = -0.3333333333333333 * ((3.0 - x) / (y / x)); else tmp = ((x * -1.3333333333333333) + 1.0) / y; end tmp_2 = tmp; end
code[x_, y_] := If[Or[LessEqual[x, -2.3], N[Not[LessEqual[x, 1.3]], $MachinePrecision]], N[(-0.3333333333333333 * N[(N[(3.0 - x), $MachinePrecision] / N[(y / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(x * -1.3333333333333333), $MachinePrecision] + 1.0), $MachinePrecision] / y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -2.3 \lor \neg \left(x \leq 1.3\right):\\
\;\;\;\;-0.3333333333333333 \cdot \frac{3 - x}{\frac{y}{x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot -1.3333333333333333 + 1}{y}\\
\end{array}
\end{array}
if x < -2.2999999999999998 or 1.30000000000000004 < x Initial program 86.0%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 98.0%
neg-mul-198.0%
distribute-neg-frac98.0%
Simplified98.0%
Taylor expanded in y around 0 84.1%
*-commutative84.1%
associate-/l*97.9%
Simplified97.9%
if -2.2999999999999998 < x < 1.30000000000000004Initial program 99.6%
*-commutative99.6%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.4%
*-commutative99.4%
*-commutative99.4%
associate-/r*99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 99.8%
Taylor expanded in y around 0 99.8%
Final simplification98.8%
(FPCore (x y) :precision binary64 (if (or (<= x -2.3) (not (<= x 1.3))) (* (/ x y) (/ (- x 3.0) 3.0)) (/ (+ (* x -1.3333333333333333) 1.0) y)))
double code(double x, double y) {
double tmp;
if ((x <= -2.3) || !(x <= 1.3)) {
tmp = (x / y) * ((x - 3.0) / 3.0);
} else {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((x <= (-2.3d0)) .or. (.not. (x <= 1.3d0))) then
tmp = (x / y) * ((x - 3.0d0) / 3.0d0)
else
tmp = ((x * (-1.3333333333333333d0)) + 1.0d0) / y
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((x <= -2.3) || !(x <= 1.3)) {
tmp = (x / y) * ((x - 3.0) / 3.0);
} else {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
}
return tmp;
}
def code(x, y): tmp = 0 if (x <= -2.3) or not (x <= 1.3): tmp = (x / y) * ((x - 3.0) / 3.0) else: tmp = ((x * -1.3333333333333333) + 1.0) / y return tmp
function code(x, y) tmp = 0.0 if ((x <= -2.3) || !(x <= 1.3)) tmp = Float64(Float64(x / y) * Float64(Float64(x - 3.0) / 3.0)); else tmp = Float64(Float64(Float64(x * -1.3333333333333333) + 1.0) / y); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((x <= -2.3) || ~((x <= 1.3))) tmp = (x / y) * ((x - 3.0) / 3.0); else tmp = ((x * -1.3333333333333333) + 1.0) / y; end tmp_2 = tmp; end
code[x_, y_] := If[Or[LessEqual[x, -2.3], N[Not[LessEqual[x, 1.3]], $MachinePrecision]], N[(N[(x / y), $MachinePrecision] * N[(N[(x - 3.0), $MachinePrecision] / 3.0), $MachinePrecision]), $MachinePrecision], N[(N[(N[(x * -1.3333333333333333), $MachinePrecision] + 1.0), $MachinePrecision] / y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -2.3 \lor \neg \left(x \leq 1.3\right):\\
\;\;\;\;\frac{x}{y} \cdot \frac{x - 3}{3}\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot -1.3333333333333333 + 1}{y}\\
\end{array}
\end{array}
if x < -2.2999999999999998 or 1.30000000000000004 < x Initial program 86.0%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 98.0%
neg-mul-198.0%
distribute-neg-frac98.0%
Simplified98.0%
if -2.2999999999999998 < x < 1.30000000000000004Initial program 99.6%
*-commutative99.6%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.4%
*-commutative99.4%
*-commutative99.4%
associate-/r*99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 99.8%
Taylor expanded in y around 0 99.8%
Final simplification98.9%
(FPCore (x y) :precision binary64 (if (or (<= x -4.6) (not (<= x 3.0))) (* (/ (- x) y) (* x -0.3333333333333333)) (/ (+ (* x -1.3333333333333333) 1.0) y)))
double code(double x, double y) {
double tmp;
if ((x <= -4.6) || !(x <= 3.0)) {
tmp = (-x / y) * (x * -0.3333333333333333);
} else {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((x <= (-4.6d0)) .or. (.not. (x <= 3.0d0))) then
tmp = (-x / y) * (x * (-0.3333333333333333d0))
else
tmp = ((x * (-1.3333333333333333d0)) + 1.0d0) / y
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((x <= -4.6) || !(x <= 3.0)) {
tmp = (-x / y) * (x * -0.3333333333333333);
} else {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
}
return tmp;
}
def code(x, y): tmp = 0 if (x <= -4.6) or not (x <= 3.0): tmp = (-x / y) * (x * -0.3333333333333333) else: tmp = ((x * -1.3333333333333333) + 1.0) / y return tmp
function code(x, y) tmp = 0.0 if ((x <= -4.6) || !(x <= 3.0)) tmp = Float64(Float64(Float64(-x) / y) * Float64(x * -0.3333333333333333)); else tmp = Float64(Float64(Float64(x * -1.3333333333333333) + 1.0) / y); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((x <= -4.6) || ~((x <= 3.0))) tmp = (-x / y) * (x * -0.3333333333333333); else tmp = ((x * -1.3333333333333333) + 1.0) / y; end tmp_2 = tmp; end
code[x_, y_] := If[Or[LessEqual[x, -4.6], N[Not[LessEqual[x, 3.0]], $MachinePrecision]], N[(N[((-x) / y), $MachinePrecision] * N[(x * -0.3333333333333333), $MachinePrecision]), $MachinePrecision], N[(N[(N[(x * -1.3333333333333333), $MachinePrecision] + 1.0), $MachinePrecision] / y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -4.6 \lor \neg \left(x \leq 3\right):\\
\;\;\;\;\frac{-x}{y} \cdot \left(x \cdot -0.3333333333333333\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot -1.3333333333333333 + 1}{y}\\
\end{array}
\end{array}
if x < -4.5999999999999996 or 3 < x Initial program 86.0%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 97.8%
Taylor expanded in x around inf 97.8%
neg-mul-198.0%
distribute-neg-frac98.0%
Simplified97.8%
if -4.5999999999999996 < x < 3Initial program 99.6%
*-commutative99.6%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.4%
*-commutative99.4%
*-commutative99.4%
associate-/r*99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 99.8%
Taylor expanded in y around 0 99.8%
Final simplification98.8%
(FPCore (x y) :precision binary64 (if (or (<= x -1.75) (not (<= x 0.56))) (* x (* 0.3333333333333333 (/ x y))) (/ 1.0 y)))
double code(double x, double y) {
double tmp;
if ((x <= -1.75) || !(x <= 0.56)) {
tmp = x * (0.3333333333333333 * (x / y));
} else {
tmp = 1.0 / y;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if ((x <= (-1.75d0)) .or. (.not. (x <= 0.56d0))) then
tmp = x * (0.3333333333333333d0 * (x / y))
else
tmp = 1.0d0 / y
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if ((x <= -1.75) || !(x <= 0.56)) {
tmp = x * (0.3333333333333333 * (x / y));
} else {
tmp = 1.0 / y;
}
return tmp;
}
def code(x, y): tmp = 0 if (x <= -1.75) or not (x <= 0.56): tmp = x * (0.3333333333333333 * (x / y)) else: tmp = 1.0 / y return tmp
function code(x, y) tmp = 0.0 if ((x <= -1.75) || !(x <= 0.56)) tmp = Float64(x * Float64(0.3333333333333333 * Float64(x / y))); else tmp = Float64(1.0 / y); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if ((x <= -1.75) || ~((x <= 0.56))) tmp = x * (0.3333333333333333 * (x / y)); else tmp = 1.0 / y; end tmp_2 = tmp; end
code[x_, y_] := If[Or[LessEqual[x, -1.75], N[Not[LessEqual[x, 0.56]], $MachinePrecision]], N[(x * N[(0.3333333333333333 * N[(x / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(1.0 / y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -1.75 \lor \neg \left(x \leq 0.56\right):\\
\;\;\;\;x \cdot \left(0.3333333333333333 \cdot \frac{x}{y}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{y}\\
\end{array}
\end{array}
if x < -1.75 or 0.56000000000000005 < x Initial program 86.0%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 98.0%
neg-mul-198.0%
distribute-neg-frac98.0%
Simplified98.0%
frac-2neg98.0%
frac-2neg98.0%
frac-times84.1%
remove-double-neg84.1%
sub-neg84.1%
distribute-neg-in84.1%
metadata-eval84.1%
remove-double-neg84.1%
metadata-eval84.1%
Applied egg-rr84.1%
*-commutative84.1%
*-commutative84.1%
distribute-rgt-neg-out84.1%
distribute-lft-neg-in84.1%
metadata-eval84.1%
*-commutative84.1%
associate-/l*97.1%
associate-/r/97.1%
+-commutative97.1%
Simplified97.1%
Taylor expanded in x around inf 97.7%
if -1.75 < x < 0.56000000000000005Initial program 99.6%
*-commutative99.6%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.4%
*-commutative99.4%
*-commutative99.4%
associate-/r*99.3%
metadata-eval99.3%
Simplified99.3%
associate-*r/100.0%
metadata-eval100.0%
div-inv100.0%
associate-*r/100.0%
associate-*l/100.0%
clear-num100.0%
associate-*l/100.0%
*-un-lft-identity100.0%
div-sub100.0%
metadata-eval100.0%
div-inv100.0%
metadata-eval100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 98.9%
Final simplification98.3%
(FPCore (x y) :precision binary64 (if (<= x -1.75) (* x (* 0.3333333333333333 (/ x y))) (if (<= x 0.6) (/ 1.0 y) (* x (* x (/ 0.3333333333333333 y))))))
double code(double x, double y) {
double tmp;
if (x <= -1.75) {
tmp = x * (0.3333333333333333 * (x / y));
} else if (x <= 0.6) {
tmp = 1.0 / y;
} else {
tmp = x * (x * (0.3333333333333333 / y));
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (x <= (-1.75d0)) then
tmp = x * (0.3333333333333333d0 * (x / y))
else if (x <= 0.6d0) then
tmp = 1.0d0 / y
else
tmp = x * (x * (0.3333333333333333d0 / y))
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (x <= -1.75) {
tmp = x * (0.3333333333333333 * (x / y));
} else if (x <= 0.6) {
tmp = 1.0 / y;
} else {
tmp = x * (x * (0.3333333333333333 / y));
}
return tmp;
}
def code(x, y): tmp = 0 if x <= -1.75: tmp = x * (0.3333333333333333 * (x / y)) elif x <= 0.6: tmp = 1.0 / y else: tmp = x * (x * (0.3333333333333333 / y)) return tmp
function code(x, y) tmp = 0.0 if (x <= -1.75) tmp = Float64(x * Float64(0.3333333333333333 * Float64(x / y))); elseif (x <= 0.6) tmp = Float64(1.0 / y); else tmp = Float64(x * Float64(x * Float64(0.3333333333333333 / y))); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (x <= -1.75) tmp = x * (0.3333333333333333 * (x / y)); elseif (x <= 0.6) tmp = 1.0 / y; else tmp = x * (x * (0.3333333333333333 / y)); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[x, -1.75], N[(x * N[(0.3333333333333333 * N[(x / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 0.6], N[(1.0 / y), $MachinePrecision], N[(x * N[(x * N[(0.3333333333333333 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -1.75:\\
\;\;\;\;x \cdot \left(0.3333333333333333 \cdot \frac{x}{y}\right)\\
\mathbf{elif}\;x \leq 0.6:\\
\;\;\;\;\frac{1}{y}\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(x \cdot \frac{0.3333333333333333}{y}\right)\\
\end{array}
\end{array}
if x < -1.75Initial program 84.4%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 98.3%
neg-mul-198.3%
distribute-neg-frac98.3%
Simplified98.3%
frac-2neg98.3%
frac-2neg98.3%
frac-times82.9%
remove-double-neg82.9%
sub-neg82.9%
distribute-neg-in82.9%
metadata-eval82.9%
remove-double-neg82.9%
metadata-eval82.9%
Applied egg-rr82.9%
*-commutative82.9%
*-commutative82.9%
distribute-rgt-neg-out82.9%
distribute-lft-neg-in82.9%
metadata-eval82.9%
*-commutative82.9%
associate-/l*96.9%
associate-/r/96.8%
+-commutative96.8%
Simplified96.8%
Taylor expanded in x around inf 98.1%
if -1.75 < x < 0.599999999999999978Initial program 99.6%
*-commutative99.6%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.4%
*-commutative99.4%
*-commutative99.4%
associate-/r*99.3%
metadata-eval99.3%
Simplified99.3%
associate-*r/100.0%
metadata-eval100.0%
div-inv100.0%
associate-*r/100.0%
associate-*l/100.0%
clear-num100.0%
associate-*l/100.0%
*-un-lft-identity100.0%
div-sub100.0%
metadata-eval100.0%
div-inv100.0%
metadata-eval100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 98.9%
if 0.599999999999999978 < x Initial program 88.0%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 97.5%
neg-mul-197.5%
distribute-neg-frac97.5%
Simplified97.5%
frac-2neg97.5%
frac-2neg97.5%
frac-times85.8%
remove-double-neg85.8%
sub-neg85.8%
distribute-neg-in85.8%
metadata-eval85.8%
remove-double-neg85.8%
metadata-eval85.8%
Applied egg-rr85.8%
*-commutative85.8%
*-commutative85.8%
distribute-rgt-neg-out85.8%
distribute-lft-neg-in85.8%
metadata-eval85.8%
*-commutative85.8%
associate-/l*97.5%
associate-/r/97.5%
+-commutative97.5%
Simplified97.5%
Taylor expanded in x around inf 97.2%
associate-*r/97.2%
associate-*l/97.2%
*-commutative97.2%
Simplified97.2%
Final simplification98.3%
(FPCore (x y)
:precision binary64
(if (<= x -3.8)
(* x (* 0.3333333333333333 (/ x y)))
(if (<= x 3.0)
(* (- 1.0 x) (/ 1.0 y))
(* x (* x (/ 0.3333333333333333 y))))))
double code(double x, double y) {
double tmp;
if (x <= -3.8) {
tmp = x * (0.3333333333333333 * (x / y));
} else if (x <= 3.0) {
tmp = (1.0 - x) * (1.0 / y);
} else {
tmp = x * (x * (0.3333333333333333 / y));
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (x <= (-3.8d0)) then
tmp = x * (0.3333333333333333d0 * (x / y))
else if (x <= 3.0d0) then
tmp = (1.0d0 - x) * (1.0d0 / y)
else
tmp = x * (x * (0.3333333333333333d0 / y))
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (x <= -3.8) {
tmp = x * (0.3333333333333333 * (x / y));
} else if (x <= 3.0) {
tmp = (1.0 - x) * (1.0 / y);
} else {
tmp = x * (x * (0.3333333333333333 / y));
}
return tmp;
}
def code(x, y): tmp = 0 if x <= -3.8: tmp = x * (0.3333333333333333 * (x / y)) elif x <= 3.0: tmp = (1.0 - x) * (1.0 / y) else: tmp = x * (x * (0.3333333333333333 / y)) return tmp
function code(x, y) tmp = 0.0 if (x <= -3.8) tmp = Float64(x * Float64(0.3333333333333333 * Float64(x / y))); elseif (x <= 3.0) tmp = Float64(Float64(1.0 - x) * Float64(1.0 / y)); else tmp = Float64(x * Float64(x * Float64(0.3333333333333333 / y))); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (x <= -3.8) tmp = x * (0.3333333333333333 * (x / y)); elseif (x <= 3.0) tmp = (1.0 - x) * (1.0 / y); else tmp = x * (x * (0.3333333333333333 / y)); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[x, -3.8], N[(x * N[(0.3333333333333333 * N[(x / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 3.0], N[(N[(1.0 - x), $MachinePrecision] * N[(1.0 / y), $MachinePrecision]), $MachinePrecision], N[(x * N[(x * N[(0.3333333333333333 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -3.8:\\
\;\;\;\;x \cdot \left(0.3333333333333333 \cdot \frac{x}{y}\right)\\
\mathbf{elif}\;x \leq 3:\\
\;\;\;\;\left(1 - x\right) \cdot \frac{1}{y}\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(x \cdot \frac{0.3333333333333333}{y}\right)\\
\end{array}
\end{array}
if x < -3.7999999999999998Initial program 84.4%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 98.3%
neg-mul-198.3%
distribute-neg-frac98.3%
Simplified98.3%
frac-2neg98.3%
frac-2neg98.3%
frac-times82.9%
remove-double-neg82.9%
sub-neg82.9%
distribute-neg-in82.9%
metadata-eval82.9%
remove-double-neg82.9%
metadata-eval82.9%
Applied egg-rr82.9%
*-commutative82.9%
*-commutative82.9%
distribute-rgt-neg-out82.9%
distribute-lft-neg-in82.9%
metadata-eval82.9%
*-commutative82.9%
associate-/l*96.9%
associate-/r/96.8%
+-commutative96.8%
Simplified96.8%
Taylor expanded in x around inf 98.1%
if -3.7999999999999998 < x < 3Initial program 99.6%
*-commutative99.6%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.4%
*-commutative99.4%
*-commutative99.4%
associate-/r*99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 99.0%
if 3 < x Initial program 88.0%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 97.5%
neg-mul-197.5%
distribute-neg-frac97.5%
Simplified97.5%
frac-2neg97.5%
frac-2neg97.5%
frac-times85.8%
remove-double-neg85.8%
sub-neg85.8%
distribute-neg-in85.8%
metadata-eval85.8%
remove-double-neg85.8%
metadata-eval85.8%
Applied egg-rr85.8%
*-commutative85.8%
*-commutative85.8%
distribute-rgt-neg-out85.8%
distribute-lft-neg-in85.8%
metadata-eval85.8%
*-commutative85.8%
associate-/l*97.5%
associate-/r/97.5%
+-commutative97.5%
Simplified97.5%
Taylor expanded in x around inf 97.2%
associate-*r/97.2%
associate-*l/97.2%
*-commutative97.2%
Simplified97.2%
Final simplification98.3%
(FPCore (x y)
:precision binary64
(if (<= x -4.6)
(* x (* 0.3333333333333333 (/ x y)))
(if (<= x 3.0)
(/ (+ (* x -1.3333333333333333) 1.0) y)
(* x (* x (/ 0.3333333333333333 y))))))
double code(double x, double y) {
double tmp;
if (x <= -4.6) {
tmp = x * (0.3333333333333333 * (x / y));
} else if (x <= 3.0) {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
} else {
tmp = x * (x * (0.3333333333333333 / y));
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (x <= (-4.6d0)) then
tmp = x * (0.3333333333333333d0 * (x / y))
else if (x <= 3.0d0) then
tmp = ((x * (-1.3333333333333333d0)) + 1.0d0) / y
else
tmp = x * (x * (0.3333333333333333d0 / y))
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (x <= -4.6) {
tmp = x * (0.3333333333333333 * (x / y));
} else if (x <= 3.0) {
tmp = ((x * -1.3333333333333333) + 1.0) / y;
} else {
tmp = x * (x * (0.3333333333333333 / y));
}
return tmp;
}
def code(x, y): tmp = 0 if x <= -4.6: tmp = x * (0.3333333333333333 * (x / y)) elif x <= 3.0: tmp = ((x * -1.3333333333333333) + 1.0) / y else: tmp = x * (x * (0.3333333333333333 / y)) return tmp
function code(x, y) tmp = 0.0 if (x <= -4.6) tmp = Float64(x * Float64(0.3333333333333333 * Float64(x / y))); elseif (x <= 3.0) tmp = Float64(Float64(Float64(x * -1.3333333333333333) + 1.0) / y); else tmp = Float64(x * Float64(x * Float64(0.3333333333333333 / y))); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (x <= -4.6) tmp = x * (0.3333333333333333 * (x / y)); elseif (x <= 3.0) tmp = ((x * -1.3333333333333333) + 1.0) / y; else tmp = x * (x * (0.3333333333333333 / y)); end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[x, -4.6], N[(x * N[(0.3333333333333333 * N[(x / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 3.0], N[(N[(N[(x * -1.3333333333333333), $MachinePrecision] + 1.0), $MachinePrecision] / y), $MachinePrecision], N[(x * N[(x * N[(0.3333333333333333 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -4.6:\\
\;\;\;\;x \cdot \left(0.3333333333333333 \cdot \frac{x}{y}\right)\\
\mathbf{elif}\;x \leq 3:\\
\;\;\;\;\frac{x \cdot -1.3333333333333333 + 1}{y}\\
\mathbf{else}:\\
\;\;\;\;x \cdot \left(x \cdot \frac{0.3333333333333333}{y}\right)\\
\end{array}
\end{array}
if x < -4.5999999999999996Initial program 84.4%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 98.3%
neg-mul-198.3%
distribute-neg-frac98.3%
Simplified98.3%
frac-2neg98.3%
frac-2neg98.3%
frac-times82.9%
remove-double-neg82.9%
sub-neg82.9%
distribute-neg-in82.9%
metadata-eval82.9%
remove-double-neg82.9%
metadata-eval82.9%
Applied egg-rr82.9%
*-commutative82.9%
*-commutative82.9%
distribute-rgt-neg-out82.9%
distribute-lft-neg-in82.9%
metadata-eval82.9%
*-commutative82.9%
associate-/l*96.9%
associate-/r/96.8%
+-commutative96.8%
Simplified96.8%
Taylor expanded in x around inf 98.1%
if -4.5999999999999996 < x < 3Initial program 99.6%
*-commutative99.6%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.4%
*-commutative99.4%
*-commutative99.4%
associate-/r*99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around 0 99.8%
Taylor expanded in y around 0 99.8%
if 3 < x Initial program 88.0%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 97.5%
neg-mul-197.5%
distribute-neg-frac97.5%
Simplified97.5%
frac-2neg97.5%
frac-2neg97.5%
frac-times85.8%
remove-double-neg85.8%
sub-neg85.8%
distribute-neg-in85.8%
metadata-eval85.8%
remove-double-neg85.8%
metadata-eval85.8%
Applied egg-rr85.8%
*-commutative85.8%
*-commutative85.8%
distribute-rgt-neg-out85.8%
distribute-lft-neg-in85.8%
metadata-eval85.8%
*-commutative85.8%
associate-/l*97.5%
associate-/r/97.5%
+-commutative97.5%
Simplified97.5%
Taylor expanded in x around inf 97.2%
associate-*r/97.2%
associate-*l/97.2%
*-commutative97.2%
Simplified97.2%
Final simplification98.7%
(FPCore (x y) :precision binary64 (* (- 1.0 x) (* (- 3.0 x) (/ 0.3333333333333333 y))))
double code(double x, double y) {
return (1.0 - x) * ((3.0 - x) * (0.3333333333333333 / y));
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (1.0d0 - x) * ((3.0d0 - x) * (0.3333333333333333d0 / y))
end function
public static double code(double x, double y) {
return (1.0 - x) * ((3.0 - x) * (0.3333333333333333 / y));
}
def code(x, y): return (1.0 - x) * ((3.0 - x) * (0.3333333333333333 / y))
function code(x, y) return Float64(Float64(1.0 - x) * Float64(Float64(3.0 - x) * Float64(0.3333333333333333 / y))) end
function tmp = code(x, y) tmp = (1.0 - x) * ((3.0 - x) * (0.3333333333333333 / y)); end
code[x_, y_] := N[(N[(1.0 - x), $MachinePrecision] * N[(N[(3.0 - x), $MachinePrecision] * N[(0.3333333333333333 / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(1 - x\right) \cdot \left(\left(3 - x\right) \cdot \frac{0.3333333333333333}{y}\right)
\end{array}
Initial program 92.7%
*-commutative92.7%
associate-*l/99.3%
*-commutative99.3%
*-lft-identity99.3%
associate-*l/99.2%
*-commutative99.2%
*-commutative99.2%
associate-/r*99.5%
metadata-eval99.5%
Simplified99.5%
Final simplification99.5%
(FPCore (x y) :precision binary64 (if (<= x -0.75) (* -1.3333333333333333 (/ x y)) (/ 1.0 y)))
double code(double x, double y) {
double tmp;
if (x <= -0.75) {
tmp = -1.3333333333333333 * (x / y);
} else {
tmp = 1.0 / y;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (x <= (-0.75d0)) then
tmp = (-1.3333333333333333d0) * (x / y)
else
tmp = 1.0d0 / y
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (x <= -0.75) {
tmp = -1.3333333333333333 * (x / y);
} else {
tmp = 1.0 / y;
}
return tmp;
}
def code(x, y): tmp = 0 if x <= -0.75: tmp = -1.3333333333333333 * (x / y) else: tmp = 1.0 / y return tmp
function code(x, y) tmp = 0.0 if (x <= -0.75) tmp = Float64(-1.3333333333333333 * Float64(x / y)); else tmp = Float64(1.0 / y); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (x <= -0.75) tmp = -1.3333333333333333 * (x / y); else tmp = 1.0 / y; end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[x, -0.75], N[(-1.3333333333333333 * N[(x / y), $MachinePrecision]), $MachinePrecision], N[(1.0 / y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -0.75:\\
\;\;\;\;-1.3333333333333333 \cdot \frac{x}{y}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{y}\\
\end{array}
\end{array}
if x < -0.75Initial program 84.4%
*-commutative84.4%
associate-*l/98.3%
*-commutative98.3%
*-lft-identity98.3%
associate-*l/98.3%
*-commutative98.3%
*-commutative98.3%
associate-/r*99.6%
metadata-eval99.6%
Simplified99.6%
Taylor expanded in x around 0 34.4%
Taylor expanded in x around inf 34.4%
if -0.75 < x Initial program 96.0%
*-commutative96.0%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.5%
*-commutative99.5%
*-commutative99.5%
associate-/r*99.4%
metadata-eval99.4%
Simplified99.4%
associate-*r/99.9%
metadata-eval99.9%
div-inv99.9%
associate-*r/96.4%
associate-*l/99.9%
clear-num99.9%
associate-*l/99.9%
*-un-lft-identity99.9%
div-sub99.9%
metadata-eval99.9%
div-inv99.9%
metadata-eval99.9%
Applied egg-rr99.9%
Taylor expanded in x around 0 70.2%
Final simplification60.0%
(FPCore (x y) :precision binary64 (if (<= x -1.0) (/ (- x) y) (/ 1.0 y)))
double code(double x, double y) {
double tmp;
if (x <= -1.0) {
tmp = -x / y;
} else {
tmp = 1.0 / y;
}
return tmp;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8) :: tmp
if (x <= (-1.0d0)) then
tmp = -x / y
else
tmp = 1.0d0 / y
end if
code = tmp
end function
public static double code(double x, double y) {
double tmp;
if (x <= -1.0) {
tmp = -x / y;
} else {
tmp = 1.0 / y;
}
return tmp;
}
def code(x, y): tmp = 0 if x <= -1.0: tmp = -x / y else: tmp = 1.0 / y return tmp
function code(x, y) tmp = 0.0 if (x <= -1.0) tmp = Float64(Float64(-x) / y); else tmp = Float64(1.0 / y); end return tmp end
function tmp_2 = code(x, y) tmp = 0.0; if (x <= -1.0) tmp = -x / y; else tmp = 1.0 / y; end tmp_2 = tmp; end
code[x_, y_] := If[LessEqual[x, -1.0], N[((-x) / y), $MachinePrecision], N[(1.0 / y), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -1:\\
\;\;\;\;\frac{-x}{y}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{y}\\
\end{array}
\end{array}
if x < -1Initial program 84.4%
times-frac99.8%
Simplified99.8%
Taylor expanded in x around inf 98.3%
neg-mul-198.3%
distribute-neg-frac98.3%
Simplified98.3%
Taylor expanded in x around 0 34.4%
mul-1-neg34.4%
distribute-neg-frac34.4%
Simplified34.4%
if -1 < x Initial program 96.0%
*-commutative96.0%
associate-*l/99.6%
*-commutative99.6%
*-lft-identity99.6%
associate-*l/99.5%
*-commutative99.5%
*-commutative99.5%
associate-/r*99.4%
metadata-eval99.4%
Simplified99.4%
associate-*r/99.9%
metadata-eval99.9%
div-inv99.9%
associate-*r/96.4%
associate-*l/99.9%
clear-num99.9%
associate-*l/99.9%
*-un-lft-identity99.9%
div-sub99.9%
metadata-eval99.9%
div-inv99.9%
metadata-eval99.9%
Applied egg-rr99.9%
Taylor expanded in x around 0 70.2%
Final simplification60.0%
(FPCore (x y) :precision binary64 (/ 1.0 y))
double code(double x, double y) {
return 1.0 / y;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = 1.0d0 / y
end function
public static double code(double x, double y) {
return 1.0 / y;
}
def code(x, y): return 1.0 / y
function code(x, y) return Float64(1.0 / y) end
function tmp = code(x, y) tmp = 1.0 / y; end
code[x_, y_] := N[(1.0 / y), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{y}
\end{array}
Initial program 92.7%
*-commutative92.7%
associate-*l/99.3%
*-commutative99.3%
*-lft-identity99.3%
associate-*l/99.2%
*-commutative99.2%
*-commutative99.2%
associate-/r*99.5%
metadata-eval99.5%
Simplified99.5%
associate-*r/99.8%
metadata-eval99.8%
div-inv99.9%
associate-*r/93.0%
associate-*l/99.9%
clear-num99.9%
associate-*l/99.9%
*-un-lft-identity99.9%
div-sub99.9%
metadata-eval99.9%
div-inv99.9%
metadata-eval99.9%
Applied egg-rr99.9%
Taylor expanded in x around 0 51.6%
Final simplification51.6%
(FPCore (x y) :precision binary64 (* (/ (- 1.0 x) y) (/ (- 3.0 x) 3.0)))
double code(double x, double y) {
return ((1.0 - x) / y) * ((3.0 - x) / 3.0);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = ((1.0d0 - x) / y) * ((3.0d0 - x) / 3.0d0)
end function
public static double code(double x, double y) {
return ((1.0 - x) / y) * ((3.0 - x) / 3.0);
}
def code(x, y): return ((1.0 - x) / y) * ((3.0 - x) / 3.0)
function code(x, y) return Float64(Float64(Float64(1.0 - x) / y) * Float64(Float64(3.0 - x) / 3.0)) end
function tmp = code(x, y) tmp = ((1.0 - x) / y) * ((3.0 - x) / 3.0); end
code[x_, y_] := N[(N[(N[(1.0 - x), $MachinePrecision] / y), $MachinePrecision] * N[(N[(3.0 - x), $MachinePrecision] / 3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1 - x}{y} \cdot \frac{3 - x}{3}
\end{array}
herbie shell --seed 2023306
(FPCore (x y)
:name "Diagrams.TwoD.Arc:bezierFromSweepQ1 from diagrams-lib-1.3.0.3"
:precision binary64
:herbie-target
(* (/ (- 1.0 x) y) (/ (- 3.0 x) 3.0))
(/ (* (- 1.0 x) (- 3.0 x)) (* y 3.0)))