Average Error: 0 → 0
Time: 21.1s
Precision: 64
\[\Im(\left(\left(\left(\left(\left(\left(\left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(\left(\left(\left(\left(-2\right) + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(\left(5 + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(4 + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(7 + 0 i\right)\right))\]
↓
\[\Im(\left(\left(5 + \frac{\sqrt{3}}{2} \cdot 4 i\right) + \left(\left(\left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right) + \left(6 + \frac{-1}{2} \cdot \frac{\sqrt{3}}{\frac{1}{2}} i\right)\right) \cdot \left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right)\right)\right))\]
\Im(\left(\left(\left(\left(\left(\left(\left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(\left(\left(\left(\left(-2\right) + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(\left(5 + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(4 + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(7 + 0 i\right)\right))
↓
\Im(\left(\left(5 + \frac{\sqrt{3}}{2} \cdot 4 i\right) + \left(\left(\left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right) + \left(6 + \frac{-1}{2} \cdot \frac{\sqrt{3}}{\frac{1}{2}} i\right)\right) \cdot \left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right)\right)\right))
double f() {
        double r1814717 = 1.0;
        double r1814718 = -r1814717;
        double r1814719 = 2.0;
        double r1814720 = r1814718 / r1814719;
        double r1814721 = 3.0;
        double r1814722 = sqrt(r1814721);
        double r1814723 = r1814722 / r1814719;
        double r1814724 = /* ERROR: no complex support in C */;
        double r1814725 = r1814724 * r1814724;
        double r1814726 = r1814725 * r1814724;
        double r1814727 = r1814726 * r1814724;
        double r1814728 = -r1814719;
        double r1814729 = 0.0;
        double r1814730 = /* ERROR: no complex support in C */;
        double r1814731 = r1814730 * r1814724;
        double r1814732 = r1814731 * r1814724;
        double r1814733 = r1814732 * r1814724;
        double r1814734 = r1814727 + r1814733;
        double r1814735 = 5.0;
        double r1814736 = /* ERROR: no complex support in C */;
        double r1814737 = r1814736 * r1814724;
        double r1814738 = r1814737 * r1814724;
        double r1814739 = r1814734 + r1814738;
        double r1814740 = 4.0;
        double r1814741 = /* ERROR: no complex support in C */;
        double r1814742 = r1814741 * r1814724;
        double r1814743 = r1814739 + r1814742;
        double r1814744 = 7.0;
        double r1814745 = /* ERROR: no complex support in C */;
        double r1814746 = r1814743 + r1814745;
        double r1814747 = /* ERROR: no complex support in C */;
        return r1814747;
}
↓
double f() {
        double r1814748 = 5.0;
        double r1814749 = 3.0;
        double r1814750 = sqrt(r1814749);
        double r1814751 = 2.0;
        double r1814752 = r1814750 / r1814751;
        double r1814753 = 4.0;
        double r1814754 = r1814752 * r1814753;
        double r1814755 = /* ERROR: no complex support in C */;
        double r1814756 = 0.25;
        double r1814757 = r1814752 * r1814752;
        double r1814758 = r1814756 - r1814757;
        double r1814759 = -r1814750;
        double r1814760 = r1814759 / r1814751;
        double r1814761 = /* ERROR: no complex support in C */;
        double r1814762 = 6.0;
        double r1814763 = -0.5;
        double r1814764 = 0.5;
        double r1814765 = r1814750 / r1814764;
        double r1814766 = r1814763 * r1814765;
        double r1814767 = /* ERROR: no complex support in C */;
        double r1814768 = r1814761 + r1814767;
        double r1814769 = r1814768 * r1814761;
        double r1814770 = r1814755 + r1814769;
        double r1814771 = /* ERROR: no complex support in C */;
        return r1814771;
}

Error

Derivation

  1. Initial program 0

    \[\Im(\left(\left(\left(\left(\left(\left(\left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(\left(\left(\left(\left(-2\right) + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(\left(5 + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(4 + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(7 + 0 i\right)\right))\]

  2. Simplified0

    \[\leadsto \color{blue}{\Im(\left(\left(5 + \frac{\sqrt{3}}{2} \cdot 4 i\right) + \left(\left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \left(-\frac{\sqrt{3}}{2}\right) i\right) \cdot \left(\left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \left(-\frac{\sqrt{3}}{2}\right) i\right) + \left(6 + \frac{-1}{2} \cdot \frac{\sqrt{3}}{\frac{1}{2}} i\right)\right)\right)\right))}\]

  3. Final simplification0

    \[\leadsto \Im(\left(\left(5 + \frac{\sqrt{3}}{2} \cdot 4 i\right) + \left(\left(\left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right) + \left(6 + \frac{-1}{2} \cdot \frac{\sqrt{3}}{\frac{1}{2}} i\right)\right) \cdot \left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right)\right)\right))\]

Reproduce

herbie shell --seed 2019163 
(FPCore ()
  :name "3.9.2 imaginary part (p56)"
  (im (+.c (+.c (+.c (+.c (*.c (*.c (*.c (complex (/ (- 1) 2) (/ (sqrt 3) 2)) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (*.c (*.c (*.c (complex (- 2) 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (*.c (*.c (complex 5 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (*.c (complex 4 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (complex 7 0))))