
(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 14 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)))) (/ (* t_0 (/ t_0 (sin x))) 0.375)))
double code(double x) {
double t_0 = sin((x * 0.5));
return (t_0 * (t_0 / sin(x))) / 0.375;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * 0.5d0))
code = (t_0 * (t_0 / sin(x))) / 0.375d0
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return (t_0 * (t_0 / Math.sin(x))) / 0.375;
}
def code(x): t_0 = math.sin((x * 0.5)) return (t_0 * (t_0 / math.sin(x))) / 0.375
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(Float64(t_0 * Float64(t_0 / sin(x))) / 0.375) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = (t_0 * (t_0 / sin(x))) / 0.375; end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(N[(t$95$0 * N[(t$95$0 / N[Sin[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / 0.375), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot 0.5\right)\\
\frac{t\_0 \cdot \frac{t\_0}{\sin x}}{0.375}
\end{array}
\end{array}
Initial program 73.6%
associate-*l/99.2%
associate-/l*99.2%
remove-double-neg99.2%
sin-neg99.2%
distribute-lft-neg-out99.2%
neg-mul-199.2%
associate-/r*99.2%
associate-/l*99.2%
Simplified99.2%
Taylor expanded in x around inf 99.2%
add099.2%
Applied egg-rr99.2%
associate-*r/99.2%
associate-/l*99.2%
add099.2%
associate-/r/99.2%
*-commutative99.2%
Simplified99.2%
*-commutative99.2%
clear-num99.1%
un-div-inv99.1%
div-inv99.2%
metadata-eval99.2%
Applied egg-rr99.2%
associate-/r*99.2%
associate-*l/99.5%
Applied egg-rr99.5%
Final simplification99.5%
(FPCore (x) :precision binary64 (if (<= x 5e-37) (/ 1.0 (/ 1.5 x)) (* 2.6666666666666665 (/ (pow (sin (* x 0.5)) 2.0) (sin x)))))
double code(double x) {
double tmp;
if (x <= 5e-37) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = 2.6666666666666665 * (pow(sin((x * 0.5)), 2.0) / sin(x));
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 5d-37) then
tmp = 1.0d0 / (1.5d0 / x)
else
tmp = 2.6666666666666665d0 * ((sin((x * 0.5d0)) ** 2.0d0) / sin(x))
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 5e-37) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = 2.6666666666666665 * (Math.pow(Math.sin((x * 0.5)), 2.0) / Math.sin(x));
}
return tmp;
}
def code(x): tmp = 0 if x <= 5e-37: tmp = 1.0 / (1.5 / x) else: tmp = 2.6666666666666665 * (math.pow(math.sin((x * 0.5)), 2.0) / math.sin(x)) return tmp
function code(x) tmp = 0.0 if (x <= 5e-37) tmp = Float64(1.0 / Float64(1.5 / x)); else tmp = Float64(2.6666666666666665 * Float64((sin(Float64(x * 0.5)) ^ 2.0) / sin(x))); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 5e-37) tmp = 1.0 / (1.5 / x); else tmp = 2.6666666666666665 * ((sin((x * 0.5)) ^ 2.0) / sin(x)); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 5e-37], N[(1.0 / N[(1.5 / x), $MachinePrecision]), $MachinePrecision], N[(2.6666666666666665 * N[(N[Power[N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision], 2.0], $MachinePrecision] / N[Sin[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 5 \cdot 10^{-37}:\\
\;\;\;\;\frac{1}{\frac{1.5}{x}}\\
\mathbf{else}:\\
\;\;\;\;2.6666666666666665 \cdot \frac{{\sin \left(x \cdot 0.5\right)}^{2}}{\sin x}\\
\end{array}
\end{array}
if x < 4.9999999999999997e-37Initial program 63.8%
associate-*r/99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around inf 63.8%
*-commutative63.8%
pow263.8%
sin-mult40.1%
*-commutative40.1%
*-commutative40.1%
*-commutative40.1%
*-commutative40.1%
Applied egg-rr40.1%
div-sub40.1%
+-inverses40.1%
cos-040.1%
metadata-eval40.1%
distribute-rgt-out40.1%
metadata-eval40.1%
*-rgt-identity40.1%
Simplified40.1%
associate-*r/40.1%
clear-num40.0%
sub-neg40.0%
distribute-lft-in40.0%
metadata-eval40.0%
div-inv40.0%
metadata-eval40.0%
distribute-rgt-neg-in40.0%
metadata-eval40.0%
Applied egg-rr40.0%
Taylor expanded in x around 0 64.3%
if 4.9999999999999997e-37 < x Initial program 99.0%
associate-*r/99.1%
metadata-eval99.1%
Simplified99.1%
Taylor expanded in x around inf 99.2%
Final simplification74.0%
(FPCore (x) :precision binary64 (if (<= x 1e-27) (/ 1.0 (/ 1.5 x)) (* (/ 2.6666666666666665 (sin x)) (pow (sin (* x -0.5)) 2.0))))
double code(double x) {
double tmp;
if (x <= 1e-27) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = (2.6666666666666665 / sin(x)) * pow(sin((x * -0.5)), 2.0);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 1d-27) then
tmp = 1.0d0 / (1.5d0 / x)
else
tmp = (2.6666666666666665d0 / sin(x)) * (sin((x * (-0.5d0))) ** 2.0d0)
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 1e-27) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = (2.6666666666666665 / Math.sin(x)) * Math.pow(Math.sin((x * -0.5)), 2.0);
}
return tmp;
}
def code(x): tmp = 0 if x <= 1e-27: tmp = 1.0 / (1.5 / x) else: tmp = (2.6666666666666665 / math.sin(x)) * math.pow(math.sin((x * -0.5)), 2.0) return tmp
function code(x) tmp = 0.0 if (x <= 1e-27) tmp = Float64(1.0 / Float64(1.5 / x)); else tmp = Float64(Float64(2.6666666666666665 / sin(x)) * (sin(Float64(x * -0.5)) ^ 2.0)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 1e-27) tmp = 1.0 / (1.5 / x); else tmp = (2.6666666666666665 / sin(x)) * (sin((x * -0.5)) ^ 2.0); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 1e-27], N[(1.0 / N[(1.5 / x), $MachinePrecision]), $MachinePrecision], N[(N[(2.6666666666666665 / N[Sin[x], $MachinePrecision]), $MachinePrecision] * N[Power[N[Sin[N[(x * -0.5), $MachinePrecision]], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 10^{-27}:\\
\;\;\;\;\frac{1}{\frac{1.5}{x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{2.6666666666666665}{\sin x} \cdot {\sin \left(x \cdot -0.5\right)}^{2}\\
\end{array}
\end{array}
if x < 1e-27Initial program 63.8%
associate-*r/99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around inf 63.8%
*-commutative63.8%
pow263.8%
sin-mult40.1%
*-commutative40.1%
*-commutative40.1%
*-commutative40.1%
*-commutative40.1%
Applied egg-rr40.1%
div-sub40.1%
+-inverses40.1%
cos-040.1%
metadata-eval40.1%
distribute-rgt-out40.1%
metadata-eval40.1%
*-rgt-identity40.1%
Simplified40.1%
associate-*r/40.1%
clear-num40.0%
sub-neg40.0%
distribute-lft-in40.0%
metadata-eval40.0%
div-inv40.0%
metadata-eval40.0%
distribute-rgt-neg-in40.0%
metadata-eval40.0%
Applied egg-rr40.0%
Taylor expanded in x around 0 64.3%
if 1e-27 < x Initial program 99.0%
associate-/l*99.2%
*-lft-identity99.2%
metadata-eval99.2%
associate-/l/99.2%
associate-/r/99.1%
associate-/l*98.9%
associate-/r*98.9%
neg-mul-198.9%
sin-neg98.9%
distribute-lft-neg-out98.9%
associate-/r/99.1%
Simplified99.2%
Taylor expanded in x around inf 99.2%
Final simplification74.0%
(FPCore (x) :precision binary64 (if (<= x 2e-154) (/ 1.0 (/ 1.5 x)) (/ (/ (pow (sin (* x 0.5)) 2.0) (sin x)) 0.375)))
double code(double x) {
double tmp;
if (x <= 2e-154) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = (pow(sin((x * 0.5)), 2.0) / sin(x)) / 0.375;
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 2d-154) then
tmp = 1.0d0 / (1.5d0 / x)
else
tmp = ((sin((x * 0.5d0)) ** 2.0d0) / sin(x)) / 0.375d0
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 2e-154) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = (Math.pow(Math.sin((x * 0.5)), 2.0) / Math.sin(x)) / 0.375;
}
return tmp;
}
def code(x): tmp = 0 if x <= 2e-154: tmp = 1.0 / (1.5 / x) else: tmp = (math.pow(math.sin((x * 0.5)), 2.0) / math.sin(x)) / 0.375 return tmp
function code(x) tmp = 0.0 if (x <= 2e-154) tmp = Float64(1.0 / Float64(1.5 / x)); else tmp = Float64(Float64((sin(Float64(x * 0.5)) ^ 2.0) / sin(x)) / 0.375); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 2e-154) tmp = 1.0 / (1.5 / x); else tmp = ((sin((x * 0.5)) ^ 2.0) / sin(x)) / 0.375; end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 2e-154], N[(1.0 / N[(1.5 / x), $MachinePrecision]), $MachinePrecision], N[(N[(N[Power[N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision], 2.0], $MachinePrecision] / N[Sin[x], $MachinePrecision]), $MachinePrecision] / 0.375), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 2 \cdot 10^{-154}:\\
\;\;\;\;\frac{1}{\frac{1.5}{x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{{\sin \left(x \cdot 0.5\right)}^{2}}{\sin x}}{0.375}\\
\end{array}
\end{array}
if x < 1.9999999999999999e-154Initial program 59.1%
associate-*r/99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around inf 59.0%
*-commutative59.0%
pow259.0%
sin-mult45.0%
*-commutative45.0%
*-commutative45.0%
*-commutative45.0%
*-commutative45.0%
Applied egg-rr45.0%
div-sub45.0%
+-inverses45.0%
cos-045.0%
metadata-eval45.0%
distribute-rgt-out45.0%
metadata-eval45.0%
*-rgt-identity45.0%
Simplified45.0%
associate-*r/45.0%
clear-num44.9%
sub-neg44.9%
distribute-lft-in44.9%
metadata-eval44.9%
div-inv44.9%
metadata-eval44.9%
distribute-rgt-neg-in44.9%
metadata-eval44.9%
Applied egg-rr44.9%
Taylor expanded in x around 0 59.5%
if 1.9999999999999999e-154 < x Initial program 99.0%
associate-*l/99.2%
associate-/l*99.1%
remove-double-neg99.1%
sin-neg99.1%
distribute-lft-neg-out99.1%
neg-mul-199.1%
associate-/r*99.1%
associate-/l*99.2%
Simplified99.2%
Taylor expanded in x around inf 99.2%
add099.2%
Applied egg-rr99.2%
associate-*r/99.2%
associate-/l*99.1%
add099.1%
associate-/r/99.2%
*-commutative99.2%
Simplified99.2%
*-commutative99.2%
clear-num99.1%
un-div-inv99.1%
div-inv99.2%
metadata-eval99.2%
Applied egg-rr99.2%
associate-*l/99.4%
associate-/r*99.4%
pow299.4%
Applied egg-rr99.4%
Final simplification74.0%
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x 0.5)))) (* (/ t_0 (sin x)) (* t_0 2.6666666666666665))))
double code(double x) {
double t_0 = sin((x * 0.5));
return (t_0 / sin(x)) * (t_0 * 2.6666666666666665);
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * 0.5d0))
code = (t_0 / sin(x)) * (t_0 * 2.6666666666666665d0)
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return (t_0 / Math.sin(x)) * (t_0 * 2.6666666666666665);
}
def code(x): t_0 = math.sin((x * 0.5)) return (t_0 / math.sin(x)) * (t_0 * 2.6666666666666665)
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(Float64(t_0 / sin(x)) * Float64(t_0 * 2.6666666666666665)) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = (t_0 / sin(x)) * (t_0 * 2.6666666666666665); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(N[(t$95$0 / N[Sin[x], $MachinePrecision]), $MachinePrecision] * N[(t$95$0 * 2.6666666666666665), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot 0.5\right)\\
\frac{t\_0}{\sin x} \cdot \left(t\_0 \cdot 2.6666666666666665\right)
\end{array}
\end{array}
Initial program 73.6%
associate-*r/99.2%
metadata-eval99.2%
Simplified99.2%
Final simplification99.2%
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x 0.5)))) (* t_0 (* (/ t_0 (sin x)) 2.6666666666666665))))
double code(double x) {
double t_0 = sin((x * 0.5));
return t_0 * ((t_0 / sin(x)) * 2.6666666666666665);
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: t_0
t_0 = sin((x * 0.5d0))
code = t_0 * ((t_0 / sin(x)) * 2.6666666666666665d0)
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return t_0 * ((t_0 / Math.sin(x)) * 2.6666666666666665);
}
def code(x): t_0 = math.sin((x * 0.5)) return t_0 * ((t_0 / math.sin(x)) * 2.6666666666666665)
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(t_0 * Float64(Float64(t_0 / sin(x)) * 2.6666666666666665)) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = t_0 * ((t_0 / sin(x)) * 2.6666666666666665); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(t$95$0 * N[(N[(t$95$0 / N[Sin[x], $MachinePrecision]), $MachinePrecision] * 2.6666666666666665), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \sin \left(x \cdot 0.5\right)\\
t\_0 \cdot \left(\frac{t\_0}{\sin x} \cdot 2.6666666666666665\right)
\end{array}
\end{array}
Initial program 73.6%
associate-*l/99.2%
associate-/l*99.2%
remove-double-neg99.2%
sin-neg99.2%
distribute-lft-neg-out99.2%
neg-mul-199.2%
associate-/r*99.2%
associate-/l*99.2%
Simplified99.2%
Taylor expanded in x around inf 99.2%
Final simplification99.2%
(FPCore (x) :precision binary64 (if (<= x 0.00018) (/ 1.0 (/ 1.5 x)) (* 2.6666666666666665 (/ (- 0.5 (/ (cos x) 2.0)) (sin x)))))
double code(double x) {
double tmp;
if (x <= 0.00018) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = 2.6666666666666665 * ((0.5 - (cos(x) / 2.0)) / sin(x));
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 0.00018d0) then
tmp = 1.0d0 / (1.5d0 / x)
else
tmp = 2.6666666666666665d0 * ((0.5d0 - (cos(x) / 2.0d0)) / sin(x))
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 0.00018) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = 2.6666666666666665 * ((0.5 - (Math.cos(x) / 2.0)) / Math.sin(x));
}
return tmp;
}
def code(x): tmp = 0 if x <= 0.00018: tmp = 1.0 / (1.5 / x) else: tmp = 2.6666666666666665 * ((0.5 - (math.cos(x) / 2.0)) / math.sin(x)) return tmp
function code(x) tmp = 0.0 if (x <= 0.00018) tmp = Float64(1.0 / Float64(1.5 / x)); else tmp = Float64(2.6666666666666665 * Float64(Float64(0.5 - Float64(cos(x) / 2.0)) / sin(x))); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 0.00018) tmp = 1.0 / (1.5 / x); else tmp = 2.6666666666666665 * ((0.5 - (cos(x) / 2.0)) / sin(x)); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 0.00018], N[(1.0 / N[(1.5 / x), $MachinePrecision]), $MachinePrecision], N[(2.6666666666666665 * N[(N[(0.5 - N[(N[Cos[x], $MachinePrecision] / 2.0), $MachinePrecision]), $MachinePrecision] / N[Sin[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 0.00018:\\
\;\;\;\;\frac{1}{\frac{1.5}{x}}\\
\mathbf{else}:\\
\;\;\;\;2.6666666666666665 \cdot \frac{0.5 - \frac{\cos x}{2}}{\sin x}\\
\end{array}
\end{array}
if x < 1.80000000000000011e-4Initial program 64.6%
associate-*r/99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around inf 64.6%
*-commutative64.6%
pow264.6%
sin-mult39.4%
*-commutative39.4%
*-commutative39.4%
*-commutative39.4%
*-commutative39.4%
Applied egg-rr39.4%
div-sub39.4%
+-inverses39.4%
cos-039.4%
metadata-eval39.4%
distribute-rgt-out39.4%
metadata-eval39.4%
*-rgt-identity39.4%
Simplified39.4%
associate-*r/39.4%
clear-num39.4%
sub-neg39.4%
distribute-lft-in39.4%
metadata-eval39.4%
div-inv39.4%
metadata-eval39.4%
distribute-rgt-neg-in39.4%
metadata-eval39.4%
Applied egg-rr39.4%
Taylor expanded in x around 0 65.1%
if 1.80000000000000011e-4 < x Initial program 98.9%
associate-*r/99.0%
metadata-eval99.0%
Simplified99.0%
Taylor expanded in x around inf 99.1%
*-commutative99.1%
pow299.1%
sin-mult98.1%
*-commutative98.1%
*-commutative98.1%
*-commutative98.1%
*-commutative98.1%
Applied egg-rr98.1%
div-sub98.1%
+-inverses98.1%
cos-098.1%
metadata-eval98.1%
distribute-rgt-out98.1%
metadata-eval98.1%
*-rgt-identity98.1%
Simplified98.1%
Final simplification73.7%
(FPCore (x) :precision binary64 (if (<= x 0.00018) (/ 1.0 (/ 1.5 x)) (/ 2.6666666666666665 (/ (sin x) (+ 0.5 (* -0.5 (cos x)))))))
double code(double x) {
double tmp;
if (x <= 0.00018) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = 2.6666666666666665 / (sin(x) / (0.5 + (-0.5 * cos(x))));
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 0.00018d0) then
tmp = 1.0d0 / (1.5d0 / x)
else
tmp = 2.6666666666666665d0 / (sin(x) / (0.5d0 + ((-0.5d0) * cos(x))))
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 0.00018) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = 2.6666666666666665 / (Math.sin(x) / (0.5 + (-0.5 * Math.cos(x))));
}
return tmp;
}
def code(x): tmp = 0 if x <= 0.00018: tmp = 1.0 / (1.5 / x) else: tmp = 2.6666666666666665 / (math.sin(x) / (0.5 + (-0.5 * math.cos(x)))) return tmp
function code(x) tmp = 0.0 if (x <= 0.00018) tmp = Float64(1.0 / Float64(1.5 / x)); else tmp = Float64(2.6666666666666665 / Float64(sin(x) / Float64(0.5 + Float64(-0.5 * cos(x))))); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 0.00018) tmp = 1.0 / (1.5 / x); else tmp = 2.6666666666666665 / (sin(x) / (0.5 + (-0.5 * cos(x)))); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 0.00018], N[(1.0 / N[(1.5 / x), $MachinePrecision]), $MachinePrecision], N[(2.6666666666666665 / N[(N[Sin[x], $MachinePrecision] / N[(0.5 + N[(-0.5 * N[Cos[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 0.00018:\\
\;\;\;\;\frac{1}{\frac{1.5}{x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{2.6666666666666665}{\frac{\sin x}{0.5 + -0.5 \cdot \cos x}}\\
\end{array}
\end{array}
if x < 1.80000000000000011e-4Initial program 64.6%
associate-*r/99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around inf 64.6%
*-commutative64.6%
pow264.6%
sin-mult39.4%
*-commutative39.4%
*-commutative39.4%
*-commutative39.4%
*-commutative39.4%
Applied egg-rr39.4%
div-sub39.4%
+-inverses39.4%
cos-039.4%
metadata-eval39.4%
distribute-rgt-out39.4%
metadata-eval39.4%
*-rgt-identity39.4%
Simplified39.4%
associate-*r/39.4%
clear-num39.4%
sub-neg39.4%
distribute-lft-in39.4%
metadata-eval39.4%
div-inv39.4%
metadata-eval39.4%
distribute-rgt-neg-in39.4%
metadata-eval39.4%
Applied egg-rr39.4%
Taylor expanded in x around 0 65.1%
if 1.80000000000000011e-4 < x Initial program 98.9%
associate-*r/99.0%
metadata-eval99.0%
Simplified99.0%
Taylor expanded in x around inf 99.1%
*-commutative99.1%
pow299.1%
sin-mult98.1%
*-commutative98.1%
*-commutative98.1%
*-commutative98.1%
*-commutative98.1%
Applied egg-rr98.1%
div-sub98.1%
+-inverses98.1%
cos-098.1%
metadata-eval98.1%
distribute-rgt-out98.1%
metadata-eval98.1%
*-rgt-identity98.1%
Simplified98.1%
clear-num98.1%
un-div-inv98.2%
sub-neg98.2%
div-inv98.2%
metadata-eval98.2%
distribute-rgt-neg-in98.2%
metadata-eval98.2%
Applied egg-rr98.2%
Final simplification73.7%
(FPCore (x) :precision binary64 (if (<= x 0.00022) (/ 1.0 (/ 1.5 x)) (/ (+ 1.3333333333333333 (* (cos x) -1.3333333333333333)) (sin x))))
double code(double x) {
double tmp;
if (x <= 0.00022) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = (1.3333333333333333 + (cos(x) * -1.3333333333333333)) / sin(x);
}
return tmp;
}
real(8) function code(x)
real(8), intent (in) :: x
real(8) :: tmp
if (x <= 0.00022d0) then
tmp = 1.0d0 / (1.5d0 / x)
else
tmp = (1.3333333333333333d0 + (cos(x) * (-1.3333333333333333d0))) / sin(x)
end if
code = tmp
end function
public static double code(double x) {
double tmp;
if (x <= 0.00022) {
tmp = 1.0 / (1.5 / x);
} else {
tmp = (1.3333333333333333 + (Math.cos(x) * -1.3333333333333333)) / Math.sin(x);
}
return tmp;
}
def code(x): tmp = 0 if x <= 0.00022: tmp = 1.0 / (1.5 / x) else: tmp = (1.3333333333333333 + (math.cos(x) * -1.3333333333333333)) / math.sin(x) return tmp
function code(x) tmp = 0.0 if (x <= 0.00022) tmp = Float64(1.0 / Float64(1.5 / x)); else tmp = Float64(Float64(1.3333333333333333 + Float64(cos(x) * -1.3333333333333333)) / sin(x)); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 0.00022) tmp = 1.0 / (1.5 / x); else tmp = (1.3333333333333333 + (cos(x) * -1.3333333333333333)) / sin(x); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 0.00022], N[(1.0 / N[(1.5 / x), $MachinePrecision]), $MachinePrecision], N[(N[(1.3333333333333333 + N[(N[Cos[x], $MachinePrecision] * -1.3333333333333333), $MachinePrecision]), $MachinePrecision] / N[Sin[x], $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 0.00022:\\
\;\;\;\;\frac{1}{\frac{1.5}{x}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1.3333333333333333 + \cos x \cdot -1.3333333333333333}{\sin x}\\
\end{array}
\end{array}
if x < 2.20000000000000008e-4Initial program 64.6%
associate-*r/99.3%
metadata-eval99.3%
Simplified99.3%
Taylor expanded in x around inf 64.6%
*-commutative64.6%
pow264.6%
sin-mult39.4%
*-commutative39.4%
*-commutative39.4%
*-commutative39.4%
*-commutative39.4%
Applied egg-rr39.4%
div-sub39.4%
+-inverses39.4%
cos-039.4%
metadata-eval39.4%
distribute-rgt-out39.4%
metadata-eval39.4%
*-rgt-identity39.4%
Simplified39.4%
associate-*r/39.4%
clear-num39.4%
sub-neg39.4%
distribute-lft-in39.4%
metadata-eval39.4%
div-inv39.4%
metadata-eval39.4%
distribute-rgt-neg-in39.4%
metadata-eval39.4%
Applied egg-rr39.4%
Taylor expanded in x around 0 65.1%
if 2.20000000000000008e-4 < x Initial program 98.9%
associate-*r/99.0%
metadata-eval99.0%
Simplified99.0%
Taylor expanded in x around inf 99.1%
*-commutative99.1%
pow299.1%
sin-mult98.1%
*-commutative98.1%
*-commutative98.1%
*-commutative98.1%
*-commutative98.1%
Applied egg-rr98.1%
div-sub98.1%
+-inverses98.1%
cos-098.1%
metadata-eval98.1%
distribute-rgt-out98.1%
metadata-eval98.1%
*-rgt-identity98.1%
Simplified98.1%
associate-*r/97.9%
clear-num97.9%
sub-neg97.9%
distribute-lft-in97.7%
metadata-eval97.7%
div-inv97.7%
metadata-eval97.7%
distribute-rgt-neg-in97.7%
metadata-eval97.7%
Applied egg-rr97.7%
Taylor expanded in x around inf 97.7%
*-commutative97.7%
Simplified97.7%
Final simplification73.6%
(FPCore (x) :precision binary64 (* (sin (* x 0.5)) 1.3333333333333333))
double code(double x) {
return sin((x * 0.5)) * 1.3333333333333333;
}
real(8) function code(x)
real(8), intent (in) :: x
code = sin((x * 0.5d0)) * 1.3333333333333333d0
end function
public static double code(double x) {
return Math.sin((x * 0.5)) * 1.3333333333333333;
}
def code(x): return math.sin((x * 0.5)) * 1.3333333333333333
function code(x) return Float64(sin(Float64(x * 0.5)) * 1.3333333333333333) end
function tmp = code(x) tmp = sin((x * 0.5)) * 1.3333333333333333; end
code[x_] := N[(N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision] * 1.3333333333333333), $MachinePrecision]
\begin{array}{l}
\\
\sin \left(x \cdot 0.5\right) \cdot 1.3333333333333333
\end{array}
Initial program 73.6%
associate-*l/99.2%
associate-/l*99.2%
remove-double-neg99.2%
sin-neg99.2%
distribute-lft-neg-out99.2%
neg-mul-199.2%
associate-/r*99.2%
associate-/l*99.2%
Simplified99.2%
Taylor expanded in x around 0 53.5%
Final simplification53.5%
(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 73.6%
associate-*r/99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around inf 73.6%
*-commutative73.6%
pow273.6%
sin-mult54.8%
*-commutative54.8%
*-commutative54.8%
*-commutative54.8%
*-commutative54.8%
Applied egg-rr54.8%
div-sub54.8%
+-inverses54.8%
cos-054.8%
metadata-eval54.8%
distribute-rgt-out54.8%
metadata-eval54.8%
*-rgt-identity54.8%
Simplified54.8%
associate-*r/54.7%
clear-num54.7%
sub-neg54.7%
distribute-lft-in54.6%
metadata-eval54.6%
div-inv54.6%
metadata-eval54.6%
distribute-rgt-neg-in54.6%
metadata-eval54.6%
Applied egg-rr54.6%
Taylor expanded in x around 0 49.2%
Final simplification49.2%
(FPCore (x) :precision binary64 (/ 1.0 (/ 1.5 x)))
double code(double x) {
return 1.0 / (1.5 / x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = 1.0d0 / (1.5d0 / x)
end function
public static double code(double x) {
return 1.0 / (1.5 / x);
}
def code(x): return 1.0 / (1.5 / x)
function code(x) return Float64(1.0 / Float64(1.5 / x)) end
function tmp = code(x) tmp = 1.0 / (1.5 / x); end
code[x_] := N[(1.0 / N[(1.5 / x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\frac{1.5}{x}}
\end{array}
Initial program 73.6%
associate-*r/99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around inf 73.6%
*-commutative73.6%
pow273.6%
sin-mult54.8%
*-commutative54.8%
*-commutative54.8%
*-commutative54.8%
*-commutative54.8%
Applied egg-rr54.8%
div-sub54.8%
+-inverses54.8%
cos-054.8%
metadata-eval54.8%
distribute-rgt-out54.8%
metadata-eval54.8%
*-rgt-identity54.8%
Simplified54.8%
associate-*r/54.7%
clear-num54.7%
sub-neg54.7%
distribute-lft-in54.6%
metadata-eval54.6%
div-inv54.6%
metadata-eval54.6%
distribute-rgt-neg-in54.6%
metadata-eval54.6%
Applied egg-rr54.6%
Taylor expanded in x around 0 48.8%
Final simplification48.8%
(FPCore (x) :precision binary64 (* x -7.111111111111111))
double code(double x) {
return x * -7.111111111111111;
}
real(8) function code(x)
real(8), intent (in) :: x
code = x * (-7.111111111111111d0)
end function
public static double code(double x) {
return x * -7.111111111111111;
}
def code(x): return x * -7.111111111111111
function code(x) return Float64(x * -7.111111111111111) end
function tmp = code(x) tmp = x * -7.111111111111111; end
code[x_] := N[(x * -7.111111111111111), $MachinePrecision]
\begin{array}{l}
\\
x \cdot -7.111111111111111
\end{array}
Initial program 73.6%
associate-/l*99.2%
associate-*r/99.2%
metadata-eval99.2%
associate-/l*73.6%
Simplified73.6%
Taylor expanded in x around 0 48.8%
Simplified3.7%
Taylor expanded in x around 0 3.7%
*-commutative3.7%
Simplified3.7%
Final simplification3.7%
(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 73.6%
associate-*r/99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around 0 48.8%
Simplified48.8%
Final simplification48.8%
(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 2024034
(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)))