src/HOL/Word/WordArith.thy
changeset 29668 33ba3faeaa0e
parent 29631 3aa049e5f156
parent 29667 53103fc8ffa3
child 30509 e19d5b459a61
equal deleted inserted replaced
29664:6146e275e8af 29668:33ba3faeaa0e
   999   apply (unfold word_size)
   999   apply (unfold word_size)
  1000   apply (simp add: un_ui_le)
  1000   apply (simp add: un_ui_le)
  1001   apply (auto simp add: unat_def uint_sub_if')
  1001   apply (auto simp add: unat_def uint_sub_if')
  1002    apply (rule nat_diff_distrib)
  1002    apply (rule nat_diff_distrib)
  1003     prefer 3
  1003     prefer 3
  1004     apply (simp add: group_simps)
  1004     apply (simp add: algebra_simps)
  1005     apply (rule nat_diff_distrib [THEN trans])
  1005     apply (rule nat_diff_distrib [THEN trans])
  1006       prefer 3
  1006       prefer 3
  1007       apply (subst nat_add_distrib)
  1007       apply (subst nat_add_distrib)
  1008         prefer 3
  1008         prefer 3
  1009         apply (simp add: nat_power_eq)
  1009         apply (simp add: nat_power_eq)