diff options
Diffstat (limited to 'theories/Numbers/Integer')
-rw-r--r-- | theories/Numbers/Integer/BigZ/BigZ.v | 4 | ||||
-rw-r--r-- | theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v | 18 |
2 files changed, 11 insertions, 11 deletions
diff --git a/theories/Numbers/Integer/BigZ/BigZ.v b/theories/Numbers/Integer/BigZ/BigZ.v index 6e8ca37ca..2e7604b0d 100644 --- a/theories/Numbers/Integer/BigZ/BigZ.v +++ b/theories/Numbers/Integer/BigZ/BigZ.v @@ -46,11 +46,11 @@ Notation "x > y" := (BigZ.lt y x)(only parsing) : bigZ_scope. Notation "x >= y" := (BigZ.le y x)(only parsing) : bigZ_scope. Notation "[ i ]" := (BigZ.to_Z i) : bigZ_scope. -Open Scope bigZ_scope. +Local Open Scope bigZ_scope. (** Some additional results about [BigZ] *) -Theorem spec_to_Z: forall n:bigZ, +Theorem spec_to_Z: forall n : bigZ, BigN.to_Z (BigZ.to_N n) = ((Zsgn [n]) * [n])%Z. Proof. intros n; case n; simpl; intros p; diff --git a/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v b/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v index e2be10ad9..d3f4776a6 100644 --- a/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v +++ b/theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v @@ -19,15 +19,15 @@ Module ZSig_ZAxioms (Z:ZType) <: ZAxiomsSig. Delimit Scope NumScope with Num. Bind Scope NumScope with Z.t. Local Open Scope NumScope. -Notation "[ x ]" := (Z.to_Z x) : NumScope. -Infix "==" := Z.eq (at level 70) : NumScope. -Notation "0" := Z.zero : NumScope. -Infix "+" := Z.add : NumScope. -Infix "-" := Z.sub : NumScope. -Infix "*" := Z.mul : NumScope. -Notation "- x" := (Z.opp x) : NumScope. -Infix "<=" := Z.le : NumScope. -Infix "<" := Z.lt : NumScope. +Local Notation "[ x ]" := (Z.to_Z x) : NumScope. +Local Infix "==" := Z.eq (at level 70) : NumScope. +Local Notation "0" := Z.zero : NumScope. +Local Infix "+" := Z.add : NumScope. +Local Infix "-" := Z.sub : NumScope. +Local Infix "*" := Z.mul : NumScope. +Local Notation "- x" := (Z.opp x) : NumScope. +Local Infix "<=" := Z.le : NumScope. +Local Infix "<" := Z.lt : NumScope. Hint Rewrite Z.spec_0 Z.spec_1 Z.spec_add Z.spec_sub Z.spec_pred Z.spec_succ |