\Re(\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 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 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 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 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0 i\right)\right))
-1
double f() {
double r907687 = -1.0;
double r907688 = 1.0;
double r907689 = /* ERROR: no complex support in C */;
double r907690 = r907689 * r907689;
double r907691 = r907690 * r907689;
double r907692 = r907691 * r907689;
double r907693 = r907692 * r907689;
double r907694 = r907693 * r907689;
double r907695 = 6.0;
double r907696 = 0.0;
double r907697 = /* ERROR: no complex support in C */;
double r907698 = r907697 * r907689;
double r907699 = r907698 * r907689;
double r907700 = r907699 * r907689;
double r907701 = r907700 * r907689;
double r907702 = r907701 * r907689;
double r907703 = r907694 + r907702;
double r907704 = 15.0;
double r907705 = /* ERROR: no complex support in C */;
double r907706 = r907705 * r907689;
double r907707 = r907706 * r907689;
double r907708 = r907707 * r907689;
double r907709 = r907708 * r907689;
double r907710 = r907703 + r907709;
double r907711 = 20.0;
double r907712 = /* ERROR: no complex support in C */;
double r907713 = r907712 * r907689;
double r907714 = r907713 * r907689;
double r907715 = r907714 * r907689;
double r907716 = r907710 + r907715;
double r907717 = r907716 + r907707;
double r907718 = r907717 + r907698;
double r907719 = /* ERROR: no complex support in C */;
double r907720 = r907718 + r907719;
double r907721 = /* ERROR: no complex support in C */;
return r907721;
}
double f() {
double r907722 = -1.0;
return r907722;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019163 +o rules:numerics
(FPCore ()
:name "3.9.1 real part (p56)"
(re (+.c (+.c (+.c (+.c (+.c (+.c (*.c (*.c (*.c (*.c (*.c (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (*.c (*.c (*.c (*.c (*.c (complex 6 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (complex 20 0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1))) (*.c (complex 6 0) (complex -1 1))) (complex 1 0))))