\Im(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) + \left(\left(\left(\left(\left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(20 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
\Im(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) + \left(\left(\left(\left(\left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(20 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
double f() {
double r21804 = -1.0;
double r21805 = 1.0;
double r21806 = /* ERROR: no complex support in C */;
double r21807 = r21806 * r21806;
double r21808 = r21807 * r21806;
double r21809 = r21808 * r21806;
double r21810 = r21809 * r21806;
double r21811 = r21810 * r21806;
double r21812 = 6.0;
double r21813 = 0.0;
double r21814 = /* ERROR: no complex support in C */;
double r21815 = r21814 * r21806;
double r21816 = r21815 * r21806;
double r21817 = r21816 * r21806;
double r21818 = r21817 * r21806;
double r21819 = r21818 * r21806;
double r21820 = r21811 + r21819;
double r21821 = 15.0;
double r21822 = /* ERROR: no complex support in C */;
double r21823 = r21822 * r21806;
double r21824 = r21823 * r21806;
double r21825 = r21824 * r21806;
double r21826 = r21825 * r21806;
double r21827 = r21820 + r21826;
double r21828 = 20.0;
double r21829 = /* ERROR: no complex support in C */;
double r21830 = r21829 * r21806;
double r21831 = r21830 * r21806;
double r21832 = r21831 * r21806;
double r21833 = r21827 + r21832;
double r21834 = r21833 + r21824;
double r21835 = r21834 + r21815;
double r21836 = /* ERROR: no complex support in C */;
double r21837 = r21835 + r21836;
double r21838 = /* ERROR: no complex support in C */;
return r21838;
}
double f() {
double r21839 = -1.0;
double r21840 = 1.0;
double r21841 = /* ERROR: no complex support in C */;
double r21842 = r21841 * r21841;
double r21843 = r21842 * r21841;
double r21844 = r21843 * r21841;
double r21845 = r21844 * r21841;
double r21846 = r21845 * r21841;
double r21847 = 6.0;
double r21848 = 0.0;
double r21849 = /* ERROR: no complex support in C */;
double r21850 = r21849 * r21841;
double r21851 = r21850 * r21841;
double r21852 = r21851 * r21841;
double r21853 = r21852 * r21841;
double r21854 = r21853 * r21841;
double r21855 = r21846 + r21854;
double r21856 = 15.0;
double r21857 = /* ERROR: no complex support in C */;
double r21858 = r21857 * r21841;
double r21859 = r21858 * r21841;
double r21860 = r21859 * r21841;
double r21861 = r21860 * r21841;
double r21862 = r21855 + r21861;
double r21863 = 20.0;
double r21864 = /* ERROR: no complex support in C */;
double r21865 = r21864 * r21841;
double r21866 = r21865 * r21841;
double r21867 = r21866 * r21841;
double r21868 = r21862 + r21867;
double r21869 = r21868 + r21859;
double r21870 = r21869 + r21850;
double r21871 = /* ERROR: no complex support in C */;
double r21872 = r21870 + r21871;
double r21873 = /* ERROR: no complex support in C */;
return r21873;
}
Initial program 0
Final simplification0
herbie shell --seed 2019323 +o rules:numerics
(FPCore ()
:name "3.9.1 imaginary part (p56)"
:precision binary64
(im (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (* (* (* (* (* (complex 6 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (complex 20 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1))) (* (complex 6 0.0) (complex -1 1))) (complex 1 0.0))))