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

fix build with Coq 8.10 and newer

parent 1e481bde
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
theories/algebra/namespace_map.v
+ 1
− 1
View file @ 47f304f6
...@@ -67,7 +67,7 @@ Canonical Structure namespace_mapC := ...@@ -67,7 +67,7 @@ Canonical Structure namespace_mapC :=
Global Instance NamespaceMap_discrete a b : Global Instance NamespaceMap_discrete a b :
Discrete a → Discrete b → Discrete (NamespaceMap a b). Discrete a → Discrete b → Discrete (NamespaceMap a b).
Proof. by intros ?? [??] [??]; split; apply: discrete. Qed. Proof. intros ?? [??] [??]; split; unfold_leibniz; by eapply discrete. Qed.
Global Instance namespace_map_ofe_discrete : Global Instance namespace_map_ofe_discrete :
OfeDiscrete A → OfeDiscrete namespace_mapC. OfeDiscrete A → OfeDiscrete namespace_mapC.
Proof. intros ? [??]; apply _. Qed. Proof. intros ? [??]; apply _. Qed.
......
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