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) 2012 Lina Kulakova
7
8 This file is part of FLINT.
9
10 FLINT is free software: you can redistribute it and/or modify it under
11 the terms of the GNU Lesser General Public License (LGPL) as published
12 by the Free Software Foundation; either version 2.1 of the License, or
13 (at your option) any later version. See <https://www.gnu.org/licenses/>.
14 */
15
16 #include <gmp.h>
17 #include "flint.h"
18 #include "fmpz_mod_poly.h"
19
20 void
fmpz_mod_poly_factor_concat(fmpz_mod_poly_factor_t res,const fmpz_mod_poly_factor_t fac,const fmpz_mod_ctx_t ctx)21 fmpz_mod_poly_factor_concat(fmpz_mod_poly_factor_t res,
22 const fmpz_mod_poly_factor_t fac, const fmpz_mod_ctx_t ctx)
23 {
24 slong i;
25
26 for (i = 0; i < fac->num; i++)
27 fmpz_mod_poly_factor_insert(res, fac->poly + i, fac->exp[i], ctx);
28 }
29