diff options
Diffstat (limited to 'theories/Ints/num/QbiMake.v')
| -rw-r--r-- | theories/Ints/num/QbiMake.v | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/theories/Ints/num/QbiMake.v b/theories/Ints/num/QbiMake.v index 9eb5de5e18..a98fda9d7f 100644 --- a/theories/Ints/num/QbiMake.v +++ b/theories/Ints/num/QbiMake.v @@ -1,7 +1,15 @@ +(************************************************************************) +(* 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 *) +(************************************************************************) + Require Import Bool. Require Import ZArith. Require Import Znumtheory. -Require Import ZAux. +Require Import Zaux. Require Import Arith. Require Export BigN. Require Export BigZ. @@ -12,18 +20,14 @@ Require Import QMake_base. Module Qbi. - (* Troisieme solution : - 0 a de nombreuse representation : - 0, -0, 1/0, ... n/0, - il faut alors faire attention avec la comparaison et l'addition - - Les fonctions de normalization s'effectue seulement si les - nombres sont grands. - *) + (** The notation of a rational number is either an integer x, + interpreted as itself or a pair (x,y) of an integer x and a naturel + number y interpreted as x/y. The pairs (x,0) and (0,y) are all + interpreted as 0. *) Definition t := q_type. - Definition zero:t := Qz BigZ.zero. + Definition zero: t := Qz BigZ.zero. Definition one: t := Qz BigZ.one. Definition minus_one: t := Qz BigZ.minus_one. @@ -1052,7 +1056,3 @@ Module Qbi. End Qbi. - - - - |