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

∈ on `listset` is decidable.

parent 91a46cc0
No related branches found
No related tags found
No related merge requests found
......@@ -38,7 +38,12 @@ Proof.
abstract (by rewrite listset_empty_alt).
Defined.
Context `{!EqDecision A}.
Context `{Aeq : !EqDecision A}.
Global Instance listset_elem_of_dec : RelDecision (∈@{listset A}).
Proof using Aeq.
refine (λ x X, cast_if (decide (x listset_car X))); done.
Defined.
Global Instance listset_intersection: Intersection (listset A) := λ l k,
let (l') := l in let (k') := k in Listset (list_intersection l' k').
......
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