\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(\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 r28935 = -1.0;
double r28936 = 1.0;
double r28937 = /* ERROR: no complex support in C */;
double r28938 = r28937 * r28937;
double r28939 = r28938 * r28937;
double r28940 = r28939 * r28937;
double r28941 = r28940 * r28937;
double r28942 = r28941 * r28937;
double r28943 = 6.0;
double r28944 = 0.0;
double r28945 = /* ERROR: no complex support in C */;
double r28946 = r28945 * r28937;
double r28947 = r28946 * r28937;
double r28948 = r28947 * r28937;
double r28949 = r28948 * r28937;
double r28950 = r28949 * r28937;
double r28951 = r28942 + r28950;
double r28952 = 15.0;
double r28953 = /* ERROR: no complex support in C */;
double r28954 = r28953 * r28937;
double r28955 = r28954 * r28937;
double r28956 = r28955 * r28937;
double r28957 = r28956 * r28937;
double r28958 = r28951 + r28957;
double r28959 = 20.0;
double r28960 = /* ERROR: no complex support in C */;
double r28961 = r28960 * r28937;
double r28962 = r28961 * r28937;
double r28963 = r28962 * r28937;
double r28964 = r28958 + r28963;
double r28965 = r28964 + r28955;
double r28966 = r28965 + r28946;
double r28967 = /* ERROR: no complex support in C */;
double r28968 = r28966 + r28967;
double r28969 = /* ERROR: no complex support in C */;
return r28969;
}
double f() {
double r28970 = -1.0;
double r28971 = 1.0;
double r28972 = /* ERROR: no complex support in C */;
double r28973 = r28972 * r28972;
double r28974 = r28973 * r28972;
double r28975 = r28974 * r28972;
double r28976 = r28975 * r28972;
double r28977 = r28976 * r28972;
double r28978 = 6.0;
double r28979 = 0.0;
double r28980 = /* ERROR: no complex support in C */;
double r28981 = r28980 * r28972;
double r28982 = r28981 * r28972;
double r28983 = r28982 * r28972;
double r28984 = r28983 * r28972;
double r28985 = r28984 * r28972;
double r28986 = r28977 + r28985;
double r28987 = 15.0;
double r28988 = /* ERROR: no complex support in C */;
double r28989 = r28988 * r28972;
double r28990 = r28989 * r28972;
double r28991 = r28990 * r28972;
double r28992 = r28991 * r28972;
double r28993 = r28986 + r28992;
double r28994 = 20.0;
double r28995 = /* ERROR: no complex support in C */;
double r28996 = r28995 * r28972;
double r28997 = r28996 * r28972;
double r28998 = r28997 * r28972;
double r28999 = r28993 + r28998;
double r29000 = r28999 + r28990;
double r29001 = r29000 + r28981;
double r29002 = /* ERROR: no complex support in C */;
double r29003 = r29001 + r29002;
double r29004 = /* ERROR: no complex support in C */;
return r29004;
}
Initial program 0
Final simplification0
herbie shell --seed 2020021
(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))))