1 /*
2     Copyright (C) 2011 Sebastian Pancratz
3 
4     This file is part of FLINT.
5 
6     FLINT is free software: you can redistribute it and/or modify it under
7     the terms of the GNU Lesser General Public License (LGPL) as published
8     by the Free Software Foundation; either version 2.1 of the License, or
9     (at your option) any later version.  See <http://www.gnu.org/licenses/>.
10 */
11 
12 #include "fmpz_vec.h"
13 #include "padic.h"
14 #include "qadic.h"
15 
qadic_ctx_clear(qadic_ctx_t ctx)16 void qadic_ctx_clear(qadic_ctx_t ctx)
17 {
18     padic_ctx_clear(&ctx->pctx);
19     _fmpz_vec_clear(ctx->a, ctx->len);
20     flint_free(ctx->j);
21     flint_free(ctx->var);
22 }
23 
24