diff options
author | Stephane Glondu <steph@glondu.net> | 2012-12-29 10:57:43 +0100 |
---|---|---|
committer | Stephane Glondu <steph@glondu.net> | 2012-12-29 10:57:43 +0100 |
commit | bf12eb93f3f6a6a824a10878878fadd59745aae0 (patch) | |
tree | 279f64f4b7e4804415ab5731cc7aaa8a4fcfe074 /theories/ZArith/Int.v | |
parent | e0d682ec25282a348d35c5b169abafec48555690 (diff) |
Imported Upstream version 8.4pl1dfsgupstream/8.4pl1dfsg
Diffstat (limited to 'theories/ZArith/Int.v')
-rw-r--r-- | theories/ZArith/Int.v | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/theories/ZArith/Int.v b/theories/ZArith/Int.v index 384c046f..99ecd150 100644 --- a/theories/ZArith/Int.v +++ b/theories/ZArith/Int.v @@ -25,9 +25,6 @@ Module Type Int. Parameter t : Set. Bind Scope Int_scope with t. - (** For compatibility *) - Definition int := t. - Parameter i2z : t -> Z. Parameter _0 : t. @@ -362,7 +359,6 @@ End MoreInt. Module Z_as_Int <: Int. Local Open Scope Z_scope. Definition t := Z. - Definition int := t. Definition _0 := 0. Definition _1 := 1. Definition _2 := 2. @@ -375,7 +371,7 @@ Module Z_as_Int <: Int. Definition gt_le_dec := Z_gt_le_dec. Definition ge_lt_dec := Z_ge_lt_dec. Definition eq_dec := Z.eq_dec. - Definition i2z : int -> Z := fun n => n. + Definition i2z : t -> Z := fun n => n. Lemma i2z_eq : forall n p, i2z n=i2z p -> n = p. Proof. auto. Qed. Lemma i2z_0 : i2z _0 = 0. Proof. auto. Qed. Lemma i2z_1 : i2z _1 = 1. Proof. auto. Qed. |