\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 r16893 = -1.0;
double r16894 = 1.0;
double r16895 = /* ERROR: no complex support in C */;
double r16896 = r16895 * r16895;
double r16897 = r16896 * r16895;
double r16898 = r16897 * r16895;
double r16899 = r16898 * r16895;
double r16900 = r16899 * r16895;
double r16901 = 6.0;
double r16902 = 0.0;
double r16903 = /* ERROR: no complex support in C */;
double r16904 = r16903 * r16895;
double r16905 = r16904 * r16895;
double r16906 = r16905 * r16895;
double r16907 = r16906 * r16895;
double r16908 = r16907 * r16895;
double r16909 = r16900 + r16908;
double r16910 = 15.0;
double r16911 = /* ERROR: no complex support in C */;
double r16912 = r16911 * r16895;
double r16913 = r16912 * r16895;
double r16914 = r16913 * r16895;
double r16915 = r16914 * r16895;
double r16916 = r16909 + r16915;
double r16917 = 20.0;
double r16918 = /* ERROR: no complex support in C */;
double r16919 = r16918 * r16895;
double r16920 = r16919 * r16895;
double r16921 = r16920 * r16895;
double r16922 = r16916 + r16921;
double r16923 = r16922 + r16913;
double r16924 = r16923 + r16904;
double r16925 = /* ERROR: no complex support in C */;
double r16926 = r16924 + r16925;
double r16927 = /* ERROR: no complex support in C */;
return r16927;
}
double f() {
double r16928 = -1.0;
return r16928;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019130 +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))))