diff options
Diffstat (limited to 'theories/Ints/num/QMake_base.v')
| -rw-r--r-- | theories/Ints/num/QMake_base.v | 23 |
1 files changed, 19 insertions, 4 deletions
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 |