From 500fb40a37455123d888cc6a2b595319dcbe8d67 Mon Sep 17 00:00:00 2001 From: herbelin Date: Mon, 27 Nov 2000 12:43:43 +0000 Subject: Remettre une section dans fast_integer pour contourner un bug de définition locale git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@990 85f007b7-540e-0410-9357-904b9bb8a0f7 --- theories/Zarith/fast_integer.v | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/theories/Zarith/fast_integer.v b/theories/Zarith/fast_integer.v index 93b574f969..aaf27e0083 100644 --- a/theories/Zarith/fast_integer.v +++ b/theories/Zarith/fast_integer.v @@ -14,6 +14,8 @@ Require Plus. Require Mult. Require Minus. +Section fast_integer. + Inductive positive : Set := xI : positive -> positive | xO : positive -> positive @@ -1439,3 +1441,5 @@ Intros x y;Case x;Case y; [ | Unfold Zcompare; Intros q p; Rewrite <- ZC4; Intros H; Exists (true_sub q p); Simpl; Rewrite (ZC1 q p H); Trivial with arith]. Save. + +End fast_integer. \ No newline at end of file -- cgit v1.2.3