1 (**************************************************************************)
4 (* ||A|| A project by Andrea Asperti *)
6 (* ||I|| Developers: *)
7 (* ||T|| The HELM team. *)
8 (* ||A|| http://helm.cs.unibo.it *)
10 (* \ / This file is distributed under the terms of the *)
11 (* v GNU General Public License Version 2 *)
13 (**************************************************************************)
15 (* This file was automatically generated: do not edit *********************)
17 set "baseuri" "cic:/matita/CoRN-Decl/fta/CPoly_Shift".
21 (* $Id: CPoly_Shift.v,v 1.4 2004/04/23 10:00:56 lcf Exp $ *)
23 include "complex/CComplex.ma".
25 (*#* * Shifting polynomials
26 This can be done for [CRings] in general, but we do it here
27 only for [CC] because extensionality makes everything much easier,
28 and we only need it for [CC].
35 inline "cic:/CoRN/fta/CPoly_Shift/Shift.con".
37 inline "cic:/CoRN/fta/CPoly_Shift/Shift_apply.con".
40 Hint Resolve Shift_apply: algebra.
43 inline "cic:/CoRN/fta/CPoly_Shift/Shift_wdr.con".
45 inline "cic:/CoRN/fta/CPoly_Shift/Shift_shift.con".
47 inline "cic:/CoRN/fta/CPoly_Shift/Shift_mult.con".
49 inline "cic:/CoRN/fta/CPoly_Shift/Shift_degree_le.con".
51 inline "cic:/CoRN/fta/CPoly_Shift/Shift_monic.con".
58 Hint Resolve Shift_wdr: algebra_c.
62 Hint Resolve Shift_apply Shift_shift Shift_mult: algebra.