Skip to content
Snippets Groups Projects
Commit 0a35ba52 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Fix more _L lemmas.

parent cbeb20a2
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
theories/prelude/collections.v
+ 2
− 2
View file @ 0a35ba52
...@@ -643,9 +643,9 @@ Section collection. ...@@ -643,9 +643,9 @@ Section collection.
Proof. unfold_leibniz; apply union_intersection_l. Qed. Proof. unfold_leibniz; apply union_intersection_l. Qed.
Lemma union_intersection_r_L X Y Z : (X ∩ Y) ∪ Z = (X ∪ Z) ∩ (Y ∪ Z). Lemma union_intersection_r_L X Y Z : (X ∩ Y) ∪ Z = (X ∪ Z) ∩ (Y ∪ Z).
Proof. unfold_leibniz; apply union_intersection_r. Qed. Proof. unfold_leibniz; apply union_intersection_r. Qed.
Lemma intersection_union_l_L X Y Z : X ∩ (Y ∪ Z) ≡ (X ∩ Y) ∪ (X ∩ Z). Lemma intersection_union_l_L X Y Z : X ∩ (Y ∪ Z) = (X ∩ Y) ∪ (X ∩ Z).
Proof. unfold_leibniz; apply intersection_union_l. Qed. Proof. unfold_leibniz; apply intersection_union_l. Qed.
Lemma intersection_union_r_L X Y Z : (X ∪ Y) ∩ Z ≡ (X ∩ Z) ∪ (Y ∩ Z). Lemma intersection_union_r_L X Y Z : (X ∪ Y) ∩ Z = (X ∩ Z) ∪ (Y ∩ Z).
Proof. unfold_leibniz; apply intersection_union_r. Qed. Proof. unfold_leibniz; apply intersection_union_r. Qed.
(** Difference *) (** Difference *)
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment