diff --git a/prelude/collections.v b/prelude/collections.v index afe28a10cd45c4f97003abb17b44e576dc474060..e973f481a169393df3d2f265b21e5e4ab25a3caf 100644 --- a/prelude/collections.v +++ b/prelude/collections.v @@ -24,6 +24,8 @@ Section simple_collection. Proof. firstorder auto. Qed. Global Instance: JoinSemiLattice C. Proof. firstorder auto. Qed. + Global Instance: AntiSymm (≡) (@collection_subseteq A C _). + Proof. done. Qed. Lemma elem_of_subseteq X Y : X ⊆ Y ↔ ∀ x, x ∈ X → x ∈ Y. Proof. done. Qed. Lemma elem_of_equiv X Y : X ≡ Y ↔ ∀ x, x ∈ X ↔ x ∈ Y.