From 75681234e0ba2ae283cc22c2c3e0c4045b205879 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sun, 27 Apr 2008 16:23:04 +0000
Subject: Report des quelques modifs faites avec Pierre Letouzey sur les
 fichiers en attendant une intégration à theories/Numbers

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10857 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 theories/Ints/num/QMake_base.v | 23 +++++++++++++++++++----
 1 file changed, 19 insertions(+), 4 deletions(-)

(limited to 'theories/Ints/num/QMake_base.v')

diff --git a/theories/Ints/num/QMake_base.v b/theories/Ints/num/QMake_base.v
index f82c5d25b2..0cd2d2122f 100644
--- a/theories/Ints/num/QMake_base.v
+++ b/theories/Ints/num/QMake_base.v
@@ -1,15 +1,30 @@
-Require Export BigN.
-Require Export BigZ.
+(************************************************************************)
+(*  v      *   The Coq Proof Assistant  /  The Coq Development Team     *)
+(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *)
+(*   \VV/  **************************************************************)
+(*    //   *      This file is distributed under the terms of the       *)
+(*         *       GNU Lesser General Public License Version 2.1        *)
+(************************************************************************)
+
+(* $Id:$ *)
 
+(** * An implementation of rational numbers based on big integers *)
 
+(** 
+- Authors: Benjamin Grégoire, Laurent Théry
+- Institution: INRIA
+- Date: 2007
+*)
+
+Require Export BigN.
+Require Export BigZ.
 
 (* Basic type for Q: a Z or a pair of a Z and an N *)
+
 Inductive q_type : Set := 
  | Qz : BigZ.t -> q_type
  | Qq : BigZ.t -> BigN.t -> q_type.
 
-
-
 Definition print_type x := 
  match x with
  | Qz _ => Z
-- 
cgit v1.2.3