
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x 0.5)))) (/ (* (* (/ 8.0 3.0) t_0) t_0) (sin x))))
double code(double x) {
double t_0 = sin((x * 0.5));
return (((8.0 / 3.0) * t_0) * t_0) / sin(x);
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * 0.5d0))
code = (((8.0d0 / 3.0d0) * t_0) * t_0) / sin(x)
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return (((8.0 / 3.0) * t_0) * t_0) / Math.sin(x);
}
def code(x): t_0 = math.sin((x * 0.5)) return (((8.0 / 3.0) * t_0) * t_0) / math.sin(x)
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(Float64(Float64(Float64(8.0 / 3.0) * t_0) * t_0) / sin(x)) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = (((8.0 / 3.0) * t_0) * t_0) / sin(x); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(N[(N[(N[(8.0 / 3.0), $MachinePrecision] * t$95$0), $MachinePrecision] * t$95$0), $MachinePrecision] / N[Sin[x], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot 0.5\right)\\
\frac{\left(\frac{8}{3} \cdot t_0\right) \cdot t_0}{\sin x}
\end{array}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 12 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x 0.5)))) (/ (* (* (/ 8.0 3.0) t_0) t_0) (sin x))))
double code(double x) {
double t_0 = sin((x * 0.5));
return (((8.0 / 3.0) * t_0) * t_0) / sin(x);
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * 0.5d0))
code = (((8.0d0 / 3.0d0) * t_0) * t_0) / sin(x)
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return (((8.0 / 3.0) * t_0) * t_0) / Math.sin(x);
}
def code(x): t_0 = math.sin((x * 0.5)) return (((8.0 / 3.0) * t_0) * t_0) / math.sin(x)
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(Float64(Float64(Float64(8.0 / 3.0) * t_0) * t_0) / sin(x)) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = (((8.0 / 3.0) * t_0) * t_0) / sin(x); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(N[(N[(N[(8.0 / 3.0), $MachinePrecision] * t$95$0), $MachinePrecision] * t$95$0), $MachinePrecision] / N[Sin[x], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot 0.5\right)\\
\frac{\left(\frac{8}{3} \cdot t_0\right) \cdot t_0}{\sin x}
\end{array}
\end{array}
(FPCore (x)
:precision binary64
(let* ((t_0 (sin (* x -0.5))))
(if (or (<= x -0.0004) (not (<= x 2e-5)))
(* 2.6666666666666665 (/ (pow t_0 2.0) (sin x)))
(/ t_0 (- (* 0.09375 (pow x 2.0)) 0.75)))))
double code(double x) {
double t_0 = sin((x * -0.5));
double tmp;
if ((x <= -0.0004) || !(x <= 2e-5)) {
tmp = 2.6666666666666665 * (pow(t_0, 2.0) / sin(x));
} else {
tmp = t_0 / ((0.09375 * pow(x, 2.0)) - 0.75);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
real(8) :: tmp
t_0 = sin((x * (-0.5d0)))
if ((x <= (-0.0004d0)) .or. (.not. (x <= 2d-5))) then
tmp = 2.6666666666666665d0 * ((t_0 ** 2.0d0) / sin(x))
else
tmp = t_0 / ((0.09375d0 * (x ** 2.0d0)) - 0.75d0)
end if
code = tmp
end function
public static double code(double x) {
double t_0 = Math.sin((x * -0.5));
double tmp;
if ((x <= -0.0004) || !(x <= 2e-5)) {
tmp = 2.6666666666666665 * (Math.pow(t_0, 2.0) / Math.sin(x));
} else {
tmp = t_0 / ((0.09375 * Math.pow(x, 2.0)) - 0.75);
}
return tmp;
}
def code(x): t_0 = math.sin((x * -0.5)) tmp = 0 if (x <= -0.0004) or not (x <= 2e-5): tmp = 2.6666666666666665 * (math.pow(t_0, 2.0) / math.sin(x)) else: tmp = t_0 / ((0.09375 * math.pow(x, 2.0)) - 0.75) return tmp
function code(x) t_0 = sin(Float64(x * -0.5)) tmp = 0.0 if ((x <= -0.0004) || !(x <= 2e-5)) tmp = Float64(2.6666666666666665 * Float64((t_0 ^ 2.0) / sin(x))); else tmp = Float64(t_0 / Float64(Float64(0.09375 * (x ^ 2.0)) - 0.75)); end return tmp end
function tmp_2 = code(x) t_0 = sin((x * -0.5)); tmp = 0.0; if ((x <= -0.0004) || ~((x <= 2e-5))) tmp = 2.6666666666666665 * ((t_0 ^ 2.0) / sin(x)); else tmp = t_0 / ((0.09375 * (x ^ 2.0)) - 0.75); end tmp_2 = tmp; end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision]}, If[Or[LessEqual[x, -0.0004], N[Not[LessEqual[x, 2e-5]], $MachinePrecision]], N[(2.6666666666666665 * N[(N[Power[t$95$0, 2.0], $MachinePrecision] / N[Sin[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(t$95$0 / N[(N[(0.09375 * N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision] - 0.75), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot -0.5\right)\\
\mathbf{if}\;x \leq -0.0004 \lor \neg \left(x \leq 2 \cdot 10^{-5}\right):\\
\;\;\;\;2.6666666666666665 \cdot \frac{{t_0}^{2}}{\sin x}\\
\mathbf{else}:\\
\;\;\;\;\frac{t_0}{0.09375 \cdot {x}^{2} - 0.75}\\
\end{array}
\end{array}
if x < -4.00000000000000019e-4 or 2.00000000000000016e-5 < x Initial program 98.9%
*-rgt-identity98.9%
metadata-eval98.9%
times-frac98.9%
associate-/l*98.9%
associate-/l*98.9%
*-commutative98.9%
neg-mul-198.9%
sin-neg98.9%
distribute-lft-neg-out98.9%
times-frac98.9%
associate-/l/98.9%
associate-/l*98.9%
Simplified98.9%
*-commutative98.9%
associate-*r*98.9%
associate-*l/99.0%
pow299.0%
Applied egg-rr99.0%
if -4.00000000000000019e-4 < x < 2.00000000000000016e-5Initial program 48.0%
associate-/l*99.6%
associate-*r/99.6%
metadata-eval99.6%
associate-/l*48.0%
sqr-neg48.0%
sin-neg48.0%
distribute-lft-neg-out48.0%
sin-neg48.0%
distribute-lft-neg-out48.0%
associate-*r/99.6%
distribute-lft-neg-out99.6%
sin-neg99.6%
neg-mul-199.6%
*-commutative99.6%
associate-/l*99.6%
Simplified99.6%
associate-*r*99.6%
*-commutative99.6%
associate-/r/99.5%
*-un-lft-identity99.5%
times-frac100.0%
metadata-eval100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 100.0%
Final simplification99.5%
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x -0.5)))) (/ t_0 (* 0.375 (/ (sin x) t_0)))))
double code(double x) {
double t_0 = sin((x * -0.5));
return t_0 / (0.375 * (sin(x) / t_0));
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * (-0.5d0)))
code = t_0 / (0.375d0 * (sin(x) / t_0))
end function
public static double code(double x) {
double t_0 = Math.sin((x * -0.5));
return t_0 / (0.375 * (Math.sin(x) / t_0));
}
def code(x): t_0 = math.sin((x * -0.5)) return t_0 / (0.375 * (math.sin(x) / t_0))
function code(x) t_0 = sin(Float64(x * -0.5)) return Float64(t_0 / Float64(0.375 * Float64(sin(x) / t_0))) end
function tmp = code(x) t_0 = sin((x * -0.5)); tmp = t_0 / (0.375 * (sin(x) / t_0)); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision]}, N[(t$95$0 / N[(0.375 * N[(N[Sin[x], $MachinePrecision] / t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot -0.5\right)\\
\frac{t_0}{0.375 \cdot \frac{\sin x}{t_0}}
\end{array}
\end{array}
Initial program 71.9%
associate-/l*99.3%
associate-*r/99.3%
metadata-eval99.3%
associate-/l*71.9%
sqr-neg71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
associate-*r/99.3%
distribute-lft-neg-out99.3%
sin-neg99.3%
neg-mul-199.3%
*-commutative99.3%
associate-/l*99.3%
Simplified99.3%
associate-*r*99.3%
*-commutative99.3%
associate-/r/99.2%
*-un-lft-identity99.2%
times-frac99.5%
metadata-eval99.5%
Applied egg-rr99.5%
Final simplification99.5%
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x -0.5)))) (* 2.6666666666666665 (* t_0 (/ t_0 (sin x))))))
double code(double x) {
double t_0 = sin((x * -0.5));
return 2.6666666666666665 * (t_0 * (t_0 / sin(x)));
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * (-0.5d0)))
code = 2.6666666666666665d0 * (t_0 * (t_0 / sin(x)))
end function
public static double code(double x) {
double t_0 = Math.sin((x * -0.5));
return 2.6666666666666665 * (t_0 * (t_0 / Math.sin(x)));
}
def code(x): t_0 = math.sin((x * -0.5)) return 2.6666666666666665 * (t_0 * (t_0 / math.sin(x)))
function code(x) t_0 = sin(Float64(x * -0.5)) return Float64(2.6666666666666665 * Float64(t_0 * Float64(t_0 / sin(x)))) end
function tmp = code(x) t_0 = sin((x * -0.5)); tmp = 2.6666666666666665 * (t_0 * (t_0 / sin(x))); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision]}, N[(2.6666666666666665 * N[(t$95$0 * N[(t$95$0 / N[Sin[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot -0.5\right)\\
2.6666666666666665 \cdot \left(t_0 \cdot \frac{t_0}{\sin x}\right)
\end{array}
\end{array}
Initial program 71.9%
associate-/l*99.3%
associate-*r/99.3%
metadata-eval99.3%
associate-/l*71.9%
sqr-neg71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
associate-*r/99.3%
distribute-lft-neg-out99.3%
sin-neg99.3%
neg-mul-199.3%
*-commutative99.3%
associate-/l*99.3%
Simplified99.3%
Final simplification99.3%
(FPCore (x)
:precision binary64
(let* ((t_0 (- 0.5 (/ (cos (- x)) 2.0))))
(if (<= x -0.0049)
(/ 2.6666666666666665 (/ (sin x) t_0))
(if (<= x 0.0058)
(/ (sin (* x -0.5)) (- (* 0.09375 (pow x 2.0)) 0.75))
(+ (+ 1.0 (* 2.6666666666666665 (/ t_0 (sin x)))) -1.0)))))
double code(double x) {
double t_0 = 0.5 - (cos(-x) / 2.0);
double tmp;
if (x <= -0.0049) {
tmp = 2.6666666666666665 / (sin(x) / t_0);
} else if (x <= 0.0058) {
tmp = sin((x * -0.5)) / ((0.09375 * pow(x, 2.0)) - 0.75);
} else {
tmp = (1.0 + (2.6666666666666665 * (t_0 / sin(x)))) + -1.0;
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
real(8) :: tmp
t_0 = 0.5d0 - (cos(-x) / 2.0d0)
if (x <= (-0.0049d0)) then
tmp = 2.6666666666666665d0 / (sin(x) / t_0)
else if (x <= 0.0058d0) then
tmp = sin((x * (-0.5d0))) / ((0.09375d0 * (x ** 2.0d0)) - 0.75d0)
else
tmp = (1.0d0 + (2.6666666666666665d0 * (t_0 / sin(x)))) + (-1.0d0)
end if
code = tmp
end function
public static double code(double x) {
double t_0 = 0.5 - (Math.cos(-x) / 2.0);
double tmp;
if (x <= -0.0049) {
tmp = 2.6666666666666665 / (Math.sin(x) / t_0);
} else if (x <= 0.0058) {
tmp = Math.sin((x * -0.5)) / ((0.09375 * Math.pow(x, 2.0)) - 0.75);
} else {
tmp = (1.0 + (2.6666666666666665 * (t_0 / Math.sin(x)))) + -1.0;
}
return tmp;
}
def code(x): t_0 = 0.5 - (math.cos(-x) / 2.0) tmp = 0 if x <= -0.0049: tmp = 2.6666666666666665 / (math.sin(x) / t_0) elif x <= 0.0058: tmp = math.sin((x * -0.5)) / ((0.09375 * math.pow(x, 2.0)) - 0.75) else: tmp = (1.0 + (2.6666666666666665 * (t_0 / math.sin(x)))) + -1.0 return tmp
function code(x) t_0 = Float64(0.5 - Float64(cos(Float64(-x)) / 2.0)) tmp = 0.0 if (x <= -0.0049) tmp = Float64(2.6666666666666665 / Float64(sin(x) / t_0)); elseif (x <= 0.0058) tmp = Float64(sin(Float64(x * -0.5)) / Float64(Float64(0.09375 * (x ^ 2.0)) - 0.75)); else tmp = Float64(Float64(1.0 + Float64(2.6666666666666665 * Float64(t_0 / sin(x)))) + -1.0); end return tmp end
function tmp_2 = code(x) t_0 = 0.5 - (cos(-x) / 2.0); tmp = 0.0; if (x <= -0.0049) tmp = 2.6666666666666665 / (sin(x) / t_0); elseif (x <= 0.0058) tmp = sin((x * -0.5)) / ((0.09375 * (x ^ 2.0)) - 0.75); else tmp = (1.0 + (2.6666666666666665 * (t_0 / sin(x)))) + -1.0; end tmp_2 = tmp; end
code[x_] := Block[{t$95$0 = N[(0.5 - N[(N[Cos[(-x)], $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x, -0.0049], N[(2.6666666666666665 / N[(N[Sin[x], $MachinePrecision] / t$95$0), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 0.0058], N[(N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision] / N[(N[(0.09375 * N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision] - 0.75), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 + N[(2.6666666666666665 * N[(t$95$0 / N[Sin[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 0.5 - \frac{\cos \left(-x\right)}{2}\\
\mathbf{if}\;x \leq -0.0049:\\
\;\;\;\;\frac{2.6666666666666665}{\frac{\sin x}{t_0}}\\
\mathbf{elif}\;x \leq 0.0058:\\
\;\;\;\;\frac{\sin \left(x \cdot -0.5\right)}{0.09375 \cdot {x}^{2} - 0.75}\\
\mathbf{else}:\\
\;\;\;\;\left(1 + 2.6666666666666665 \cdot \frac{t_0}{\sin x}\right) + -1\\
\end{array}
\end{array}
if x < -0.0048999999999999998Initial program 99.0%
associate-/l*99.0%
associate-*r/99.1%
metadata-eval99.1%
associate-/l*99.1%
sqr-neg99.1%
sin-neg99.1%
distribute-lft-neg-out99.1%
sin-neg99.1%
distribute-lft-neg-out99.1%
associate-*r/99.1%
distribute-lft-neg-out99.1%
sin-neg99.1%
neg-mul-199.1%
*-commutative99.1%
associate-/l*99.1%
Simplified99.1%
*-commutative99.1%
associate-/r/99.1%
associate-*r/99.0%
associate-/l*99.1%
associate-/l/99.0%
pow299.0%
Applied egg-rr99.0%
unpow299.0%
sin-mult98.6%
Applied egg-rr98.6%
div-sub98.6%
+-inverses98.6%
cos-098.6%
metadata-eval98.6%
count-298.6%
*-commutative98.6%
associate-*r*98.6%
metadata-eval98.6%
neg-mul-198.6%
Simplified98.6%
if -0.0048999999999999998 < x < 0.0058Initial program 48.4%
associate-/l*99.6%
associate-*r/99.6%
metadata-eval99.6%
associate-/l*48.4%
sqr-neg48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
associate-*r/99.6%
distribute-lft-neg-out99.6%
sin-neg99.6%
neg-mul-199.6%
*-commutative99.6%
associate-/l*99.6%
Simplified99.6%
associate-*r*99.6%
*-commutative99.6%
associate-/r/99.5%
*-un-lft-identity99.5%
times-frac100.0%
metadata-eval100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 100.0%
if 0.0058 < x Initial program 98.8%
associate-/l*98.8%
associate-*r/98.9%
metadata-eval98.9%
associate-/l*98.9%
sqr-neg98.9%
sin-neg98.9%
distribute-lft-neg-out98.9%
sin-neg98.9%
distribute-lft-neg-out98.9%
associate-*r/99.0%
distribute-lft-neg-out99.0%
sin-neg99.0%
neg-mul-199.0%
*-commutative99.0%
associate-/l*99.0%
Simplified99.0%
associate-*r*99.0%
*-commutative99.0%
associate-/r/98.7%
*-un-lft-identity98.7%
times-frac98.8%
metadata-eval98.8%
Applied egg-rr98.8%
*-un-lft-identity98.8%
times-frac98.9%
metadata-eval98.9%
associate-/l*98.9%
unpow298.9%
expm1-log1p-u72.1%
expm1-udef71.7%
log1p-udef71.6%
rem-exp-log98.5%
Applied egg-rr98.5%
unpow298.7%
sin-mult98.4%
Applied egg-rr98.5%
div-sub98.4%
+-inverses98.4%
cos-098.4%
metadata-eval98.4%
count-298.4%
*-commutative98.4%
associate-*r*98.4%
metadata-eval98.4%
neg-mul-198.4%
Simplified98.5%
Final simplification99.3%
(FPCore (x)
:precision binary64
(let* ((t_0 (- 0.5 (/ (cos (- x)) 2.0))))
(if (<= x -0.0049)
(/ 2.6666666666666665 (/ (sin x) t_0))
(if (<= x 0.0058)
(/ (sin (* x -0.5)) (- (* 0.09375 (pow x 2.0)) 0.75))
(/ 1.0 (/ (sin x) (* 2.6666666666666665 t_0)))))))
double code(double x) {
double t_0 = 0.5 - (cos(-x) / 2.0);
double tmp;
if (x <= -0.0049) {
tmp = 2.6666666666666665 / (sin(x) / t_0);
} else if (x <= 0.0058) {
tmp = sin((x * -0.5)) / ((0.09375 * pow(x, 2.0)) - 0.75);
} else {
tmp = 1.0 / (sin(x) / (2.6666666666666665 * t_0));
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
real(8) :: tmp
t_0 = 0.5d0 - (cos(-x) / 2.0d0)
if (x <= (-0.0049d0)) then
tmp = 2.6666666666666665d0 / (sin(x) / t_0)
else if (x <= 0.0058d0) then
tmp = sin((x * (-0.5d0))) / ((0.09375d0 * (x ** 2.0d0)) - 0.75d0)
else
tmp = 1.0d0 / (sin(x) / (2.6666666666666665d0 * t_0))
end if
code = tmp
end function
public static double code(double x) {
double t_0 = 0.5 - (Math.cos(-x) / 2.0);
double tmp;
if (x <= -0.0049) {
tmp = 2.6666666666666665 / (Math.sin(x) / t_0);
} else if (x <= 0.0058) {
tmp = Math.sin((x * -0.5)) / ((0.09375 * Math.pow(x, 2.0)) - 0.75);
} else {
tmp = 1.0 / (Math.sin(x) / (2.6666666666666665 * t_0));
}
return tmp;
}
def code(x): t_0 = 0.5 - (math.cos(-x) / 2.0) tmp = 0 if x <= -0.0049: tmp = 2.6666666666666665 / (math.sin(x) / t_0) elif x <= 0.0058: tmp = math.sin((x * -0.5)) / ((0.09375 * math.pow(x, 2.0)) - 0.75) else: tmp = 1.0 / (math.sin(x) / (2.6666666666666665 * t_0)) return tmp
function code(x) t_0 = Float64(0.5 - Float64(cos(Float64(-x)) / 2.0)) tmp = 0.0 if (x <= -0.0049) tmp = Float64(2.6666666666666665 / Float64(sin(x) / t_0)); elseif (x <= 0.0058) tmp = Float64(sin(Float64(x * -0.5)) / Float64(Float64(0.09375 * (x ^ 2.0)) - 0.75)); else tmp = Float64(1.0 / Float64(sin(x) / Float64(2.6666666666666665 * t_0))); end return tmp end
function tmp_2 = code(x) t_0 = 0.5 - (cos(-x) / 2.0); tmp = 0.0; if (x <= -0.0049) tmp = 2.6666666666666665 / (sin(x) / t_0); elseif (x <= 0.0058) tmp = sin((x * -0.5)) / ((0.09375 * (x ^ 2.0)) - 0.75); else tmp = 1.0 / (sin(x) / (2.6666666666666665 * t_0)); end tmp_2 = tmp; end
code[x_] := Block[{t$95$0 = N[(0.5 - N[(N[Cos[(-x)], $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x, -0.0049], N[(2.6666666666666665 / N[(N[Sin[x], $MachinePrecision] / t$95$0), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 0.0058], N[(N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision] / N[(N[(0.09375 * N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision] - 0.75), $MachinePrecision]), $MachinePrecision], N[(1.0 / N[(N[Sin[x], $MachinePrecision] / N[(2.6666666666666665 * t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := 0.5 - \frac{\cos \left(-x\right)}{2}\\
\mathbf{if}\;x \leq -0.0049:\\
\;\;\;\;\frac{2.6666666666666665}{\frac{\sin x}{t_0}}\\
\mathbf{elif}\;x \leq 0.0058:\\
\;\;\;\;\frac{\sin \left(x \cdot -0.5\right)}{0.09375 \cdot {x}^{2} - 0.75}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{\sin x}{2.6666666666666665 \cdot t_0}}\\
\end{array}
\end{array}
if x < -0.0048999999999999998Initial program 99.0%
associate-/l*99.0%
associate-*r/99.1%
metadata-eval99.1%
associate-/l*99.1%
sqr-neg99.1%
sin-neg99.1%
distribute-lft-neg-out99.1%
sin-neg99.1%
distribute-lft-neg-out99.1%
associate-*r/99.1%
distribute-lft-neg-out99.1%
sin-neg99.1%
neg-mul-199.1%
*-commutative99.1%
associate-/l*99.1%
Simplified99.1%
*-commutative99.1%
associate-/r/99.1%
associate-*r/99.0%
associate-/l*99.1%
associate-/l/99.0%
pow299.0%
Applied egg-rr99.0%
unpow299.0%
sin-mult98.6%
Applied egg-rr98.6%
div-sub98.6%
+-inverses98.6%
cos-098.6%
metadata-eval98.6%
count-298.6%
*-commutative98.6%
associate-*r*98.6%
metadata-eval98.6%
neg-mul-198.6%
Simplified98.6%
if -0.0048999999999999998 < x < 0.0058Initial program 48.4%
associate-/l*99.6%
associate-*r/99.6%
metadata-eval99.6%
associate-/l*48.4%
sqr-neg48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
associate-*r/99.6%
distribute-lft-neg-out99.6%
sin-neg99.6%
neg-mul-199.6%
*-commutative99.6%
associate-/l*99.6%
Simplified99.6%
associate-*r*99.6%
*-commutative99.6%
associate-/r/99.5%
*-un-lft-identity99.5%
times-frac100.0%
metadata-eval100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 100.0%
if 0.0058 < x Initial program 98.8%
associate-/l*98.8%
associate-*r/98.9%
metadata-eval98.9%
associate-/l*98.9%
sqr-neg98.9%
sin-neg98.9%
distribute-lft-neg-out98.9%
sin-neg98.9%
distribute-lft-neg-out98.9%
associate-*r/99.0%
distribute-lft-neg-out99.0%
sin-neg99.0%
neg-mul-199.0%
*-commutative99.0%
associate-/l*99.0%
Simplified99.0%
Applied egg-rr98.7%
unpow298.7%
sin-mult98.4%
Applied egg-rr98.4%
div-sub98.4%
+-inverses98.4%
cos-098.4%
metadata-eval98.4%
count-298.4%
*-commutative98.4%
associate-*r*98.4%
metadata-eval98.4%
neg-mul-198.4%
Simplified98.4%
Final simplification99.3%
(FPCore (x) :precision binary64 (if (or (<= x -0.0062) (not (<= x 0.006))) (/ 2.6666666666666665 (/ (sin x) (- 0.5 (/ (cos (- x)) 2.0)))) (/ 1.0 (fma x -0.125 (/ 1.5 x)))))
double code(double x) {
double tmp;
if ((x <= -0.0062) || !(x <= 0.006)) {
tmp = 2.6666666666666665 / (sin(x) / (0.5 - (cos(-x) / 2.0)));
} else {
tmp = 1.0 / fma(x, -0.125, (1.5 / x));
}
return tmp;
}
function code(x) tmp = 0.0 if ((x <= -0.0062) || !(x <= 0.006)) tmp = Float64(2.6666666666666665 / Float64(sin(x) / Float64(0.5 - Float64(cos(Float64(-x)) / 2.0)))); else tmp = Float64(1.0 / fma(x, -0.125, Float64(1.5 / x))); end return tmp end
code[x_] := If[Or[LessEqual[x, -0.0062], N[Not[LessEqual[x, 0.006]], $MachinePrecision]], N[(2.6666666666666665 / N[(N[Sin[x], $MachinePrecision] / N[(0.5 - N[(N[Cos[(-x)], $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(1.0 / N[(x * -0.125 + N[(1.5 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -0.0062 \lor \neg \left(x \leq 0.006\right):\\
\;\;\;\;\frac{2.6666666666666665}{\frac{\sin x}{0.5 - \frac{\cos \left(-x\right)}{2}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\mathsf{fma}\left(x, -0.125, \frac{1.5}{x}\right)}\\
\end{array}
\end{array}
if x < -0.00619999999999999978 or 0.0060000000000000001 < x Initial program 98.9%
associate-/l*98.9%
associate-*r/99.0%
metadata-eval99.0%
associate-/l*99.0%
sqr-neg99.0%
sin-neg99.0%
distribute-lft-neg-out99.0%
sin-neg99.0%
distribute-lft-neg-out99.0%
associate-*r/99.1%
distribute-lft-neg-out99.1%
sin-neg99.1%
neg-mul-199.1%
*-commutative99.1%
associate-/l*99.1%
Simplified99.1%
*-commutative99.1%
associate-/r/99.0%
associate-*r/98.9%
associate-/l*98.9%
associate-/l/98.9%
pow298.9%
Applied egg-rr98.9%
unpow298.9%
sin-mult98.5%
Applied egg-rr98.5%
div-sub98.5%
+-inverses98.5%
cos-098.5%
metadata-eval98.5%
count-298.5%
*-commutative98.5%
associate-*r*98.5%
metadata-eval98.5%
neg-mul-198.5%
Simplified98.5%
if -0.00619999999999999978 < x < 0.0060000000000000001Initial program 48.4%
associate-/l*99.6%
associate-*r/99.6%
metadata-eval99.6%
associate-/l*48.4%
sqr-neg48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
associate-*r/99.6%
distribute-lft-neg-out99.6%
sin-neg99.6%
neg-mul-199.6%
*-commutative99.6%
associate-/l*99.6%
Simplified99.6%
Applied egg-rr48.2%
Taylor expanded in x around 0 99.5%
*-commutative99.5%
fma-def99.5%
associate-*r/99.6%
metadata-eval99.6%
Simplified99.6%
Final simplification99.1%
(FPCore (x) :precision binary64 (if (or (<= x -0.0049) (not (<= x 0.0058))) (/ 2.6666666666666665 (/ (sin x) (- 0.5 (/ (cos (- x)) 2.0)))) (/ (sin (* x -0.5)) (- (* 0.09375 (pow x 2.0)) 0.75))))
double code(double x) {
double tmp;
if ((x <= -0.0049) || !(x <= 0.0058)) {
tmp = 2.6666666666666665 / (sin(x) / (0.5 - (cos(-x) / 2.0)));
} else {
tmp = sin((x * -0.5)) / ((0.09375 * pow(x, 2.0)) - 0.75);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if ((x <= (-0.0049d0)) .or. (.not. (x <= 0.0058d0))) then
tmp = 2.6666666666666665d0 / (sin(x) / (0.5d0 - (cos(-x) / 2.0d0)))
else
tmp = sin((x * (-0.5d0))) / ((0.09375d0 * (x ** 2.0d0)) - 0.75d0)
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if ((x <= -0.0049) || !(x <= 0.0058)) {
tmp = 2.6666666666666665 / (Math.sin(x) / (0.5 - (Math.cos(-x) / 2.0)));
} else {
tmp = Math.sin((x * -0.5)) / ((0.09375 * Math.pow(x, 2.0)) - 0.75);
}
return tmp;
}
def code(x): tmp = 0 if (x <= -0.0049) or not (x <= 0.0058): tmp = 2.6666666666666665 / (math.sin(x) / (0.5 - (math.cos(-x) / 2.0))) else: tmp = math.sin((x * -0.5)) / ((0.09375 * math.pow(x, 2.0)) - 0.75) return tmp
function code(x) tmp = 0.0 if ((x <= -0.0049) || !(x <= 0.0058)) tmp = Float64(2.6666666666666665 / Float64(sin(x) / Float64(0.5 - Float64(cos(Float64(-x)) / 2.0)))); else tmp = Float64(sin(Float64(x * -0.5)) / Float64(Float64(0.09375 * (x ^ 2.0)) - 0.75)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if ((x <= -0.0049) || ~((x <= 0.0058))) tmp = 2.6666666666666665 / (sin(x) / (0.5 - (cos(-x) / 2.0))); else tmp = sin((x * -0.5)) / ((0.09375 * (x ^ 2.0)) - 0.75); end tmp_2 = tmp; end
code[x_] := If[Or[LessEqual[x, -0.0049], N[Not[LessEqual[x, 0.0058]], $MachinePrecision]], N[(2.6666666666666665 / N[(N[Sin[x], $MachinePrecision] / N[(0.5 - N[(N[Cos[(-x)], $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision] / N[(N[(0.09375 * N[Power[x, 2.0], $MachinePrecision]), $MachinePrecision] - 0.75), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq -0.0049 \lor \neg \left(x \leq 0.0058\right):\\
\;\;\;\;\frac{2.6666666666666665}{\frac{\sin x}{0.5 - \frac{\cos \left(-x\right)}{2}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\sin \left(x \cdot -0.5\right)}{0.09375 \cdot {x}^{2} - 0.75}\\
\end{array}
\end{array}
if x < -0.0048999999999999998 or 0.0058 < x Initial program 98.9%
associate-/l*98.9%
associate-*r/99.0%
metadata-eval99.0%
associate-/l*99.0%
sqr-neg99.0%
sin-neg99.0%
distribute-lft-neg-out99.0%
sin-neg99.0%
distribute-lft-neg-out99.0%
associate-*r/99.1%
distribute-lft-neg-out99.1%
sin-neg99.1%
neg-mul-199.1%
*-commutative99.1%
associate-/l*99.1%
Simplified99.1%
*-commutative99.1%
associate-/r/99.0%
associate-*r/98.9%
associate-/l*98.9%
associate-/l/98.9%
pow298.9%
Applied egg-rr98.9%
unpow298.9%
sin-mult98.5%
Applied egg-rr98.5%
div-sub98.5%
+-inverses98.5%
cos-098.5%
metadata-eval98.5%
count-298.5%
*-commutative98.5%
associate-*r*98.5%
metadata-eval98.5%
neg-mul-198.5%
Simplified98.5%
if -0.0048999999999999998 < x < 0.0058Initial program 48.4%
associate-/l*99.6%
associate-*r/99.6%
metadata-eval99.6%
associate-/l*48.4%
sqr-neg48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
sin-neg48.4%
distribute-lft-neg-out48.4%
associate-*r/99.6%
distribute-lft-neg-out99.6%
sin-neg99.6%
neg-mul-199.6%
*-commutative99.6%
associate-/l*99.6%
Simplified99.6%
associate-*r*99.6%
*-commutative99.6%
associate-/r/99.5%
*-un-lft-identity99.5%
times-frac100.0%
metadata-eval100.0%
Applied egg-rr100.0%
Taylor expanded in x around 0 100.0%
Final simplification99.3%
(FPCore (x) :precision binary64 (* 1.3333333333333333 (sin (* x 0.5))))
double code(double x) {
return 1.3333333333333333 * sin((x * 0.5));
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.3333333333333333d0 * sin((x * 0.5d0))
end function
public static double code(double x) {
return 1.3333333333333333 * Math.sin((x * 0.5));
}
def code(x): return 1.3333333333333333 * math.sin((x * 0.5))
function code(x) return Float64(1.3333333333333333 * sin(Float64(x * 0.5))) end
function tmp = code(x) tmp = 1.3333333333333333 * sin((x * 0.5)); end
code[x_] := N[(1.3333333333333333 * N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
1.3333333333333333 \cdot \sin \left(x \cdot 0.5\right)
\end{array}
Initial program 71.9%
associate-/l*99.3%
*-lft-identity99.3%
metadata-eval99.3%
times-frac99.3%
neg-mul-199.3%
sin-neg99.3%
associate-/r*99.3%
associate-/r/99.3%
Simplified99.3%
Taylor expanded in x around 0 58.6%
Final simplification58.6%
(FPCore (x) :precision binary64 (/ (sin (* x -0.5)) -0.75))
double code(double x) {
return sin((x * -0.5)) / -0.75;
}
real(8) function code(x)
real(8), intent (in) :: x
code = sin((x * (-0.5d0))) / (-0.75d0)
end function
public static double code(double x) {
return Math.sin((x * -0.5)) / -0.75;
}
def code(x): return math.sin((x * -0.5)) / -0.75
function code(x) return Float64(sin(Float64(x * -0.5)) / -0.75) end
function tmp = code(x) tmp = sin((x * -0.5)) / -0.75; end
code[x_] := N[(N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision] / -0.75), $MachinePrecision]
\begin{array}{l}
\\
\frac{\sin \left(x \cdot -0.5\right)}{-0.75}
\end{array}
Initial program 71.9%
associate-/l*99.3%
associate-*r/99.3%
metadata-eval99.3%
associate-/l*71.9%
sqr-neg71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
associate-*r/99.3%
distribute-lft-neg-out99.3%
sin-neg99.3%
neg-mul-199.3%
*-commutative99.3%
associate-/l*99.3%
Simplified99.3%
associate-*r*99.3%
*-commutative99.3%
associate-/r/99.2%
*-un-lft-identity99.2%
times-frac99.5%
metadata-eval99.5%
Applied egg-rr99.5%
Taylor expanded in x around 0 58.8%
Final simplification58.8%
(FPCore (x) :precision binary64 (/ 1.0 (+ (* x -0.125) (* 1.5 (/ 1.0 x)))))
double code(double x) {
return 1.0 / ((x * -0.125) + (1.5 * (1.0 / x)));
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 / ((x * (-0.125d0)) + (1.5d0 * (1.0d0 / x)))
end function
public static double code(double x) {
return 1.0 / ((x * -0.125) + (1.5 * (1.0 / x)));
}
def code(x): return 1.0 / ((x * -0.125) + (1.5 * (1.0 / x)))
function code(x) return Float64(1.0 / Float64(Float64(x * -0.125) + Float64(1.5 * Float64(1.0 / x)))) end
function tmp = code(x) tmp = 1.0 / ((x * -0.125) + (1.5 * (1.0 / x))); end
code[x_] := N[(1.0 / N[(N[(x * -0.125), $MachinePrecision] + N[(1.5 * N[(1.0 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{x \cdot -0.125 + 1.5 \cdot \frac{1}{x}}
\end{array}
Initial program 71.9%
associate-/l*99.3%
associate-*r/99.3%
metadata-eval99.3%
associate-/l*71.9%
sqr-neg71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
associate-*r/99.3%
distribute-lft-neg-out99.3%
sin-neg99.3%
neg-mul-199.3%
*-commutative99.3%
associate-/l*99.3%
Simplified99.3%
Applied egg-rr71.7%
Taylor expanded in x around 0 55.2%
Final simplification55.2%
(FPCore (x) :precision binary64 (* x 0.6666666666666666))
double code(double x) {
return x * 0.6666666666666666;
}
real(8) function code(x)
real(8), intent (in) :: x
code = x * 0.6666666666666666d0
end function
public static double code(double x) {
return x * 0.6666666666666666;
}
def code(x): return x * 0.6666666666666666
function code(x) return Float64(x * 0.6666666666666666) end
function tmp = code(x) tmp = x * 0.6666666666666666; end
code[x_] := N[(x * 0.6666666666666666), $MachinePrecision]
\begin{array}{l}
\\
x \cdot 0.6666666666666666
\end{array}
Initial program 71.9%
associate-/l*99.3%
associate-*r/99.3%
metadata-eval99.3%
associate-/l*71.9%
sqr-neg71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
associate-*r/99.3%
distribute-lft-neg-out99.3%
sin-neg99.3%
neg-mul-199.3%
*-commutative99.3%
associate-/l*99.3%
Simplified99.3%
Taylor expanded in x around 0 54.6%
Final simplification54.6%
(FPCore (x) :precision binary64 (/ x 1.5))
double code(double x) {
return x / 1.5;
}
real(8) function code(x)
real(8), intent (in) :: x
code = x / 1.5d0
end function
public static double code(double x) {
return x / 1.5;
}
def code(x): return x / 1.5
function code(x) return Float64(x / 1.5) end
function tmp = code(x) tmp = x / 1.5; end
code[x_] := N[(x / 1.5), $MachinePrecision]
\begin{array}{l}
\\
\frac{x}{1.5}
\end{array}
Initial program 71.9%
associate-/l*99.3%
associate-*r/99.3%
metadata-eval99.3%
associate-/l*71.9%
sqr-neg71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
sin-neg71.9%
distribute-lft-neg-out71.9%
associate-*r/99.3%
distribute-lft-neg-out99.3%
sin-neg99.3%
neg-mul-199.3%
*-commutative99.3%
associate-/l*99.3%
Simplified99.3%
Taylor expanded in x around 0 54.6%
add-cube-cbrt53.6%
pow353.6%
*-commutative53.6%
Applied egg-rr53.6%
rem-cube-cbrt54.6%
metadata-eval54.6%
div-inv54.9%
Applied egg-rr54.9%
Final simplification54.9%
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x 0.5)))) (/ (/ (* 8.0 t_0) 3.0) (/ (sin x) t_0))))
double code(double x) {
double t_0 = sin((x * 0.5));
return ((8.0 * t_0) / 3.0) / (sin(x) / t_0);
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * 0.5d0))
code = ((8.0d0 * t_0) / 3.0d0) / (sin(x) / t_0)
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return ((8.0 * t_0) / 3.0) / (Math.sin(x) / t_0);
}
def code(x): t_0 = math.sin((x * 0.5)) return ((8.0 * t_0) / 3.0) / (math.sin(x) / t_0)
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(Float64(Float64(8.0 * t_0) / 3.0) / Float64(sin(x) / t_0)) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = ((8.0 * t_0) / 3.0) / (sin(x) / t_0); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(N[(N[(8.0 * t$95$0), $MachinePrecision] / 3.0), $MachinePrecision] / N[(N[Sin[x], $MachinePrecision] / t$95$0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot 0.5\right)\\
\frac{\frac{8 \cdot t_0}{3}}{\frac{\sin x}{t_0}}
\end{array}
\end{array}
herbie shell --seed 2023312
(FPCore (x)
:name "Graphics.Rasterific.Svg.PathConverter:segmentToBezier from rasterific-svg-0.2.3.1, A"
:precision binary64
:herbie-target
(/ (/ (* 8.0 (sin (* x 0.5))) 3.0) (/ (sin x) (sin (* x 0.5))))
(/ (* (* (/ 8.0 3.0) (sin (* x 0.5))) (sin (* x 0.5))) (sin x)))