
(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 -0.375) (/ t_0 (- (sin x))))))
double code(double x) {
double t_0 = sin((x * 0.5));
return (t_0 / -0.375) * (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 = (t_0 / (-0.375d0)) * (t_0 / -sin(x))
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return (t_0 / -0.375) * (t_0 / -Math.sin(x));
}
def code(x): t_0 = math.sin((x * 0.5)) return (t_0 / -0.375) * (t_0 / -math.sin(x))
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(Float64(t_0 / -0.375) * Float64(t_0 / Float64(-sin(x)))) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = (t_0 / -0.375) * (t_0 / -sin(x)); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(N[(t$95$0 / -0.375), $MachinePrecision] * N[(t$95$0 / (-N[Sin[x], $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{t\_0}{-\sin x}
\end{array}
\end{array}
Initial program 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
associate-*r*99.2%
*-commutative99.2%
div-inv99.1%
associate-*l*99.1%
associate-/r/99.1%
un-div-inv99.2%
*-un-lft-identity99.2%
times-frac99.5%
metadata-eval99.5%
Applied egg-rr99.5%
clear-num99.5%
un-div-inv99.5%
Applied egg-rr99.5%
frac-2neg99.5%
associate-/r/99.6%
metadata-eval99.6%
distribute-neg-frac299.6%
Applied egg-rr99.6%
(FPCore (x) :precision binary64 (if (<= x 2.1e-163) (/ (* x 0.25) 0.375) (/ (/ (pow (sin (* x 0.5)) 2.0) (sin x)) 0.375)))
double code(double x) {
double tmp;
if (x <= 2.1e-163) {
tmp = (x * 0.25) / 0.375;
} 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 <= 2.1d-163) then
tmp = (x * 0.25d0) / 0.375d0
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 <= 2.1e-163) {
tmp = (x * 0.25) / 0.375;
} 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 <= 2.1e-163: tmp = (x * 0.25) / 0.375 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 <= 2.1e-163) tmp = Float64(Float64(x * 0.25) / 0.375); 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 <= 2.1e-163) tmp = (x * 0.25) / 0.375; else tmp = ((sin((x * 0.5)) ^ 2.0) / sin(x)) / 0.375; end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 2.1e-163], N[(N[(x * 0.25), $MachinePrecision] / 0.375), $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.1 \cdot 10^{-163}:\\
\;\;\;\;\frac{x \cdot 0.25}{0.375}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{{\sin \left(x \cdot 0.5\right)}^{2}}{\sin x}}{0.375}\\
\end{array}
\end{array}
if x < 2.09999999999999998e-163Initial program 59.3%
associate-/l*99.4%
associate-*l*99.3%
metadata-eval99.3%
Simplified99.3%
clear-num99.2%
un-div-inv99.3%
Applied egg-rr99.3%
metadata-eval99.3%
times-frac99.6%
*-un-lft-identity99.6%
*-commutative99.6%
associate-/r*99.6%
associate-/r/99.7%
associate-*l/59.5%
unpow259.5%
Applied egg-rr59.5%
Taylor expanded in x around 0 64.7%
*-commutative64.7%
Simplified64.7%
if 2.09999999999999998e-163 < x Initial program 97.8%
associate-/l*99.1%
associate-*l*99.1%
metadata-eval99.1%
Simplified99.1%
clear-num99.2%
un-div-inv99.1%
Applied egg-rr99.1%
metadata-eval99.1%
times-frac99.4%
*-un-lft-identity99.4%
*-commutative99.4%
associate-/r*99.3%
associate-/r/99.3%
associate-*l/98.1%
unpow298.1%
Applied egg-rr98.1%
(FPCore (x) :precision binary64 (if (<= x 2.1e-163) (/ (* x 0.25) 0.375) (* 2.6666666666666665 (/ (pow (sin (* x 0.5)) 2.0) (sin x)))))
double code(double x) {
double tmp;
if (x <= 2.1e-163) {
tmp = (x * 0.25) / 0.375;
} 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 <= 2.1d-163) then
tmp = (x * 0.25d0) / 0.375d0
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 <= 2.1e-163) {
tmp = (x * 0.25) / 0.375;
} 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 <= 2.1e-163: tmp = (x * 0.25) / 0.375 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 <= 2.1e-163) tmp = Float64(Float64(x * 0.25) / 0.375); 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 <= 2.1e-163) tmp = (x * 0.25) / 0.375; else tmp = 2.6666666666666665 * ((sin((x * 0.5)) ^ 2.0) / sin(x)); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 2.1e-163], N[(N[(x * 0.25), $MachinePrecision] / 0.375), $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 2.1 \cdot 10^{-163}:\\
\;\;\;\;\frac{x \cdot 0.25}{0.375}\\
\mathbf{else}:\\
\;\;\;\;2.6666666666666665 \cdot \frac{{\sin \left(x \cdot 0.5\right)}^{2}}{\sin x}\\
\end{array}
\end{array}
if x < 2.09999999999999998e-163Initial program 59.3%
associate-/l*99.4%
associate-*l*99.3%
metadata-eval99.3%
Simplified99.3%
clear-num99.2%
un-div-inv99.3%
Applied egg-rr99.3%
metadata-eval99.3%
times-frac99.6%
*-un-lft-identity99.6%
*-commutative99.6%
associate-/r*99.6%
associate-/r/99.7%
associate-*l/59.5%
unpow259.5%
Applied egg-rr59.5%
Taylor expanded in x around 0 64.7%
*-commutative64.7%
Simplified64.7%
if 2.09999999999999998e-163 < x Initial program 97.8%
metadata-eval97.8%
associate-*r/99.1%
associate-*r*99.1%
*-commutative99.1%
associate-*r/97.9%
pow297.9%
Applied egg-rr97.9%
Final simplification78.3%
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x 0.5)))) (/ t_0 (/ 0.375 (/ t_0 (sin x))))))
double code(double x) {
double t_0 = sin((x * 0.5));
return t_0 / (0.375 / (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 = t_0 / (0.375d0 / (t_0 / sin(x)))
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return t_0 / (0.375 / (t_0 / Math.sin(x)));
}
def code(x): t_0 = math.sin((x * 0.5)) return t_0 / (0.375 / (t_0 / math.sin(x)))
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(t_0 / Float64(0.375 / Float64(t_0 / sin(x)))) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = t_0 / (0.375 / (t_0 / sin(x))); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(t$95$0 / N[(0.375 / 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)\\
\frac{t\_0}{\frac{0.375}{\frac{t\_0}{\sin x}}}
\end{array}
\end{array}
Initial program 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
associate-*r*99.2%
*-commutative99.2%
div-inv99.1%
associate-*l*99.1%
associate-/r/99.1%
un-div-inv99.2%
*-un-lft-identity99.2%
times-frac99.5%
metadata-eval99.5%
Applied egg-rr99.5%
clear-num99.5%
un-div-inv99.5%
Applied egg-rr99.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 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
associate-*r*99.2%
*-commutative99.2%
div-inv99.1%
associate-*l*99.1%
associate-/r/99.1%
un-div-inv99.2%
*-un-lft-identity99.2%
times-frac99.5%
metadata-eval99.5%
Applied egg-rr99.5%
(FPCore (x) :precision binary64 (let* ((t_0 (sin (* x 0.5)))) (* 2.6666666666666665 (/ t_0 (/ (sin x) t_0)))))
double code(double x) {
double t_0 = sin((x * 0.5));
return 2.6666666666666665 * (t_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 = 2.6666666666666665d0 * (t_0 / (sin(x) / t_0))
end function
public static double code(double x) {
double t_0 = Math.sin((x * 0.5));
return 2.6666666666666665 * (t_0 / (Math.sin(x) / t_0));
}
def code(x): t_0 = math.sin((x * 0.5)) return 2.6666666666666665 * (t_0 / (math.sin(x) / t_0))
function code(x) t_0 = sin(Float64(x * 0.5)) return Float64(2.6666666666666665 * Float64(t_0 / Float64(sin(x) / t_0))) end
function tmp = code(x) t_0 = sin((x * 0.5)); tmp = 2.6666666666666665 * (t_0 / (sin(x) / t_0)); end
code[x_] := Block[{t$95$0 = N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision]}, N[(2.6666666666666665 * N[(t$95$0 / 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)\\
2.6666666666666665 \cdot \frac{t\_0}{\frac{\sin x}{t\_0}}
\end{array}
\end{array}
Initial program 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
clear-num99.2%
un-div-inv99.3%
Applied egg-rr99.3%
(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 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
(FPCore (x) :precision binary64 (if (<= x 2.85e-7) (/ (* x 0.25) 0.375) (* (/ 2.6666666666666665 (sin x)) (- 0.5 (* 0.5 (cos x))))))
double code(double x) {
double tmp;
if (x <= 2.85e-7) {
tmp = (x * 0.25) / 0.375;
} 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 <= 2.85d-7) then
tmp = (x * 0.25d0) / 0.375d0
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 <= 2.85e-7) {
tmp = (x * 0.25) / 0.375;
} else {
tmp = (2.6666666666666665 / Math.sin(x)) * (0.5 - (0.5 * Math.cos(x)));
}
return tmp;
}
def code(x): tmp = 0 if x <= 2.85e-7: tmp = (x * 0.25) / 0.375 else: tmp = (2.6666666666666665 / math.sin(x)) * (0.5 - (0.5 * math.cos(x))) return tmp
function code(x) tmp = 0.0 if (x <= 2.85e-7) tmp = Float64(Float64(x * 0.25) / 0.375); else tmp = Float64(Float64(2.6666666666666665 / sin(x)) * Float64(0.5 - Float64(0.5 * cos(x)))); end return tmp end
function tmp_2 = code(x) tmp = 0.0; if (x <= 2.85e-7) tmp = (x * 0.25) / 0.375; else tmp = (2.6666666666666665 / sin(x)) * (0.5 - (0.5 * cos(x))); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 2.85e-7], N[(N[(x * 0.25), $MachinePrecision] / 0.375), $MachinePrecision], N[(N[(2.6666666666666665 / N[Sin[x], $MachinePrecision]), $MachinePrecision] * N[(0.5 - N[(0.5 * N[Cos[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 2.85 \cdot 10^{-7}:\\
\;\;\;\;\frac{x \cdot 0.25}{0.375}\\
\mathbf{else}:\\
\;\;\;\;\frac{2.6666666666666665}{\sin x} \cdot \left(0.5 - 0.5 \cdot \cos x\right)\\
\end{array}
\end{array}
if x < 2.8500000000000002e-7Initial program 66.2%
associate-/l*99.4%
associate-*l*99.3%
metadata-eval99.3%
Simplified99.3%
clear-num99.3%
un-div-inv99.3%
Applied egg-rr99.3%
metadata-eval99.3%
times-frac99.7%
*-un-lft-identity99.7%
*-commutative99.7%
associate-/r*99.7%
associate-/r/99.7%
associate-*l/66.4%
unpow266.4%
Applied egg-rr66.4%
Taylor expanded in x around 0 71.4%
*-commutative71.4%
Simplified71.4%
if 2.8500000000000002e-7 < x Initial program 99.0%
associate-/l*98.9%
associate-*l*99.0%
metadata-eval99.0%
Simplified99.0%
associate-*r*98.9%
*-commutative98.9%
div-inv98.9%
associate-*l*98.9%
associate-/r/98.9%
un-div-inv98.9%
*-un-lft-identity98.9%
times-frac99.1%
metadata-eval99.1%
Applied egg-rr99.1%
*-un-lft-identity99.1%
times-frac99.0%
metadata-eval99.0%
associate-*r/99.1%
div-inv98.9%
times-frac98.9%
Applied egg-rr98.9%
pow198.9%
inv-pow98.9%
pow-div99.0%
metadata-eval99.0%
unpow299.0%
sqr-sin-a97.3%
Applied egg-rr97.3%
*-commutative97.3%
associate-*r*97.3%
metadata-eval97.3%
*-lft-identity97.3%
Simplified97.3%
(FPCore (x) :precision binary64 (if (<= x 5.2e-5) (/ (* x (+ 0.25 (* (pow x 2.0) 0.020833333333333332))) 0.375) (/ (+ 1.3333333333333333 (* (cos x) -1.3333333333333333)) (sin x))))
double code(double x) {
double tmp;
if (x <= 5.2e-5) {
tmp = (x * (0.25 + (pow(x, 2.0) * 0.020833333333333332))) / 0.375;
} 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 <= 5.2d-5) then
tmp = (x * (0.25d0 + ((x ** 2.0d0) * 0.020833333333333332d0))) / 0.375d0
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 <= 5.2e-5) {
tmp = (x * (0.25 + (Math.pow(x, 2.0) * 0.020833333333333332))) / 0.375;
} else {
tmp = (1.3333333333333333 + (Math.cos(x) * -1.3333333333333333)) / Math.sin(x);
}
return tmp;
}
def code(x): tmp = 0 if x <= 5.2e-5: tmp = (x * (0.25 + (math.pow(x, 2.0) * 0.020833333333333332))) / 0.375 else: tmp = (1.3333333333333333 + (math.cos(x) * -1.3333333333333333)) / math.sin(x) return tmp
function code(x) tmp = 0.0 if (x <= 5.2e-5) tmp = Float64(Float64(x * Float64(0.25 + Float64((x ^ 2.0) * 0.020833333333333332))) / 0.375); 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 <= 5.2e-5) tmp = (x * (0.25 + ((x ^ 2.0) * 0.020833333333333332))) / 0.375; else tmp = (1.3333333333333333 + (cos(x) * -1.3333333333333333)) / sin(x); end tmp_2 = tmp; end
code[x_] := If[LessEqual[x, 5.2e-5], N[(N[(x * N[(0.25 + N[(N[Power[x, 2.0], $MachinePrecision] * 0.020833333333333332), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / 0.375), $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 5.2 \cdot 10^{-5}:\\
\;\;\;\;\frac{x \cdot \left(0.25 + {x}^{2} \cdot 0.020833333333333332\right)}{0.375}\\
\mathbf{else}:\\
\;\;\;\;\frac{1.3333333333333333 + \cos x \cdot -1.3333333333333333}{\sin x}\\
\end{array}
\end{array}
if x < 5.19999999999999968e-5Initial program 66.2%
associate-/l*99.4%
associate-*l*99.3%
metadata-eval99.3%
Simplified99.3%
clear-num99.3%
un-div-inv99.3%
Applied egg-rr99.3%
metadata-eval99.3%
times-frac99.7%
*-un-lft-identity99.7%
*-commutative99.7%
associate-/r*99.7%
associate-/r/99.7%
associate-*l/66.4%
unpow266.4%
Applied egg-rr66.4%
Taylor expanded in x around 0 71.2%
*-commutative71.2%
Simplified71.2%
if 5.19999999999999968e-5 < x Initial program 99.0%
associate-/l*98.9%
associate-*l*99.0%
metadata-eval99.0%
Simplified99.0%
associate-*r*98.9%
*-commutative98.9%
div-inv98.9%
associate-*l*98.9%
associate-/r/98.9%
un-div-inv98.9%
*-un-lft-identity98.9%
times-frac99.1%
metadata-eval99.1%
Applied egg-rr99.1%
clear-num98.9%
un-div-inv99.0%
Applied egg-rr99.0%
frac-2neg99.0%
associate-/r/99.0%
metadata-eval99.0%
distribute-neg-frac299.0%
Applied egg-rr99.0%
associate-*r/99.0%
frac-2neg99.0%
associate-*l/99.0%
unpow299.0%
remove-double-neg99.0%
Applied egg-rr99.0%
unpow299.0%
sin-mult97.3%
Applied egg-rr97.3%
div-sub97.3%
+-inverses97.3%
cos-097.3%
metadata-eval97.3%
distribute-lft-out97.3%
metadata-eval97.3%
*-rgt-identity97.3%
Simplified97.3%
clear-num97.4%
associate-/r/97.3%
neg-sub097.3%
div-sub96.7%
associate--r-96.7%
metadata-eval96.7%
metadata-eval96.7%
div-inv96.7%
metadata-eval96.7%
associate-/l*96.8%
metadata-eval96.8%
Applied egg-rr96.8%
Taylor expanded in x around inf 96.8%
Final simplification78.2%
(FPCore (x) :precision binary64 (fabs (* (sin (* x 0.5)) 1.3333333333333333)))
double code(double x) {
return fabs((sin((x * 0.5)) * 1.3333333333333333));
}
real(8) function code(x)
real(8), intent (in) :: x
code = abs((sin((x * 0.5d0)) * 1.3333333333333333d0))
end function
public static double code(double x) {
return Math.abs((Math.sin((x * 0.5)) * 1.3333333333333333));
}
def code(x): return math.fabs((math.sin((x * 0.5)) * 1.3333333333333333))
function code(x) return abs(Float64(sin(Float64(x * 0.5)) * 1.3333333333333333)) end
function tmp = code(x) tmp = abs((sin((x * 0.5)) * 1.3333333333333333)); end
code[x_] := N[Abs[N[(N[Sin[N[(x * 0.5), $MachinePrecision]], $MachinePrecision] * 1.3333333333333333), $MachinePrecision]], $MachinePrecision]
\begin{array}{l}
\\
\left|\sin \left(x \cdot 0.5\right) \cdot 1.3333333333333333\right|
\end{array}
Initial program 75.1%
*-commutative75.1%
associate-/l*99.2%
remove-double-neg99.2%
sin-neg99.2%
distribute-lft-neg-out99.2%
distribute-rgt-neg-in99.2%
distribute-frac-neg99.2%
distribute-frac-neg299.2%
neg-mul-199.2%
associate-/r*99.2%
Simplified99.2%
Taylor expanded in x around 0 56.3%
add-sqr-sqrt29.4%
sqrt-unprod20.4%
swap-sqr20.4%
unpow220.4%
metadata-eval20.4%
Applied egg-rr20.4%
unpow220.4%
metadata-eval20.4%
swap-sqr20.4%
rem-sqrt-square33.4%
*-commutative33.4%
Simplified33.4%
Final simplification33.4%
(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 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
associate-*r*99.2%
*-commutative99.2%
div-inv99.1%
associate-*l*99.1%
associate-/r/99.1%
un-div-inv99.2%
*-un-lft-identity99.2%
times-frac99.5%
metadata-eval99.5%
Applied egg-rr99.5%
Taylor expanded in x around 0 56.5%
(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 75.1%
*-commutative75.1%
associate-/l*99.2%
remove-double-neg99.2%
sin-neg99.2%
distribute-lft-neg-out99.2%
distribute-rgt-neg-in99.2%
distribute-frac-neg99.2%
distribute-frac-neg299.2%
neg-mul-199.2%
associate-/r*99.2%
Simplified99.2%
Taylor expanded in x around 0 56.3%
(FPCore (x) :precision binary64 (/ (* x 0.25) 0.375))
double code(double x) {
return (x * 0.25) / 0.375;
}
real(8) function code(x)
real(8), intent (in) :: x
code = (x * 0.25d0) / 0.375d0
end function
public static double code(double x) {
return (x * 0.25) / 0.375;
}
def code(x): return (x * 0.25) / 0.375
function code(x) return Float64(Float64(x * 0.25) / 0.375) end
function tmp = code(x) tmp = (x * 0.25) / 0.375; end
code[x_] := N[(N[(x * 0.25), $MachinePrecision] / 0.375), $MachinePrecision]
\begin{array}{l}
\\
\frac{x \cdot 0.25}{0.375}
\end{array}
Initial program 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
clear-num99.2%
un-div-inv99.3%
Applied egg-rr99.3%
metadata-eval99.3%
times-frac99.5%
*-un-lft-identity99.5%
*-commutative99.5%
associate-/r*99.5%
associate-/r/99.5%
associate-*l/75.3%
unpow275.3%
Applied egg-rr75.3%
Taylor expanded in x around 0 53.1%
*-commutative53.1%
Simplified53.1%
(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 75.1%
associate-/l*99.2%
associate-*l*99.2%
metadata-eval99.2%
Simplified99.2%
Taylor expanded in x around 0 52.8%
Final simplification52.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 2024105
(FPCore (x)
:name "Graphics.Rasterific.Svg.PathConverter:segmentToBezier from rasterific-svg-0.2.3.1, A"
:precision binary64
:alt
(/ (/ (* 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)))