- transcript: patched to generate aliases instead of inlined variables

[helm.git] / helm / software / matita / contribs / CoRN-Decl / fta / FTA.ma

diff --git a/helm/software/matita/contribs/CoRN-Decl/fta/FTA.ma b/helm/software/matita/contribs/CoRN-Decl/fta/FTA.ma
index 8f8bd91b522e4f386409415581c86e5fc9a91207..5b97159c0afc4324c201b704d547c04bfc9930a3 100644 (file)
--- a/helm/software/matita/contribs/CoRN-Decl/fta/FTA.ma
+++ b/helm/software/matita/contribs/CoRN-Decl/fta/FTA.ma
@@ -16,7 +16,7 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/fta/FTA".
 
-include "CoRN_notation.ma".
+include "CoRN.ma".
 
 (* $Id: FTA.v,v 1.6 2004/04/23 10:00:57 lcf Exp $ *)
 
@@ -31,19 +31,19 @@ degree [(S n)].
 *)
 
 (* UNEXPORTED
-Section FTA_reg'.
+Section FTA_reg'
 *)
 
-inline "cic:/CoRN/fta/FTA/f.var".
+alias id "f" = "cic:/CoRN/fta/FTA/FTA_reg'/f.var".
 
-inline "cic:/CoRN/fta/FTA/n.var".
+alias id "n" = "cic:/CoRN/fta/FTA/FTA_reg'/n.var".
 
-inline "cic:/CoRN/fta/FTA/f_degree.var".
+alias id "f_degree" = "cic:/CoRN/fta/FTA/FTA_reg'/f_degree.var".
 
 inline "cic:/CoRN/fta/FTA/FTA_reg'.con".
 
 (* UNEXPORTED
-End FTA_reg'.
+End FTA_reg'
 *)
 
 (*#*
@@ -54,22 +54,22 @@ less than or equal to [(S n)] and [c] be a complex number such that
 *)
 
 (* UNEXPORTED
-Section FTA_1.
+Section FTA_1
 *)
 
-inline "cic:/CoRN/fta/FTA/f.var".
+alias id "f" = "cic:/CoRN/fta/FTA/FTA_1/f.var".
 
-inline "cic:/CoRN/fta/FTA/n.var".
+alias id "n" = "cic:/CoRN/fta/FTA/FTA_1/n.var".
 
-inline "cic:/CoRN/fta/FTA/f_degree.var".
+alias id "f_degree" = "cic:/CoRN/fta/FTA/FTA_1/f_degree.var".
 
-inline "cic:/CoRN/fta/FTA/c.var".
+alias id "c" = "cic:/CoRN/fta/FTA/FTA_1/c.var".
 
-inline "cic:/CoRN/fta/FTA/f_c.var".
+alias id "f_c" = "cic:/CoRN/fta/FTA/FTA_1/f_c.var".
 
 inline "cic:/CoRN/fta/FTA/FTA_1a.con".
 
-inline "cic:/CoRN/fta/FTA/g.con".
+inline "cic:/CoRN/fta/FTA/FTA_1/g.con" "FTA_1__".
 
 inline "cic:/CoRN/fta/FTA/FTA_1b.con".
 
@@ -78,11 +78,11 @@ inline "cic:/CoRN/fta/FTA/FTA_1.con".
 inline "cic:/CoRN/fta/FTA/FTA_1'.con".
 
 (* UNEXPORTED
-End FTA_1.
+End FTA_1
 *)
 
 (* UNEXPORTED
-Section Fund_Thm_Alg.
+Section Fund_Thm_Alg
 *)
 
 inline "cic:/CoRN/fta/FTA/FTA'.con".
@@ -92,6 +92,6 @@ inline "cic:/CoRN/fta/FTA/FTA.con".
 inline "cic:/CoRN/fta/FTA/FTA_a_la_Henk.con".
 
 (* UNEXPORTED
-End Fund_Thm_Alg.
+End Fund_Thm_Alg
 *)