/* Copyright (C) 2016 William Hart Copyright (C) 2018 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 "fmpz_mpoly.h" void fmpz_mpoly_gen(fmpz_mpoly_t A, slong var, const fmpz_mpoly_ctx_t ctx) { flint_bitcnt_t bits; bits = mpoly_gen_bits_required(var, ctx->minfo); bits = mpoly_fix_bits(bits, ctx->minfo); fmpz_mpoly_fit_length_reset_bits(A, 1, bits, ctx); fmpz_one(A->coeffs); if (bits <= FLINT_BITS) mpoly_gen_monomial_sp(A->exps, var, bits, ctx->minfo); else mpoly_gen_monomial_offset_mp(A->exps, var, bits, ctx->minfo); _fmpz_mpoly_set_length(A, WORD(1), ctx); }