From 113b703a695acbe31ac6dd6a8c4aa94f6fda7545 Mon Sep 17 00:00:00 2001 From: Stephane Glondu Date: Mon, 8 Sep 2008 00:15:04 +0200 Subject: Imported Upstream version 8.2~beta4.svn20080907+dfsg --- theories/FSets/FMapFacts.v | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'theories') diff --git a/theories/FSets/FMapFacts.v b/theories/FSets/FMapFacts.v index 94444f5b..05cd1892 100644 --- a/theories/FSets/FMapFacts.v +++ b/theories/FSets/FMapFacts.v @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (***********************************************************************) -(* $Id: FMapFacts.v 11282 2008-07-28 11:51:53Z msozeau $ *) +(* $Id: FMapFacts.v 11359 2008-09-04 09:43:36Z notin $ *) (** * Finite maps library *) @@ -975,7 +975,7 @@ Module WProperties (E:DecidableType)(M:WSfun E). fold (fun k e b => if f k e then true else b) m false. Definition partition (f : key -> elt -> bool)(m : t elt) := - (filter f m, filter (fun k e => negb (f k e))). + (filter f m, filter (fun k e => negb (f k e)) m). Section Specs. Variable f : key -> elt -> bool. -- cgit v1.2.3