X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FCoRN-Decl%2Ffta%2FFTA.ma;fp=helm%2Fsoftware%2Fmatita%2Fcontribs%2FCoRN-Decl%2Ffta%2FFTA.ma;h=3060032a79dda5d853018b59a468c18ec76e6bf2;hb=3199f2a8428b5d19a3a803c1b03d9f90e4120f74;hp=0000000000000000000000000000000000000000;hpb=438a29376390222b94c1fe9772917c3aad50d42e;p=helm.git

diff --git a/helm/software/matita/contribs/CoRN-Decl/fta/FTA.ma b/helm/software/matita/contribs/CoRN-Decl/fta/FTA.ma
new file mode 100644
index 000000000..3060032a7
--- /dev/null
+++ b/helm/software/matita/contribs/CoRN-Decl/fta/FTA.ma
@@ -0,0 +1,99 @@
+(**************************************************************************)
+(*       ___                                                              *)
+(*      ||M||                                                             *)
+(*      ||A||       A project by Andrea Asperti                           *)
+(*      ||T||                                                             *)
+(*      ||I||       Developers:                                           *)
+(*      ||T||         The HELM team.                                      *)
+(*      ||A||         http://helm.cs.unibo.it                             *)
+(*      \   /                                                             *)
+(*       \ /        This file is distributed under the terms of the       *)
+(*        v         GNU General Public License Version 2                  *)
+(*                                                                        *)
+(**************************************************************************)
+
+(* This file was automatically generated: do not edit *********************)
+
+set "baseuri" "cic:/matita/CoRN-Decl/fta/FTA".
+
+(* $Id: FTA.v,v 1.6 2004/04/23 10:00:57 lcf Exp $ *)
+
+(* INCLUDE
+CPoly_Rev
+*)
+
+(* INCLUDE
+FTAreg
+*)
+
+(*#* * Fundamental Theorem of Algebra
+%\begin{convention}% Let [n:nat] and [f] be a complex polynomial of
+degree [(S n)].
+%\end{convention}%
+*)
+
+(* UNEXPORTED
+Section FTA_reg'.
+*)
+
+inline cic:/CoRN/fta/FTA/f.var.
+
+inline cic:/CoRN/fta/FTA/n.var.
+
+inline cic:/CoRN/fta/FTA/f_degree.var.
+
+inline cic:/CoRN/fta/FTA/FTA_reg'.con.
+
+(* UNEXPORTED
+End FTA_reg'.
+*)
+
+(*#*
+%\begin{convention}% Let [n:nat], [f] be a complex polynomial of degree
+less than or equal to [(S n)] and [c] be a complex number such that
+[f!c  [#]  Zero].
+%\end{convention}%
+*)
+
+(* UNEXPORTED
+Section FTA_1.
+*)
+
+inline cic:/CoRN/fta/FTA/f.var.
+
+inline cic:/CoRN/fta/FTA/n.var.
+
+inline cic:/CoRN/fta/FTA/f_degree.var.
+
+inline cic:/CoRN/fta/FTA/c.var.
+
+inline cic:/CoRN/fta/FTA/f_c.var.
+
+inline cic:/CoRN/fta/FTA/FTA_1a.con.
+
+inline cic:/CoRN/fta/FTA/g.con.
+
+inline cic:/CoRN/fta/FTA/FTA_1b.con.
+
+inline cic:/CoRN/fta/FTA/FTA_1.con.
+
+inline cic:/CoRN/fta/FTA/FTA_1'.con.
+
+(* UNEXPORTED
+End FTA_1.
+*)
+
+(* UNEXPORTED
+Section Fund_Thm_Alg.
+*)
+
+inline cic:/CoRN/fta/FTA/FTA'.con.
+
+inline cic:/CoRN/fta/FTA/FTA.con.
+
+inline cic:/CoRN/fta/FTA/FTA_a_la_Henk.con.
+
+(* UNEXPORTED
+End Fund_Thm_Alg.
+*)
+