/* 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 "fmpz_mod_mpoly.h" void fmpz_mod_mpoly_gen(fmpz_mod_mpoly_t A, slong var, const fmpz_mod_mpoly_ctx_t ctx) { flint_bitcnt_t bits; bits = mpoly_gen_bits_required(var, ctx->minfo); bits = mpoly_fix_bits(bits, ctx->minfo); fmpz_mod_mpoly_fit_length_reset_bits(A, 1, bits, ctx); fmpz_one(A->coeffs + 0); 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_mod_mpoly_set_length(A, !fmpz_is_one( fmpz_mod_ctx_modulus(ctx->ffinfo)), ctx); }