equal
deleted
inserted
replaced
1091 apply (cases "z = 0", simp add: pdivmod_rel_def) |
1091 apply (cases "z = 0", simp add: pdivmod_rel_def) |
1092 apply (cases "y = 0", simp add: pdivmod_rel_by_0_iff pdivmod_rel_0_iff) |
1092 apply (cases "y = 0", simp add: pdivmod_rel_by_0_iff pdivmod_rel_0_iff) |
1093 apply (cases "r = 0") |
1093 apply (cases "r = 0") |
1094 apply (cases "r' = 0") |
1094 apply (cases "r' = 0") |
1095 apply (simp add: pdivmod_rel_def) |
1095 apply (simp add: pdivmod_rel_def) |
1096 apply (simp add: pdivmod_rel_def ring_simps degree_mult_eq) |
1096 apply (simp add: pdivmod_rel_def field_simps degree_mult_eq) |
1097 apply (cases "r' = 0") |
1097 apply (cases "r' = 0") |
1098 apply (simp add: pdivmod_rel_def degree_mult_eq) |
1098 apply (simp add: pdivmod_rel_def degree_mult_eq) |
1099 apply (simp add: pdivmod_rel_def ring_simps) |
1099 apply (simp add: pdivmod_rel_def field_simps) |
1100 apply (simp add: degree_mult_eq degree_add_less) |
1100 apply (simp add: degree_mult_eq degree_add_less) |
1101 done |
1101 done |
1102 |
1102 |
1103 lemma poly_div_mult_right: |
1103 lemma poly_div_mult_right: |
1104 fixes x y z :: "'a::field poly" |
1104 fixes x y z :: "'a::field poly" |