X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcontribs%2FCoRN-Decl%2Fftc%2FRefSeparating.ma;h=da18b29e94731a1bca558a88dcd03805efc07f5c;hb=0a9ed4329c069d2e06902934b6d1d58d3690959c;hp=7ad89a0f232532fe4de854661f743a70de24ef7d;hpb=f104e234238586ac846881feb30e1b56a509cfd3;p=helm.git

diff --git a/matita/contribs/CoRN-Decl/ftc/RefSeparating.ma b/matita/contribs/CoRN-Decl/ftc/RefSeparating.ma
index 7ad89a0f2..da18b29e9 100644
--- a/matita/contribs/CoRN-Decl/ftc/RefSeparating.ma
+++ b/matita/contribs/CoRN-Decl/ftc/RefSeparating.ma
@@ -27,50 +27,50 @@ include "ftc/COrdLemmas.ma".
 include "ftc/Partitions.ma".
 
 (* UNEXPORTED
-Section Separating_Partition.
+Section Separating_Partition
 *)
 
-inline "cic:/CoRN/ftc/RefSeparating/a.var".
+alias id "a" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/a.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/b.var".
+alias id "b" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/b.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/Hab.var".
+alias id "Hab" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/Hab.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/I.con".
+inline "cic:/CoRN/ftc/RefSeparating/Separating_Partition/I.con" "Separating_Partition__".
 
-inline "cic:/CoRN/ftc/RefSeparating/F.var".
+alias id "F" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/F.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/contF.var".
+alias id "contF" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/contF.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/incF.var".
+alias id "incF" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/incF.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/Hab'.var".
+alias id "Hab'" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/Hab'.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/n.var".
+alias id "n" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/n.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/P.var".
+alias id "P" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/P.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/alpha.var".
+alias id "alpha" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/alpha.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/Halpha.var".
+alias id "Halpha" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/Halpha.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/csi.var".
+alias id "csi" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/csi.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/Hcsi.var".
+alias id "Hcsi" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/Hcsi.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/M.con".
+inline "cic:/CoRN/ftc/RefSeparating/Separating_Partition/M.con" "Separating_Partition__".
 
 inline "cic:/CoRN/ftc/RefSeparating/RS'_pos_n.con".
 
 inline "cic:/CoRN/ftc/RefSeparating/SPap_n.con".
 
-inline "cic:/CoRN/ftc/RefSeparating/delta.con".
+inline "cic:/CoRN/ftc/RefSeparating/Separating_Partition/delta.con" "Separating_Partition__".
 
 inline "cic:/CoRN/ftc/RefSeparating/RS'_delta_pos.con".
 
 inline "cic:/CoRN/ftc/RefSeparating/RS'_delta_csi.con".
 
-inline "cic:/CoRN/ftc/RefSeparating/Hab''.var".
+alias id "Hab''" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/Hab''.var".
 
 inline "cic:/CoRN/ftc/RefSeparating/sep__part_lemma.con".
 
@@ -98,6 +98,10 @@ inline "cic:/CoRN/ftc/RefSeparating/RS'_m1.con".
 
 inline "cic:/CoRN/ftc/RefSeparating/RS'_m.con".
 
+(* NOTATION
+Notation m := RS'_m.
+*)
+
 inline "cic:/CoRN/ftc/RefSeparating/sep__part_length.con".
 
 inline "cic:/CoRN/ftc/RefSeparating/RS'_m_m1.con".
@@ -130,11 +134,11 @@ inline "cic:/CoRN/ftc/RefSeparating/sep__part_mon.con".
 
 inline "cic:/CoRN/ftc/RefSeparating/sep__part_mon_Mesh.con".
 
-inline "cic:/CoRN/ftc/RefSeparating/g.var".
+alias id "g" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/g.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/gP.var".
+alias id "gP" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/gP.var".
 
-inline "cic:/CoRN/ftc/RefSeparating/gP'.var".
+alias id "gP'" = "cic:/CoRN/ftc/RefSeparating/Separating_Partition/gP'.var".
 
 inline "cic:/CoRN/ftc/RefSeparating/sep__part_pts.con".
 
@@ -148,6 +152,19 @@ inline "cic:/CoRN/ftc/RefSeparating/RS'_Hsep.con".
 
 inline "cic:/CoRN/ftc/RefSeparating/RS'_h.con".
 
+(* NOTATION
+Notation h := RS'_h.
+*)
+
+(* NOTATION
+Notation just1 := (incF _ (Pts_part_lemma _ _ _ _ _ _ gP _ _)).
+*)
+
+(* NOTATION
+Notation just2 :=
+  (incF _ (Pts_part_lemma _ _ _ _ _ _ sep__part_pts_in_Partition _ _)).
+*)
+
 inline "cic:/CoRN/ftc/RefSeparating/sep__part_suRS'_m1.con".
 
 inline "cic:/CoRN/ftc/RefSeparating/sep__part_Sum2.con".
@@ -161,7 +178,7 @@ inline "cic:/CoRN/ftc/RefSeparating/sep__part_aux.con".
 inline "cic:/CoRN/ftc/RefSeparating/sep__part_Sum.con".
 
 (* UNEXPORTED
-End Separating_Partition.
+End Separating_Partition
 *)
 
 (* end hide *)