Average Error: 39.4 → 0.7
Time: 18.1s
Precision: 64
\[\cos \left(x + \varepsilon\right) - \cos x\]
\[\begin{array}{l} \mathbf{if}\;\varepsilon \le -1.347365952010613 \cdot 10^{-07}:\\ \;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\ \mathbf{elif}\;\varepsilon \le 2.2247927857601395 \cdot 10^{-06}:\\ \;\;\;\;-2 \cdot \left(\sin \left(\frac{\varepsilon}{2}\right) \cdot \sin \left(\frac{\left(x + \varepsilon\right) + x}{2}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\ \end{array}\]
\cos \left(x + \varepsilon\right) - \cos x
\begin{array}{l}
\mathbf{if}\;\varepsilon \le -1.347365952010613 \cdot 10^{-07}:\\
\;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\

\mathbf{elif}\;\varepsilon \le 2.2247927857601395 \cdot 10^{-06}:\\
\;\;\;\;-2 \cdot \left(\sin \left(\frac{\varepsilon}{2}\right) \cdot \sin \left(\frac{\left(x + \varepsilon\right) + x}{2}\right)\right)\\

\mathbf{else}:\\
\;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\

\end{array}
double f(double x, double eps) {
        double r430055 = x;
        double r430056 = eps;
        double r430057 = r430055 + r430056;
        double r430058 = cos(r430057);
        double r430059 = cos(r430055);
        double r430060 = r430058 - r430059;
        return r430060;
}

double f(double x, double eps) {
        double r430061 = eps;
        double r430062 = -1.347365952010613e-07;
        bool r430063 = r430061 <= r430062;
        double r430064 = x;
        double r430065 = cos(r430064);
        double r430066 = cos(r430061);
        double r430067 = r430065 * r430066;
        double r430068 = sin(r430064);
        double r430069 = sin(r430061);
        double r430070 = r430068 * r430069;
        double r430071 = r430067 - r430070;
        double r430072 = r430071 - r430065;
        double r430073 = 2.2247927857601395e-06;
        bool r430074 = r430061 <= r430073;
        double r430075 = -2.0;
        double r430076 = 2.0;
        double r430077 = r430061 / r430076;
        double r430078 = sin(r430077);
        double r430079 = r430064 + r430061;
        double r430080 = r430079 + r430064;
        double r430081 = r430080 / r430076;
        double r430082 = sin(r430081);
        double r430083 = r430078 * r430082;
        double r430084 = r430075 * r430083;
        double r430085 = r430074 ? r430084 : r430072;
        double r430086 = r430063 ? r430072 : r430085;
        return r430086;
}

Error

Bits error versus x

Bits error versus eps

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Split input into 2 regimes
  2. if eps < -1.347365952010613e-07 or 2.2247927857601395e-06 < eps

    1. Initial program 30.3

      \[\cos \left(x + \varepsilon\right) - \cos x\]
    2. Using strategy rm
    3. Applied cos-sum1.0

      \[\leadsto \color{blue}{\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right)} - \cos x\]

    if -1.347365952010613e-07 < eps < 2.2247927857601395e-06

    1. Initial program 48.9

      \[\cos \left(x + \varepsilon\right) - \cos x\]
    2. Using strategy rm
    3. Applied diff-cos38.1

      \[\leadsto \color{blue}{-2 \cdot \left(\sin \left(\frac{\left(x + \varepsilon\right) - x}{2}\right) \cdot \sin \left(\frac{\left(x + \varepsilon\right) + x}{2}\right)\right)}\]
    4. Simplified0.4

      \[\leadsto -2 \cdot \color{blue}{\left(\sin \left(\frac{\varepsilon}{2}\right) \cdot \sin \left(\frac{x + \left(x + \varepsilon\right)}{2}\right)\right)}\]
  3. Recombined 2 regimes into one program.
  4. Final simplification0.7

    \[\leadsto \begin{array}{l} \mathbf{if}\;\varepsilon \le -1.347365952010613 \cdot 10^{-07}:\\ \;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\ \mathbf{elif}\;\varepsilon \le 2.2247927857601395 \cdot 10^{-06}:\\ \;\;\;\;-2 \cdot \left(\sin \left(\frac{\varepsilon}{2}\right) \cdot \sin \left(\frac{\left(x + \varepsilon\right) + x}{2}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\cos x \cdot \cos \varepsilon - \sin x \cdot \sin \varepsilon\right) - \cos x\\ \end{array}\]

Reproduce

herbie shell --seed 2019153 
(FPCore (x eps)
  :name "2cos (problem 3.3.5)"
  (- (cos (+ x eps)) (cos x)))