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