Commit 22d4a0cd authored by Robbert Krebbers's avatar Robbert Krebbers

∈ on `listset` is decidable.

parent 91a46cc0
Pipeline #14825 failed with stage
in 6 minutes and 27 seconds
......@@ -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').
......
Markdown is supported
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