X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FCoRN-Decl%2Fftc%2FRefLemma.ma;h=9503e78c139b8b8d21492f1961d51b7705f22631;hb=876f16ec4e9080bad4e39bd9c203d6529dcf4f56;hp=99ca5a648004907b5be4d2226d75eedae6fc25d1;hpb=bb691187f8bbe22ec37ca41f9f3f42f9d8e505df;p=helm.git diff --git a/helm/software/matita/contribs/CoRN-Decl/ftc/RefLemma.ma b/helm/software/matita/contribs/CoRN-Decl/ftc/RefLemma.ma index 99ca5a648..9503e78c1 100644 --- a/helm/software/matita/contribs/CoRN-Decl/ftc/RefLemma.ma +++ b/helm/software/matita/contribs/CoRN-Decl/ftc/RefLemma.ma @@ -16,7 +16,7 @@ set "baseuri" "cic:/matita/CoRN-Decl/ftc/RefLemma". -include "CoRN_notation.ma". +include "CoRN.ma". (* $Id: RefLemma.v,v 1.7 2004/04/23 10:01:00 lcf Exp $ *) @@ -186,8 +186,24 @@ inline "cic:/CoRN/ftc/RefLemma/RL_h.con". inline "cic:/CoRN/ftc/RefLemma/RL_g.con". +(* NOTATION +Notation g := RL_g. +*) + +(* NOTATION +Notation h := RL_h. +*) + inline "cic:/CoRN/ftc/RefLemma/ref_calc1.con". +(* NOTATION +Notation just1 := (incF _ (Pts_part_lemma _ _ _ _ _ _ HfP _ _)). +*) + +(* NOTATION +Notation just2 := (incF _ (Pts_part_lemma _ _ _ _ _ _ HfQ _ _)). +*) + inline "cic:/CoRN/ftc/RefLemma/ref_calc2.con". inline "cic:/CoRN/ftc/RefLemma/ref_calc3.con". @@ -428,6 +444,10 @@ Section Fourth_Refinement_Lemma. inline "cic:/CoRN/ftc/RefLemma/Fa.con". +(* NOTATION +Notation just := (fun z => incF _ (Pts_part_lemma _ _ _ _ _ _ z _ _)). +*) + inline "cic:/CoRN/ftc/RefLemma/RL_sum_lemma_aux.con". (* end hide *)