From e1cad068ffc188d06c37f46e1bf6e7b57e02e219 Mon Sep 17 00:00:00 2001 From: letouzey Date: Fri, 17 Dec 2010 21:00:26 +0000 Subject: Cosmetic : let's take advantage of the n-ary exists notation git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13721 85f007b7-540e-0410-9357-904b9bb8a0f7 --- theories/Numbers/NatInt/NZDomain.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'theories/Numbers/NatInt/NZDomain.v') diff --git a/theories/Numbers/NatInt/NZDomain.v b/theories/Numbers/NatInt/NZDomain.v index 2ab7413e3..9c01ba8cd 100644 --- a/theories/Numbers/NatInt/NZDomain.v +++ b/theories/Numbers/NatInt/NZDomain.v @@ -59,7 +59,7 @@ Module NZDomainProp (Import NZ:NZDomainSig'). (** We prove that any points in NZ have a common descendant by [succ] *) -Definition common_descendant n m := exists k, exists l, (S^k) n == (S^l) m. +Definition common_descendant n m := exists k l, (S^k) n == (S^l) m. Instance common_descendant_wd : Proper (eq==>eq==>iff) common_descendant. Proof. -- cgit v1.2.3