X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Flib%2Fexteq.ma;h=148cbc51232a0327b4200ed533ee107a1e62ebf1;hp=5b655e686a5cec35230bedbe9bc819e9d717ed6e;hb=ae626612bff9c3746dd7647bbada791c737e348c;hpb=4d232392091ee233afc26ecf3120dd5f5c6a33c8 diff --git a/matita/matita/contribs/lambdadelta/ground/lib/exteq.ma b/matita/matita/contribs/lambdadelta/ground/lib/exteq.ma index 5b655e686..148cbc512 100644 --- a/matita/matita/contribs/lambdadelta/ground/lib/exteq.ma +++ b/matita/matita/contribs/lambdadelta/ground/lib/exteq.ma @@ -15,7 +15,7 @@ include "ground/notation/relations/doteq_4.ma". include "ground/lib/relations.ma". -(* EXTENSIONAL EQUIVALENCE **************************************************) +(* EXTENSIONAL EQUIVALENCE FOR FUNCTIONS ************************************) definition exteq (A,B:Type[0]): relation (A → B) ≝ λf1,f2. ∀a. f1 a = f2 a. @@ -44,7 +44,7 @@ lemma exteq_canc_sn (A) (B): left_cancellable … (exteq A B). lemma exteq_canc_dx (A) (B): right_cancellable … (exteq A B). /2 width=1 by exteq_repl/ qed-. -(* Constructions with function composition **********************************) +(* Constructions with compose ***********************************************) lemma compose_repl_fwd_dx (A) (B) (C) (g) (f1) (f2): f1 ≐{A,B} f2 → g ∘ f1 ≐{A,C} g ∘ f2.