\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))
\Re(\left(\left(-5 + -24 i\right) + \left(\left(\left(24 + -24 i\right) + \left(0 + 8 i\right)\right) + \left(\left(40 + 40 i\right) + \left(-60 + 0 i\right)\right)\right)\right))
double f() {
double r1919816 = -1.0;
double r1919817 = 1.0;
double r1919818 = /* ERROR: no complex support in C */;
double r1919819 = r1919818 * r1919818;
double r1919820 = r1919819 * r1919818;
double r1919821 = r1919820 * r1919818;
double r1919822 = r1919821 * r1919818;
double r1919823 = r1919822 * r1919818;
double r1919824 = 6.0;
double r1919825 = 0.0;
double r1919826 = /* ERROR: no complex support in C */;
double r1919827 = r1919826 * r1919818;
double r1919828 = r1919827 * r1919818;
double r1919829 = r1919828 * r1919818;
double r1919830 = r1919829 * r1919818;
double r1919831 = r1919830 * r1919818;
double r1919832 = r1919823 + r1919831;
double r1919833 = 15.0;
double r1919834 = /* ERROR: no complex support in C */;
double r1919835 = r1919834 * r1919818;
double r1919836 = r1919835 * r1919818;
double r1919837 = r1919836 * r1919818;
double r1919838 = r1919837 * r1919818;
double r1919839 = r1919832 + r1919838;
double r1919840 = 20.0;
double r1919841 = /* ERROR: no complex support in C */;
double r1919842 = r1919841 * r1919818;
double r1919843 = r1919842 * r1919818;
double r1919844 = r1919843 * r1919818;
double r1919845 = r1919839 + r1919844;
double r1919846 = r1919845 + r1919836;
double r1919847 = r1919846 + r1919827;
double r1919848 = /* ERROR: no complex support in C */;
double r1919849 = r1919847 + r1919848;
double r1919850 = /* ERROR: no complex support in C */;
return r1919850;
}
double f() {
double r1919851 = -5.0;
double r1919852 = -24.0;
double r1919853 = /* ERROR: no complex support in C */;
double r1919854 = 24.0;
double r1919855 = /* ERROR: no complex support in C */;
double r1919856 = 0.0;
double r1919857 = 8.0;
double r1919858 = /* ERROR: no complex support in C */;
double r1919859 = r1919855 + r1919858;
double r1919860 = 40.0;
double r1919861 = /* ERROR: no complex support in C */;
double r1919862 = -60.0;
double r1919863 = /* ERROR: no complex support in C */;
double r1919864 = r1919861 + r1919863;
double r1919865 = r1919859 + r1919864;
double r1919866 = r1919853 + r1919865;
double r1919867 = /* ERROR: no complex support in C */;
return r1919867;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019104
(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))))