From 61ccbc81a2f3b4662ed4a2bad9d07d2003dda3a2 Mon Sep 17 00:00:00 2001 From: glondu Date: Thu, 17 Sep 2009 15:58:14 +0000 Subject: Delete trailing whitespaces in all *.{v,ml*} files git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12337 85f007b7-540e-0410-9357-904b9bb8a0f7 --- theories/Program/Basics.v | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'theories/Program/Basics.v') diff --git a/theories/Program/Basics.v b/theories/Program/Basics.v index 9335f48348..c547568816 100644 --- a/theories/Program/Basics.v +++ b/theories/Program/Basics.v @@ -8,7 +8,7 @@ (* $Id$ *) (** Standard functions and combinators. - + Proofs about them require functional extensionality and can be found in [Combinators]. Author: Matthieu Sozeau @@ -21,12 +21,12 @@ Implicit Arguments id [[A]]. (** Function composition. *) -Definition compose {A B C} (g : B -> C) (f : A -> B) := +Definition compose {A B C} (g : B -> C) (f : A -> B) := fun x : A => g (f x). Hint Unfold compose. -Notation " g ∘ f " := (compose g f) +Notation " g ∘ f " := (compose g f) (at level 40, left associativity) : program_scope. Open Local Scope program_scope. -- cgit v1.2.3