]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/contribs/CoRN-Procedural/ftc/PartInterval.mma
...
[helm.git] / helm / software / matita / contribs / CoRN-Procedural / ftc / PartInterval.mma
index 93c90635606619de3f5a3ba556fadd62fd943386..6f3197b51ccb6f62daf05faa18329c7721b2578b 100644 (file)
@@ -43,13 +43,21 @@ that [I [=] [a,b]] is included in the domain of [F].
 %\end{convention}%
 *)
 
-alias id "F" = "cic:/CoRN/ftc/PartInterval/Conversion/F.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Conversion/F.var
+*)
 
-alias id "a" = "cic:/CoRN/ftc/PartInterval/Conversion/a.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Conversion/a.var
+*)
 
-alias id "b" = "cic:/CoRN/ftc/PartInterval/Conversion/b.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Conversion/b.var
+*)
 
-alias id "Hab" = "cic:/CoRN/ftc/PartInterval/Conversion/Hab.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Conversion/Hab.var
+*)
 
 (* begin hide *)
 
@@ -57,7 +65,9 @@ inline procedural "cic:/CoRN/ftc/PartInterval/Conversion/I.con" "Conversion__" a
 
 (* end hide *)
 
-alias id "Hf" = "cic:/CoRN/ftc/PartInterval/Conversion/Hf.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Conversion/Hf.var
+*)
 
 inline procedural "cic:/CoRN/ftc/PartInterval/IntPartIR_strext.con" as lemma.
 
@@ -80,11 +90,17 @@ To go the other way around, we simply take a setoid function [f] with
 domain [[a,b]] and build the corresponding partial function.
 *)
 
-alias id "a" = "cic:/CoRN/ftc/PartInterval/AntiConversion/a.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/AntiConversion/a.var
+*)
 
-alias id "b" = "cic:/CoRN/ftc/PartInterval/AntiConversion/b.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/AntiConversion/b.var
+*)
 
-alias id "Hab" = "cic:/CoRN/ftc/PartInterval/AntiConversion/Hab.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/AntiConversion/Hab.var
+*)
 
 (* begin hide *)
 
@@ -92,7 +108,9 @@ inline procedural "cic:/CoRN/ftc/PartInterval/AntiConversion/I.con" "AntiConvers
 
 (* end hide *)
 
-alias id "f" = "cic:/CoRN/ftc/PartInterval/AntiConversion/f.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/AntiConversion/f.var
+*)
 
 inline procedural "cic:/CoRN/ftc/PartInterval/PartInt_strext.con" as lemma.
 
@@ -135,17 +153,29 @@ type [I->IR] equal respectively to [F] and [G] in [I].
 %\end{convention}%
 *)
 
-alias id "F" = "cic:/CoRN/ftc/PartInterval/Equivalences/F.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/F.var
+*)
 
-alias id "G" = "cic:/CoRN/ftc/PartInterval/Equivalences/G.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/G.var
+*)
 
-alias id "a" = "cic:/CoRN/ftc/PartInterval/Equivalences/a.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/a.var
+*)
 
-alias id "b" = "cic:/CoRN/ftc/PartInterval/Equivalences/b.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/b.var
+*)
 
-alias id "c" = "cic:/CoRN/ftc/PartInterval/Equivalences/c.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/c.var
+*)
 
-alias id "Hab" = "cic:/CoRN/ftc/PartInterval/Equivalences/Hab.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/Hab.var
+*)
 
 (* begin hide *)
 
@@ -153,13 +183,21 @@ inline procedural "cic:/CoRN/ftc/PartInterval/Equivalences/I.con" "Equivalences_
 
 (* end hide *)
 
-alias id "f" = "cic:/CoRN/ftc/PartInterval/Equivalences/f.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/f.var
+*)
 
-alias id "g" = "cic:/CoRN/ftc/PartInterval/Equivalences/g.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/g.var
+*)
 
-alias id "Ff" = "cic:/CoRN/ftc/PartInterval/Equivalences/Ff.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/Ff.var
+*)
 
-alias id "Gg" = "cic:/CoRN/ftc/PartInterval/Equivalences/Gg.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/Gg.var
+*)
 
 inline procedural "cic:/CoRN/ftc/PartInterval/part_int_const.con" as lemma.
 
@@ -177,9 +215,13 @@ inline procedural "cic:/CoRN/ftc/PartInterval/part_int_nth.con" as lemma.
 
 (* begin show *)
 
-alias id "HG" = "cic:/CoRN/ftc/PartInterval/Equivalences/HG.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/HG.var
+*)
 
-alias id "Hg" = "cic:/CoRN/ftc/PartInterval/Equivalences/Hg.var".
+(* UNEXPORTED
+cic:/CoRN/ftc/PartInterval/Equivalences/Hg.var
+*)
 
 (* end show *)