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

Merge branch 'ralf/difference_union' into 'master'

add lemma about chained difference

See merge request robbertkrebbers/coq-stdpp!36
parents e1e5349a 9bfa00b2
No related branches found
No related tags found
1 merge request!36add lemma about chained difference
Pipeline #
......@@ -622,7 +622,8 @@ Section collection.
Proof. set_solver. Qed.
Lemma subset_difference_elem_of {x: A} {s: C} (inx: x s): s {[ x ]} s.
Proof. set_solver. Qed.
Lemma difference_difference X Y Z : (X Y) Z X (Y Z).
Proof. set_solver. Qed.
Lemma difference_mono X1 X2 Y1 Y2 :
X1 X2 Y2 Y1 X1 Y1 X2 Y2.
......@@ -688,6 +689,8 @@ Section collection.
Proof. unfold_leibniz. apply difference_intersection_distr_l. Qed.
Lemma difference_disjoint_L X Y : X ## Y X Y = X.
Proof. unfold_leibniz. apply difference_disjoint. Qed.
Lemma difference_difference_L X Y Z : (X Y) Z = X (Y Z).
Proof. unfold_leibniz. apply difference_difference. Qed.
(** Disjointness *)
Lemma disjoint_intersection_L X Y : X ## Y X Y = ∅.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment