Skip to content
Snippets Groups Projects
Commit 39713291 authored by Ralf Jung's avatar Ralf Jung
Browse files

fix build on old Coq

parent ba5e4a82
No related branches found
No related tags found
No related merge requests found
......@@ -882,11 +882,11 @@ Section fin_to_set.
Context `{SemiSet A C, Finite A}.
Implicit Types a : A.
Lemma elem_of_fin_to_set a : a fin_to_set A.
Lemma elem_of_fin_to_set a : a @{C} fin_to_set A.
Proof. apply elem_of_list_to_set, elem_of_enum. Qed.
Global Instance set_unfold_fin_to_set a :
SetUnfoldElemOf a (fin_to_set A) True.
SetUnfoldElemOf (C:=C) a (fin_to_set A) True.
Proof. constructor. split; auto using elem_of_fin_to_set. Qed.
End fin_to_set.
......
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