equal
deleted
inserted
replaced
4738 |
4738 |
4739 subsubsection \<open>\<^const>\<open>minus_list_set\<close>\<close> |
4739 subsubsection \<open>\<^const>\<open>minus_list_set\<close>\<close> |
4740 |
4740 |
4741 text \<open>Conceptually, the result of \<^const>\<open>minus_list_set\<close> is only determined up to the set of elements:\<close> |
4741 text \<open>Conceptually, the result of \<^const>\<open>minus_list_set\<close> is only determined up to the set of elements:\<close> |
4742 |
4742 |
4743 lemma set_minus_list_set: "set(minus_list_set xs ys) = set xs - set ys" |
4743 lemma set_minus_list_set[simp]: "set(minus_list_set xs ys) = set xs - set ys" |
4744 by(induction ys) (auto simp: minus_list_set_def) |
4744 by(induction ys) (auto simp: minus_list_set_def) |
4745 |
4745 |
4746 lemma minus_list_set_Nil2[simp]: "minus_list_set xs [] = xs" |
4746 lemma minus_list_set_Nil2[simp]: "minus_list_set xs [] = xs" |
4747 by(simp add: minus_list_set_def) |
4747 by(simp add: minus_list_set_def) |
4748 |
4748 |