From 9fcbb4ea786534982301f624d65e7d53e2f201be Mon Sep 17 00:00:00 2001 From: herbelin Date: Sat, 28 Feb 2004 13:03:01 +0000 Subject: MAJ Commentaires git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5397 85f007b7-540e-0410-9357-904b9bb8a0f7 --- theories/Init/Logic.v | 2 +- theories7/Init/Logic.v | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/theories/Init/Logic.v b/theories/Init/Logic.v index 65fe059be8..9b8f4cfa0d 100755 --- a/theories/Init/Logic.v +++ b/theories/Init/Logic.v @@ -115,7 +115,7 @@ Inductive ex2 (A:Type) (P Q:A -> Prop) : Prop := Definition all (A:Type) (P:A -> Prop) := forall x:A, P x. -(*Rule order is important to give printing priority to fully typed ALL and EX*) +(* Rule order is important to give printing priority to fully typed exists *) Notation "'exists' x , p" := (ex (fun x => p)) (at level 200, x ident) : type_scope. diff --git a/theories7/Init/Logic.v b/theories7/Init/Logic.v index 84a545f3f1..f21ac61318 100755 --- a/theories7/Init/Logic.v +++ b/theories7/Init/Logic.v @@ -121,7 +121,7 @@ Inductive ex2 [A:Type;P,Q:A->Prop] : Prop Definition all := [A:Type][P:A->Prop](x:A)(P x). -(*Rule order is important to give printing priority to fully typed ALL and EX*) +(* Rule order is important to give printing priority to fully typed exists *) V7only [ Notation Ex := (ex ?). ]. Notation "'EX' x | p" := (ex ? [x]p) -- cgit v1.2.3