]> matita.cs.unibo.it Git - helm.git/blob - matita/contribs/CoRN-Decl/model/rings/Qring.ma
- components: composed coercions mus be generated with current base uri
[helm.git] / matita / contribs / CoRN-Decl / model / rings / Qring.ma
1 (**************************************************************************)
2 (*       ___                                                              *)
3 (*      ||M||                                                             *)
4 (*      ||A||       A project by Andrea Asperti                           *)
5 (*      ||T||                                                             *)
6 (*      ||I||       Developers:                                           *)
7 (*      ||T||         The HELM team.                                      *)
8 (*      ||A||         http://helm.cs.unibo.it                             *)
9 (*      \   /                                                             *)
10 (*       \ /        This file is distributed under the terms of the       *)
11 (*        v         GNU General Public License Version 2                  *)
12 (*                                                                        *)
13 (**************************************************************************)
14
15 (* This file was automatically generated: do not edit *********************)
16
17 set "baseuri" "cic:/matita/CoRN-Decl/model/rings/Qring".
18
19 include "CoRN.ma".
20
21 (* $Id: Qring.v,v 1.8 2004/04/23 10:01:03 lcf Exp $ *)
22
23 include "model/abgroups/Qabgroup.ma".
24
25 include "algebra/CRings.ma".
26
27 include "model/rings/Zring.ma".
28
29 (*#* **Example of a ring: $\langle$#⟨#[Q],[[+]],[[*]]$\rangle$#⟩#
30 Because [Q] forms an abelian group with addition, a monoid with 
31 multiplication and it satisfies the distributive law, it is a ring.
32 *)
33
34 inline "cic:/CoRN/model/rings/Qring/Q_mult_plus_is_dist.con".
35
36 inline "cic:/CoRN/model/rings/Qring/Q_is_CRing.con".
37
38 inline "cic:/CoRN/model/rings/Qring/Q_as_CRing.con".
39
40 (*#* The following lemmas are used in the proof that [Q] is Archimeadian.
41 *)
42
43 inline "cic:/CoRN/model/rings/Qring/injz_Nring.con".
44
45 inline "cic:/CoRN/model/rings/Qring/injZ_eq.con".
46
47 inline "cic:/CoRN/model/rings/Qring/nring_Q.con".
48