X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2Fprocedural%2FCoq%2FLogic%2FChoiceFacts.mma;h=ea62f258ea916419225b71c4b456f48644de434c;hb=0b76904a3f10bfd6390d26172fd6979626bd72f4;hp=83fa4cff05b1a000658406d18b7ea4d0faf957e3;hpb=29714797b01e0ac8c22e4df2827b1785a759f482;p=helm.git

diff --git a/helm/software/matita/contribs/procedural/Coq/Logic/ChoiceFacts.mma b/helm/software/matita/contribs/procedural/Coq/Logic/ChoiceFacts.mma
index 83fa4cff0..ea62f258e 100644
--- a/helm/software/matita/contribs/procedural/Coq/Logic/ChoiceFacts.mma
+++ b/helm/software/matita/contribs/procedural/Coq/Logic/ChoiceFacts.mma
@@ -16,28 +16,30 @@
 
 include "Coq.ma".
 
-(*#**********************************************************************)
+include "Init/Prelude.ma".
 
-(*  v      *   The Coq Proof Assistant  /  The Coq Development Team    *)
+(*#***********************************************************************)
 
-(* <O___,, *        INRIA-Rocquencourt  &  LRI-CNRS-Orsay              *)
+(*  v      *   The Coq Proof Assistant  /  The Coq Development Team     *)
 
-(*   \VV/  *************************************************************)
+(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *)
 
-(*    //   *      This file is distributed under the terms of the      *)
+(*   \VV/  **************************************************************)
 
-(*         *       GNU Lesser General Public License Version 2.1       *)
+(*    //   *      This file is distributed under the terms of the       *)
 
-(*#**********************************************************************)
+(*         *       GNU Lesser General Public License Version 2.1        *)
 
-(*i $Id: ChoiceFacts.v,v 1.7 2003/12/24 10:27:05 barras Exp $ i*)
+(*#***********************************************************************)
 
-(* We show that the functional formulation of the axiom of Choice
+(*i $Id: ChoiceFacts.v,v 1.7.2.2 2004/08/01 09:29:59 herbelin Exp $ i*)
+
+(*#* We show that the functional formulation of the axiom of Choice
    (usual formulation in type theory) is equivalent to its relational
    formulation (only formulation of set theory) + the axiom of
    (parametric) definite description (aka axiom of unique choice) *)
 
-(* This shows that the axiom of choice can be assumed (under its
+(*#* This shows that the axiom of choice can be assumed (under its
    relational formulation) without known inconsistency with classical logic,
    though definite description conflicts with classical logic *)
 
@@ -55,7 +57,7 @@ inline procedural "cic:/Coq/Logic/ChoiceFacts/funct_choice_imp_description.con"
 
 inline procedural "cic:/Coq/Logic/ChoiceFacts/FunChoice_Equiv_RelChoice_and_ParamDefinDescr.con" as theorem.
 
-(* We show that the guarded relational formulation of the axiom of Choice
+(*#* We show that the guarded relational formulation of the axiom of Choice
    comes from the non guarded formulation in presence either of the
    independance of premises or proof-irrelevance *)