Remove weird type class constraint in excl.

c2725b24 · Robbert Krebbers · 0c7a5b02 · c2725b24
Commit c2725b24 authored Feb 26, 2016 by Robbert Krebbers
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

algebra/excl.v algebra/excl.v +1 -1

No files found.
--- a/algebra/excl.v
+++ b/algebra/excl.v
@@ -22,7 +22,7 @@ Inductive excl_equiv : Equiv (excl A) :=
  | ExclUnit_equiv : ExclUnit ≡ ExclUnit
  | ExclBot_equiv : ExclBot ≡ ExclBot.
 Existing Instance excl_equiv.
-Inductive excl_dist `{Dist A} : Dist (excl A) :=
+Inductive excl_dist : Dist (excl A) :=
  | Excl_dist (x y : A) n : x ≡{n}≡ y → Excl x ≡{n}≡ Excl y
  | ExclUnit_dist n : ExclUnit ≡{n}≡ ExclUnit
  | ExclBot_dist n : ExclBot ≡{n}≡ ExclBot.