From 9a6e3fe764dc2543dfa94de20fe5eec42d6be705 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sat, 29 Nov 2003 17:28:49 +0000
Subject: Remplacement des fichiers .v ancienne syntaxe de theories, contrib et
 states par les fichiers nouvelle syntaxe

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5027 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 theories/Logic/RelationalChoice.v | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

(limited to 'theories/Logic/RelationalChoice.v')

diff --git a/theories/Logic/RelationalChoice.v b/theories/Logic/RelationalChoice.v
index 5addb4d244..c55095e473 100644
--- a/theories/Logic/RelationalChoice.v
+++ b/theories/Logic/RelationalChoice.v
@@ -10,8 +10,11 @@
 
 (* This file axiomatizes the relational form of the axiom of choice *)
 
-Axiom relational_choice :
- (A:Type;B:Type;R: A->B->Prop) 
-  ((x:A)(EX y:B|(R x y)))
-   -> (EXT R':A->B->Prop | 
-         ((x:A)(EX y:B|(R x y)/\(R' x y)/\ ((y':B) (R' x y') -> y=y')))).
+Axiom
+  relational_choice :
+    forall (A B:Type) (R:A -> B -> Prop),
+      (forall x:A,  exists y : B | R x y) ->
+       exists R' : A -> B -> Prop
+      | (forall x:A,
+            exists y : B
+           | R x y /\ R' x y /\ (forall y':B, R' x y' -> y = y')).
\ No newline at end of file
-- 
cgit v1.2.3