\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 r14608 = -1.0;
double r14609 = 1.0;
double r14610 = /* ERROR: no complex support in C */;
double r14611 = r14610 * r14610;
double r14612 = r14611 * r14610;
double r14613 = r14612 * r14610;
double r14614 = r14613 * r14610;
double r14615 = r14614 * r14610;
double r14616 = 6.0;
double r14617 = 0.0;
double r14618 = /* ERROR: no complex support in C */;
double r14619 = r14618 * r14610;
double r14620 = r14619 * r14610;
double r14621 = r14620 * r14610;
double r14622 = r14621 * r14610;
double r14623 = r14622 * r14610;
double r14624 = r14615 + r14623;
double r14625 = 15.0;
double r14626 = /* ERROR: no complex support in C */;
double r14627 = r14626 * r14610;
double r14628 = r14627 * r14610;
double r14629 = r14628 * r14610;
double r14630 = r14629 * r14610;
double r14631 = r14624 + r14630;
double r14632 = 20.0;
double r14633 = /* ERROR: no complex support in C */;
double r14634 = r14633 * r14610;
double r14635 = r14634 * r14610;
double r14636 = r14635 * r14610;
double r14637 = r14631 + r14636;
double r14638 = r14637 + r14628;
double r14639 = r14638 + r14619;
double r14640 = /* ERROR: no complex support in C */;
double r14641 = r14639 + r14640;
double r14642 = /* ERROR: no complex support in C */;
return r14642;
}
double f() {
double r14643 = -1.0;
double r14644 = 1.0;
double r14645 = /* ERROR: no complex support in C */;
double r14646 = r14645 * r14645;
double r14647 = r14646 * r14645;
double r14648 = r14647 * r14645;
double r14649 = r14648 * r14645;
double r14650 = r14649 * r14645;
double r14651 = 6.0;
double r14652 = 0.0;
double r14653 = /* ERROR: no complex support in C */;
double r14654 = r14653 * r14645;
double r14655 = r14654 * r14645;
double r14656 = r14655 * r14645;
double r14657 = r14656 * r14645;
double r14658 = r14657 * r14645;
double r14659 = r14650 + r14658;
double r14660 = 15.0;
double r14661 = /* ERROR: no complex support in C */;
double r14662 = r14661 * r14645;
double r14663 = r14662 * r14645;
double r14664 = r14663 * r14645;
double r14665 = r14664 * r14645;
double r14666 = r14659 + r14665;
double r14667 = 20.0;
double r14668 = /* ERROR: no complex support in C */;
double r14669 = r14668 * r14645;
double r14670 = r14669 * r14645;
double r14671 = r14670 * r14645;
double r14672 = r14666 + r14671;
double r14673 = r14672 + r14663;
double r14674 = r14673 + r14654;
double r14675 = /* ERROR: no complex support in C */;
double r14676 = r14674 + r14675;
double r14677 = /* ERROR: no complex support in C */;
return r14677;
}
Initial program 0
Final simplification0
herbie shell --seed 2020001 +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))))