\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.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))
\Re(\left(\left(\left(1 + 0.0 i\right) + \left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(6 + 0.0 i\right)\right)\right)\right) + \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \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(\left(6 + 0.0 i\right) + \left(-1 + 1 i\right)\right)\right) + \left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(20 + 0.0 i\right)\right)\right)\right)\right)\right))
double f() {
double r39957 = -1.0;
double r39958 = 1.0;
double r39959 = /* ERROR: no complex support in C */;
double r39960 = r39959 * r39959;
double r39961 = r39960 * r39959;
double r39962 = r39961 * r39959;
double r39963 = r39962 * r39959;
double r39964 = r39963 * r39959;
double r39965 = 6.0;
double r39966 = 0.0;
double r39967 = /* ERROR: no complex support in C */;
double r39968 = r39967 * r39959;
double r39969 = r39968 * r39959;
double r39970 = r39969 * r39959;
double r39971 = r39970 * r39959;
double r39972 = r39971 * r39959;
double r39973 = r39964 + r39972;
double r39974 = 15.0;
double r39975 = /* ERROR: no complex support in C */;
double r39976 = r39975 * r39959;
double r39977 = r39976 * r39959;
double r39978 = r39977 * r39959;
double r39979 = r39978 * r39959;
double r39980 = r39973 + r39979;
double r39981 = 20.0;
double r39982 = /* ERROR: no complex support in C */;
double r39983 = r39982 * r39959;
double r39984 = r39983 * r39959;
double r39985 = r39984 * r39959;
double r39986 = r39980 + r39985;
double r39987 = r39986 + r39977;
double r39988 = r39987 + r39968;
double r39989 = /* ERROR: no complex support in C */;
double r39990 = r39988 + r39989;
double r39991 = /* ERROR: no complex support in C */;
return r39991;
}
double f() {
double r39992 = 1.0;
double r39993 = 0.0;
double r39994 = /* ERROR: no complex support in C */;
double r39995 = -1.0;
double r39996 = /* ERROR: no complex support in C */;
double r39997 = 15.0;
double r39998 = /* ERROR: no complex support in C */;
double r39999 = r39998 * r39996;
double r40000 = 6.0;
double r40001 = /* ERROR: no complex support in C */;
double r40002 = r39999 + r40001;
double r40003 = r39996 * r40002;
double r40004 = r39994 + r40003;
double r40005 = r39996 * r39996;
double r40006 = r40005 * r39996;
double r40007 = r40001 + r39996;
double r40008 = r40006 * r40007;
double r40009 = 20.0;
double r40010 = /* ERROR: no complex support in C */;
double r40011 = r39999 + r40010;
double r40012 = r39996 * r40011;
double r40013 = r40008 + r40012;
double r40014 = r40005 * r40013;
double r40015 = r40004 + r40014;
double r40016 = /* ERROR: no complex support in C */;
return r40016;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2020045
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))