(FPCore (x eps) :precision binary64 (- (sin (+ x eps)) (sin x)))
(FPCore (x eps) :precision binary64 (fma (cos x) (sin eps) (/ (* (pow (sin eps) 2.0) (- (sin x))) (/ (+ 1.0 (pow (cos eps) 3.0)) (+ 1.0 (- (pow (cos eps) 2.0) (cos eps)))))))
double code(double x, double eps) {
return sin((x + eps)) - sin(x);
}
double code(double x, double eps) {
return fma(cos(x), sin(eps), ((pow(sin(eps), 2.0) * -sin(x)) / ((1.0 + pow(cos(eps), 3.0)) / (1.0 + (pow(cos(eps), 2.0) - cos(eps))))));
}
function code(x, eps) return Float64(sin(Float64(x + eps)) - sin(x)) end
function code(x, eps) return fma(cos(x), sin(eps), Float64(Float64((sin(eps) ^ 2.0) * Float64(-sin(x))) / Float64(Float64(1.0 + (cos(eps) ^ 3.0)) / Float64(1.0 + Float64((cos(eps) ^ 2.0) - cos(eps)))))) end
code[x_, eps_] := N[(N[Sin[N[(x + eps), $MachinePrecision]], $MachinePrecision] - N[Sin[x], $MachinePrecision]), $MachinePrecision]
code[x_, eps_] := N[(N[Cos[x], $MachinePrecision] * N[Sin[eps], $MachinePrecision] + N[(N[(N[Power[N[Sin[eps], $MachinePrecision], 2.0], $MachinePrecision] * (-N[Sin[x], $MachinePrecision])), $MachinePrecision] / N[(N[(1.0 + N[Power[N[Cos[eps], $MachinePrecision], 3.0], $MachinePrecision]), $MachinePrecision] / N[(1.0 + N[(N[Power[N[Cos[eps], $MachinePrecision], 2.0], $MachinePrecision] - N[Cos[eps], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\sin \left(x + \varepsilon\right) - \sin x
\mathsf{fma}\left(\cos x, \sin \varepsilon, \frac{{\sin \varepsilon}^{2} \cdot \left(-\sin x\right)}{\frac{1 + {\cos \varepsilon}^{3}}{1 + \left({\cos \varepsilon}^{2} - \cos \varepsilon\right)}}\right)
| Original | 37.0 |
|---|---|
| Target | 15.0 |
| Herbie | 0.4 |
Initial program 37.0
Applied egg-rr21.8
Taylor expanded in eps around inf 21.8
Simplified0.4
Applied egg-rr0.4
Applied egg-rr0.4
Final simplification0.4
herbie shell --seed 2022210
(FPCore (x eps)
:name "2sin (example 3.3)"
:precision binary64
:herbie-target
(* 2.0 (* (cos (+ x (/ eps 2.0))) (sin (/ eps 2.0))))
(- (sin (+ x eps)) (sin x)))