X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Fhigher_order_defs%2Ffunctions.ma;h=e14b38db6b8c6ff15d8cb15c548f33e6b42b6c36;hb=82d4772ee9ac860f0a99b774612d2cf19838bb4b;hp=195cbfc171be63395d565d6f6adde9566fd25548;hpb=80ea6f314e89d9d280338c41860cb04949319629;p=helm.git diff --git a/helm/software/matita/library/higher_order_defs/functions.ma b/helm/software/matita/library/higher_order_defs/functions.ma index 195cbfc17..e14b38db6 100644 --- a/helm/software/matita/library/higher_order_defs/functions.ma +++ b/helm/software/matita/library/higher_order_defs/functions.ma @@ -18,8 +18,7 @@ definition compose \def \lambda A,B,C:Type.\lambda f:(B\to C).\lambda g:(A\to B).\lambda x:A. f (g x). -interpretation "function composition" 'compose f g = - (cic:/matita/higher_order_defs/functions/compose.con _ _ _ f g). +interpretation "function composition" 'compose f g = (compose ? ? ? f g). definition injective: \forall A,B:Type.\forall f:A \to B.Prop \def \lambda A,B.\lambda f.