diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-05-05 15:12:59 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-05-05 15:12:59 +0000 |
| commit | d2bd5d87d23d443f6e41496bdfe5f8e82d675634 (patch) | |
| tree | d9cb49b25b4e49ccda4dd424ef2595f53d9e61c0 /theories/ZArith/Zeuclid.v | |
| parent | f1c9bb9d37e3bcefb5838c57e7ae45923d99c4ff (diff) | |
Modularization of BinInt, related fixes in the stdlib
All the functions about Z is now in a separated file BinIntDef,
which is Included in BinInt.Z. This BinInt.Z directly
implements ZAxiomsSig, and instantiates derived properties ZProp.
Note that we refer to Z instead of t inside BinInt.Z,
otherwise ring breaks later on @eq Z.t
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14106 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/ZArith/Zeuclid.v')
| -rw-r--r-- | theories/ZArith/Zeuclid.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/theories/ZArith/Zeuclid.v b/theories/ZArith/Zeuclid.v index ece227e10..cd46ea36b 100644 --- a/theories/ZArith/Zeuclid.v +++ b/theories/ZArith/Zeuclid.v @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -Require Import Morphisms BinInt Zdiv_def ZBinary ZDivEucl. +Require Import Morphisms BinInt Zdiv_def ZDivEucl. Local Open Scope Z_scope. (** * Definitions of division for binary integers, Euclid convention. *) @@ -45,8 +45,8 @@ Module ZEuclid. Lemma mod_bound_pos : forall a b, 0<=a -> 0<b -> 0 <= modulo a b < b. Proof. - intros a b _ Hb. rewrite <- (Z.abs_eq b) at 3 by z_order. - apply mod_always_pos. z_order. + intros a b _ Hb. rewrite <- (Z.abs_eq b) at 3 by Z.order. + apply mod_always_pos. Z.order. Qed. Include ZEuclidProp Z Z Z. |