/* Copyright (C) 2020 Daniel Schultz This file is part of FLINT. FLINT is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License (LGPL) as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. See . */ #include "nmod_mpoly_factor.h" void n_tpoly_fit_length(n_tpoly_t A, slong len) { slong i; if (len <= A->alloc) return; if (len < 2 * A->alloc) len = 2 * A->alloc; if (A->alloc > 0) A->coeffs = (n_bpoly_struct *) flint_realloc(A->coeffs, len * sizeof(n_bpoly_struct)); else A->coeffs = (n_bpoly_struct *) flint_malloc( len * sizeof(n_bpoly_struct)); for (i = A->alloc; i < len; i++) n_bpoly_init(A->coeffs + i); A->alloc = len; } void n_tpoly_clear(n_tpoly_t A) { if (A->alloc > 0) { slong i; for (i = 0; i < A->alloc; i++) n_bpoly_clear(A->coeffs + i); flint_free(A->coeffs); } }