
(FPCore (eps) :precision binary64 (/ (- eps (sin eps)) (- eps (tan eps))))
double code(double eps) {
return (eps - sin(eps)) / (eps - tan(eps));
}
real(8) function code(eps)
real(8), intent (in) :: eps
code = (eps - sin(eps)) / (eps - tan(eps))
end function
public static double code(double eps) {
return (eps - Math.sin(eps)) / (eps - Math.tan(eps));
}
def code(eps): return (eps - math.sin(eps)) / (eps - math.tan(eps))
function code(eps) return Float64(Float64(eps - sin(eps)) / Float64(eps - tan(eps))) end
function tmp = code(eps) tmp = (eps - sin(eps)) / (eps - tan(eps)); end
code[eps_] := N[(N[(eps - N[Sin[eps], $MachinePrecision]), $MachinePrecision] / N[(eps - N[Tan[eps], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\varepsilon - \sin \varepsilon}{\varepsilon - \tan \varepsilon}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 1 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (eps) :precision binary64 (/ (- eps (sin eps)) (- eps (tan eps))))
double code(double eps) {
return (eps - sin(eps)) / (eps - tan(eps));
}
real(8) function code(eps)
real(8), intent (in) :: eps
code = (eps - sin(eps)) / (eps - tan(eps))
end function
public static double code(double eps) {
return (eps - Math.sin(eps)) / (eps - Math.tan(eps));
}
def code(eps): return (eps - math.sin(eps)) / (eps - math.tan(eps))
function code(eps) return Float64(Float64(eps - sin(eps)) / Float64(eps - tan(eps))) end
function tmp = code(eps) tmp = (eps - sin(eps)) / (eps - tan(eps)); end
code[eps_] := N[(N[(eps - N[Sin[eps], $MachinePrecision]), $MachinePrecision] / N[(eps - N[Tan[eps], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\varepsilon - \sin \varepsilon}{\varepsilon - \tan \varepsilon}
\end{array}
(FPCore (eps) :precision binary64 (/ (- eps (sin eps)) (- eps (tan eps))))
double code(double eps) {
return (eps - sin(eps)) / (eps - tan(eps));
}
real(8) function code(eps)
real(8), intent (in) :: eps
code = (eps - sin(eps)) / (eps - tan(eps))
end function
public static double code(double eps) {
return (eps - Math.sin(eps)) / (eps - Math.tan(eps));
}
def code(eps): return (eps - math.sin(eps)) / (eps - math.tan(eps))
function code(eps) return Float64(Float64(eps - sin(eps)) / Float64(eps - tan(eps))) end
function tmp = code(eps) tmp = (eps - sin(eps)) / (eps - tan(eps)); end
code[eps_] := N[(N[(eps - N[Sin[eps], $MachinePrecision]), $MachinePrecision] / N[(eps - N[Tan[eps], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\varepsilon - \sin \varepsilon}{\varepsilon - \tan \varepsilon}
\end{array}
Initial program 1.6%
(FPCore (eps) :precision binary64 (- (* (* 0.225 eps) eps) 0.5))
double code(double eps) {
return ((0.225 * eps) * eps) - 0.5;
}
real(8) function code(eps)
real(8), intent (in) :: eps
code = ((0.225d0 * eps) * eps) - 0.5d0
end function
public static double code(double eps) {
return ((0.225 * eps) * eps) - 0.5;
}
def code(eps): return ((0.225 * eps) * eps) - 0.5
function code(eps) return Float64(Float64(Float64(0.225 * eps) * eps) - 0.5) end
function tmp = code(eps) tmp = ((0.225 * eps) * eps) - 0.5; end
code[eps_] := N[(N[(N[(0.225 * eps), $MachinePrecision] * eps), $MachinePrecision] - 0.5), $MachinePrecision]
\begin{array}{l}
\\
\left(0.225 \cdot \varepsilon\right) \cdot \varepsilon - 0.5
\end{array}
herbie shell --seed 2024343
(FPCore (eps)
:name "sintan (problem 3.4.5)"
:precision binary64
:pre (and (<= -0.4 eps) (<= eps 0.4))
:alt
(! :herbie-platform default (- (* 9/40 eps eps) 1/2))
(/ (- eps (sin eps)) (- eps (tan eps))))