diff options
Diffstat (limited to 'theories/Numbers/Natural')
| -rw-r--r-- | theories/Numbers/Natural/Binary/NBinary.v | 2 | ||||
| -rw-r--r-- | theories/Numbers/Natural/Peano/NPeano.v | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/theories/Numbers/Natural/Binary/NBinary.v b/theories/Numbers/Natural/Binary/NBinary.v index 93922aa437..7211112f26 100644 --- a/theories/Numbers/Natural/Binary/NBinary.v +++ b/theories/Numbers/Natural/Binary/NBinary.v @@ -31,7 +31,7 @@ Qed. (** Basic operations. *) -Instance eq_equiv : Equivalence (@eq N). +Definition eq_equiv : Equivalence (@eq N) := eq_equivalence. Local Obligation Tactic := simpl_relation. Program Instance succ_wd : Proper (eq==>eq) Nsucc. Program Instance pred_wd : Proper (eq==>eq) Npred. diff --git a/theories/Numbers/Natural/Peano/NPeano.v b/theories/Numbers/Natural/Peano/NPeano.v index 962bc8de0b..d42bb810d2 100644 --- a/theories/Numbers/Natural/Peano/NPeano.v +++ b/theories/Numbers/Natural/Peano/NPeano.v @@ -27,7 +27,7 @@ Qed. (** Basic operations. *) -Instance eq_equiv : Equivalence (@eq nat). +Definition eq_equiv : Equivalence (@eq nat) := eq_equivalence. Local Obligation Tactic := simpl_relation. Program Instance succ_wd : Proper (eq==>eq) S. Program Instance pred_wd : Proper (eq==>eq) pred. |