1 /*
2 Copyright (C) 2012 Fredrik Johansson
3 Copyright (C) 2015 Arb authors
4
5 This file is part of Arb.
6
7 Arb is free software: you can redistribute it and/or modify it under
8 the terms of the GNU Lesser General Public License (LGPL) as published
9 by the Free Software Foundation; either version 2.1 of the License, or
10 (at your option) any later version. See <http://www.gnu.org/licenses/>.
11 */
12
13 #include "acb_poly.h"
14
15 void
acb_poly_fprintd(FILE * file,const acb_poly_t poly,slong digits)16 acb_poly_fprintd(FILE * file, const acb_poly_t poly, slong digits)
17 {
18 slong i;
19
20 flint_fprintf(file, "[");
21
22 for (i = 0; i < poly->length; i++)
23 {
24 acb_fprintd(file, poly->coeffs + i, digits);
25 if (i + 1 < poly->length)
26 flint_fprintf(file, "\n");
27 }
28
29 flint_fprintf(file, "]");
30 }
31