1 /*
2 Copyright (C) 2007 David Howden
3 Copyright (C) 2007, 2008, 2009, 2010 William Hart
4 Copyright (C) 2008 Richard Howell-Peak
5 Copyright (C) 2011 Fredrik Johansson
6 Copyright (C) 2011 Sebastian Pancratz
7 Copyright (C) 2013 Mike Hansen
8
9 This file is part of FLINT.
10
11 FLINT is free software: you can redistribute it and/or modify it under
12 the terms of the GNU Lesser General Public License (LGPL) as published
13 by the Free Software Foundation; either version 2.1 of the License, or
14 (at your option) any later version. See <http://www.gnu.org/licenses/>.
15 */
16
17 #ifdef T
18
19 #include "templates.h"
20
21 void
TEMPLATE(T,poly_factor_concat)22 TEMPLATE(T, poly_factor_concat) (TEMPLATE(T, poly_factor_t) res,
23 const TEMPLATE(T, poly_factor_t) fac,
24 const TEMPLATE(T, ctx_t) ctx)
25 {
26 slong i;
27
28 for (i = 0; i < fac->num; i++)
29 TEMPLATE(T, poly_factor_insert) (res, fac->poly + i, fac->exp[i], ctx);
30 }
31
32
33 #endif
34