#define AUTO_GENERATED
// competitive-verifier: PROBLEM https://judge.yosupo.jp/problem/polynomial_composite_set_power_series
#include "../../../src/io/container/lib.hpp"
#include "../../../src/io/fastin/lib.hpp"
#include "../../../src/io/fastout/lib.hpp"
#include "../../../src/sps/comp/lib.hpp"
using namespace tifa_libs;
CEXP u32 MOD = 998244353;
#include "../../../src/fps/ds/mtt/lib.hpp"
#include "../../../src/math/ds/mint/bs/lib.hpp"
using namespace tifa_libs;
using mint = mint_bs<MOD>;
using namespace tifa_libs;
using poly = polymtt<mint>;
int main() {
u32 m, n;
tifa_libs::fin_uint >> m >> n;
poly a(m);
tifa_libs::fin_uint >> a;
vec<mint> b(1 << n);
for (auto& i : b) tifa_libs::fin_uint >> i;
tifa_libs::fout << tifa_libs::comp_fpssps(n, a, b) << '\n';
return 0;
}
#line 1 "test/cpv/library-checker-set_power_series/polynomial_composite_set_power_series.mints-bs.poly_anymod-pmtt.cpp"
#define AUTO_GENERATED
// competitive-verifier: PROBLEM https://judge.yosupo.jp/problem/polynomial_composite_set_power_series
#line 2 "src/io/container/lib.hpp"
#line 2 "src/util/traits/others/lib.hpp"
// clang-format off
#line 2 "src/util/alias/others/lib.hpp"
#line 2 "src/util/consts/lib.hpp"
#line 2 "src/util/alias/num/lib.hpp"
#line 2 "src/util/util/lib.hpp"
// https://github.com/Tiphereth-A/CP-lib
#include <bits/extc++.h>
// clang-format off
namespace tifa_libs {
#define CEXP constexpr
#define CEXPE constexpr explicit
#define CR const&
#define CP const*
#define PC *const
#define CPC const*const
#define TPN typename
#define NE noexcept
#define CNE const noexcept
#define ND [[nodiscard]]
#define cT_(...) std::conditional_t<sizeof(__VA_ARGS__) <= sizeof(size_t) * 2, __VA_ARGS__, __VA_ARGS__ CR>
// NOLINTNEXTLINE(misc-const-correctness)
#define flt_(T, i, l, r, ...) for (T i = (l), i##e = (r)__VA_OPT__(, ) __VA_ARGS__; i < i##e; ++i)
#define retif_(cond, if_true, ...) if cond return if_true __VA_OPT__(; else return __VA_ARGS__)
#ifdef ONLINE_JUDGE
#undef assert
#define assert(x) 42
#endif
using namespace std::ranges;
using namespace std::literals;
template <class T>
CEXP T abs(T x) NE { retif_((x < 0), -x, x); }
} // namespace tifa_libs
// clang-format on
#line 4 "src/util/alias/num/lib.hpp"
// clang-format off
namespace tifa_libs {
#define mk0_(w, t) using w = t; using c##w = const t
#define mk_(w, t) mk0_(w, t); CEXP w operator""_##w(unsigned long long x) NE { return (w)x; }
mk_(i8, int8_t) mk_(u8, uint8_t) mk_(i16, int16_t) mk_(u16, uint16_t) mk_(i32, int32_t) mk_(u32, uint32_t) mk_(i64, int64_t) mk_(u64, uint64_t) mk_(isz, ssize_t) mk_(usz, size_t) mk_(chr, char) mk_(schr, signed char) mk_(uchr, unsigned char) mk_(sint, signed) mk_(uint, unsigned);
mk0_(i128, __int128_t); mk0_(u128, __uint128_t); mk0_(f32, float); mk0_(f64, double); mk0_(f128, long double);
#undef mk0_
#undef mk_
} // namespace tifa_libs
// clang-format on
#line 4 "src/util/consts/lib.hpp"
// clang-format off
namespace tifa_libs {
using std::numbers::pi_v;
template <std::floating_point FP>
inline FP eps_v = std::sqrt(std::numeric_limits<FP>::epsilon());
template <std::floating_point FP>
CEXP void set_eps(FP v) NE { eps_v<FP> = v; }
CEXP u32 TIME = ((__TIME__[0] & 15) << 20) | ((__TIME__[1] & 15) << 16) | ((__TIME__[3] & 15) << 12) | ((__TIME__[4] & 15) << 8) | ((__TIME__[6] & 15) << 4) | (__TIME__[7] & 15);
CEXP auto STR2U16 = [] { std::array<u32, 65536> table{}; table.fill(-1_u32); flt_ (u32, i, 48, 58) flt_ (u32, j, 48, 58) table[i << 8 | j] = (j & 15) * 10 + (i & 15); return table; }();
inline const auto fn_0 = [](auto&&...) NE {};
inline const auto fn_is0 = [](auto x) NE { return x == 0; };
} // namespace tifa_libs
// clang-format on
#line 4 "src/util/alias/others/lib.hpp"
namespace tifa_libs {
template <class T>
struct chash {
CEXP static u64 C = u64(pi_v<f128> * 2e18) | 71;
CEXP u64 operator()(T x) CNE { return __builtin_bswap64(((u64)x ^ TIME) * C); }
};
// clang-format off
#define mk_(w, t) using w = t; using c##w = const t;
mk_(strn, std::string) mk_(strnv, std::string_view)
#undef mk_
template <class T> struct edge_t { T w; u32 u, v; CEXP auto operator<=>(edge_t CR) const = default; }; template <class T> using cedge_t = const edge_t<T>;
template <class T> struct pt3 { T _0, _1, _2; CEXP auto operator<=>(pt3 CR) const = default; }; template <class T> using cpt3 = const pt3<T>;
template <class T> struct pt4 { T _0, _1, _2, _3; CEXP auto operator<=>(pt4 CR) const = default; }; template <class T> using cpt4 = const pt4<T>;
#define mkT_(w, t, ...) template <class T> using w = t __VA_OPT__(, ) __VA_ARGS__; template <class T> using c##w = const t __VA_OPT__(, ) __VA_ARGS__;
mkT_(ptt, std::pair<T, T>) mkT_(alc, std::pmr::polymorphic_allocator<T>) mkT_(vec, std::vector<T>) mkT_(vvec, vec<vec<T>>) mkT_(v3ec, vvec<vec<T>>) mkT_(vecpt, vec<ptt<T>>) mkT_(vvecpt, vvec<ptt<T>>) mkT_(ptvec, ptt<vec<T>>) mkT_(ptvvec, ptt<vvec<T>>)
#undef mkT_
template <class T> using itl = std ::initializer_list<T>;
template <class T, usz ext = std::dynamic_extent> using spn = std::span<T const, ext>;
template <class T, usz N> using arr = std::array<T, N>; template <class T, usz N> using carr = std::array<const T, N>;
template <class U, class T> using vecp = vec<std::pair<U, T>>; template <class U, class T> using vvecp = vvec<std::pair<U, T>>;
template <class U, class T> using vvecp = vvec<std::pair<U, T>>; template <class U, class T> using vvvecp = vvec<vvec<std::pair<U, T>>>;
#ifdef PB_DS_ASSOC_CNTNR_HPP
template <class T, class C = std::less<T>> using set = __gnu_pbds::tree<T, __gnu_pbds::null_type, C>;
template <class K, class V, class C = std::less<K>> using map = __gnu_pbds::tree<K, V, C>;
// hset<u64> s({}, {}, {}, {}, {1<<16});
template <class T, class HF = chash<T>> using hset = __gnu_pbds::gp_hash_table<T, __gnu_pbds::null_type, HF>;
// hmap<u64, int> s({}, {}, {}, {}, {1<<16});
template <class K, class V, class HF = chash<K>> using hmap = __gnu_pbds::gp_hash_table<K, V, HF>;
#else
using std::set, std::map;
template <class T, class HF = chash<T>> using hset = std::unordered_set<T, HF>;
template <class K, class V, class HF = chash<K>> using hmap = std::unordered_map<K, V, HF>;
#endif
#ifdef PB_DS_PRIORITY_QUEUE_HPP
template <class T, class C = std::less<T>> using pq = __gnu_pbds::priority_queue<T, C>;
#else
template <class T, class C = std::less<T>> using pq = std::priority_queue<T, vec<T>, C>;
#endif
template <class T> using pqg = pq<T, std::greater<T>>;
// clang-format on
#define mk1_(V, A, T) using V##A = V<T>;
#define mk_(V, A, T) mk1_(V, A, T) mk1_(c##V, A, T)
#define mk(A, T) mk_(edge_t, A, T) mk_(ptt, A, T) mk_(pt3, A, T) mk_(pt4, A, T) mk_(vec, A, T) mk_(vvec, A, T) mk_(v3ec, A, T) mk_(vecpt, A, T) mk_(vvecpt, A, T) mk_(ptvec, A, T) mk_(ptvvec, A, T) mk1_(spn, A, T) mk1_(itl, A, T)
mk(b, bool) mk(c, chr) mk(i, i32) mk(u, u32) mk(ii, i64) mk(uu, u64) mk(t, isz) mk(z, usz) mk(f, f32) mk(d, f64) mk(s, strn);
#undef mk
#undef mk_
#undef mk1_
} // namespace tifa_libs
#line 4 "src/util/traits/others/lib.hpp"
namespace tifa_libs {
//! only for template without non-type argument
template <class, template <class...> class> CEXP bool specialized_from_v = false;
template <template <class...> class T, class... Args> CEXP bool specialized_from_v<T<Args...>, T> = true;
static_assert(specialized_from_v<vecu, std::vector>);
template <class T> concept container_c = common_range<T> && !std::is_array_v<std::remove_cvref_t<T>> && !std::same_as<std::remove_cvref_t<T>, strn> && !std::same_as<std::remove_cvref_t<T>, strnv>;
template <class T> concept istream_c = std::derived_from<T, std::istream> || std::derived_from<T, std::wistream> || requires(T is) { is.peek(); };
template <class T> concept ostream_c = std::derived_from<T, std::ostream> || std::derived_from<T, std::wostream> || requires(T os) { os.flush(); };
} // namespace tifa_libs
// clang-format on
#line 4 "src/io/container/lib.hpp"
namespace tifa_libs {
auto& operator>>(tifa_libs::istream_c auto& is, tifa_libs::container_c auto& x) NE {
for (auto& i : x) is >> i;
return is;
}
auto& operator<<(tifa_libs::ostream_c auto& os, tifa_libs::container_c auto CR x) NE {
if (begin(x) == end(x)) [[unlikely]]
return os;
auto it = begin(x);
for (os << *it++; it != end(x); ++it) os << ' ' << *it;
return os;
}
} // namespace tifa_libs
#line 2 "src/io/fastin/lib.hpp"
#line 2 "src/util/traits/math/lib.hpp"
// clang-format off
#line 4 "src/util/traits/math/lib.hpp"
namespace tifa_libs {
template <class T> concept char_c = std::same_as<T, char> || std::same_as<T, signed char> || std::same_as<T, unsigned char>;
#pragma GCC diagnostic ignored "-Wpedantic"
template <class T> concept s128_c = std::same_as<T, __int128_t> || std::same_as<T, __int128>;
template <class T> concept u128_c = std::same_as<T, __uint128_t> || std::same_as<T, unsigned __int128>;
template <class T> concept i128_c = s128_c<T> || u128_c<T>;
#pragma GCC diagnostic warning "-Wpedantic"
template <class T> concept imost64_c = std::integral<T> && sizeof(T) * __CHAR_BIT__ <= 64;
template <class T> concept smost64_c = imost64_c<T> && std::signed_integral<T>;
template <class T> concept umost64_c = imost64_c<T> && std::unsigned_integral<T>;
template <class T> concept int_c = i128_c<T> || imost64_c<T>;
template <class T> concept sint_c = s128_c<T> || smost64_c<T>;
template <class T> concept uint_c = u128_c<T> || umost64_c<T>;
template <class T> concept arithm_c = std::is_arithmetic_v<T> || int_c<T>;
template <class T> concept mint_c = requires(T x) { {x.mod()} -> uint_c; {x.val()} -> uint_c; };
template <class T> concept dft_c = requires(T x, std::vector<TPN T::data_t> v, u32 n) { {x.size()} -> std::same_as<u32>; x.bzr(n); x.dif(v, n); x.dit(v, n); };
template <class T> concept ntt_c = dft_c<T> && requires(T x) { T::max_size; T::G; };
template <class T> struct to_sint : std::make_signed<T> {};
template <> struct to_sint<u128> { using type = i128; };
template <> struct to_sint<i128> { using type = i128; };
template <class T> using to_sint_t = TPN to_sint<T>::type;
template <class T> struct to_uint : std::make_unsigned<T> {};
template <> struct to_uint<u128> { using type = u128; };
template <> struct to_uint<i128> { using type = u128; };
template <class T> using to_uint_t = TPN to_uint<T>::type;
template <arithm_c T> struct to_bigger : std::make_unsigned<T> {};
#define _(w,ww) template <> struct to_bigger<w> { using type = ww; }
#define _2(w,ww) _(i##w,i##ww); _(u##w,u##ww);
_2(8, 16); _2(16, 32); _2(32, 64); _2(64, 128); _(f32, f64); _(f64, f128);
#undef _2
#undef _
template <class T> using to_bigger_t = TPN to_bigger<T>::type;
template <arithm_c T> CEXP T inf_v = [] {
if CEXP(sint_c<T>) return T(to_uint_t<T>(-1) / 4 - 1);
else if CEXP(uint_c<T>) return T(-1) / 2 - 1;
else return std::numeric_limits<T>::max() / 2 - 1;
}();
} // namespace tifa_libs
// clang-format on
#line 5 "src/io/fastin/lib.hpp"
#ifdef __linux__
#include <sys/mman.h>
#include <sys/stat.h>
#endif
namespace tifa_libs {
struct fastin_data {
CEXP static u32 BUF = 0x200005;
FILE* f_ = nullptr;
#ifdef __linux__
chr *bg, *ed, *p;
struct stat Fl;
void rebind(FILE* f = nullptr) NE {
#pragma GCC diagnostic ignored "-Wmaybe-uninitialized"
if (!f_) munmap(bg, Fl.st_size + 1);
#pragma GCC diagnostic warning "-Wmaybe-uninitialized"
if (!f) return;
auto fd = fileno(f_ = f);
fstat(fd, &Fl);
p = (bg = (chr*)mmap(nullptr, Fl.st_size + 4, PROT_READ, MAP_PRIVATE, fd, 0));
ed = bg + Fl.st_size;
madvise(bg, Fl.st_size + 4, MADV_SEQUENTIAL);
}
ND bool iseof() CNE { return p == ed; }
~fastin_data() NE { rebind(); }
#else
// NOLINTNEXTLINE(modernize-avoid-c-arrays)
chr buf[BUF], *ed, *p;
void rebind(FILE* f) NE { f_ = f, p = ed = buf; }
ND bool iseof() NE {
if (p == ed) [[unlikely]]
ed = (p = buf) + fread(buf, 1, BUF, f_);
return p == ed;
}
#endif
fastin_data(FILE* f = stdin) NE { assert(f), rebind(f); }
fastin_data(fastin_data CR) = delete;
fastin_data& operator=(fastin_data CR) = delete;
};
// clang-format off
enum FIN_SET : u8 { FS_NEWLINE = 1, FS_SPACE = 2, FS_NEG = 4, FS_NUM = 8, FS_ALPHA = 16, FS_OTHERS = 32 };
// clang-format on
template <u32 charset>
class fastin {
fastin_data& data;
static CEXP bool is_cntrl(chr c) NE {
if CEXP (charset & FS_OTHERS) return iscntrl(c);
else if CEXP (charset & FS_NEWLINE) return c < 32;
else return false;
}
static CEXP bool is_cntrls(chr c) NE {
if CEXP (charset & FS_OTHERS) return !isgraph(c);
else if CEXP (charset & (FS_NEWLINE | FS_SPACE)) return c <= 32;
else return false;
}
static CEXP bool is_digit(chr c) NE {
if CEXP (charset & (FS_ALPHA | FS_OTHERS)) return isdigit(c);
else if CEXP (!(charset & FS_NUM)) return false;
else if CEXP (!(charset & FS_NEG)) return c > 32;
else return c >= 48;
}
static CEXP bool is_neg_digit(chr c) NE {
if CEXP (!(charset & FS_NEG)) return is_digit(c);
else if CEXP (charset & (FS_ALPHA | FS_OTHERS)) return c == '-' || isdigit(c);
else return c > 32;
}
#ifdef __linux__
template <bool ignore_space = true>
void read_str(strn& n) NE {
chr* l;
if CEXP (ignore_space) {
skip_cntrls(), l = data.p;
while (!is_cntrls(*data.p)) ++data.p;
} else {
skip_cntrl(), l = data.p;
while (!is_cntrl(*data.p)) ++data.p;
}
n.assign(l, data.p);
}
#else
template <bool ignore_space>
void read_str(strn& n) NE {
if CEXP (n.clear(); ignore_space) {
n.push_back(skip_cntrls().get());
while (!is_cntrls(peek())) n.push_back(get());
} else {
n.push_back(skip_cntrl().get());
while (!is_cntrl(peek())) n.push_back(get());
}
}
#endif
public:
fastin(fastin_data& data) NE : data(data) {}
fastin(fastin CR) = delete;
fastin& operator=(fastin CR) = delete;
chr peek() NE {
if (data.iseof()) [[unlikely]]
return EOF;
return *data.p;
}
chr get_unchk() NE { return *data.p++; }
chr get() NE {
if (data.iseof()) [[unlikely]]
return EOF;
return get_unchk();
}
#define SKIP(name, pred) \
fastin& skip_##name() NE { \
while (pred(peek())) get_unchk(); \
return *this; \
}
SKIP(cntrl, is_cntrl)
SKIP(cntrls, is_cntrls)
SKIP(ndigit, !is_digit)
SKIP(nnegdigit, !is_neg_digit)
#undef SKIP
template <class T>
requires(imost64_c<T> && !char_c<T>)
fastin& operator>>(T& n) NE {
if CEXP (std::same_as<T, bool>) n = skip_ndigit().get() != '0';
else {
n = 0;
bool is_neg = false;
if CEXP ((charset & FS_NEG) && std::signed_integral<T>) is_neg = (skip_nnegdigit().peek() == '-' && get_unchk());
else skip_ndigit();
std::conditional_t<sizeof(T) < sizeof(u32), u32, to_uint_t<T>> n_ = 0;
#ifdef __linux__
// clang-format off
#define _ {while (~STR2U16[*(u16*)data.p]) (n_ *= 100) += STR2U16[*(u16*)data.p], data.p += 2; if (is_digit(peek())) (n_ *= 10) += get_unchk() & 15;}
if ((usz)data.p & 1) { if (is_digit(peek())) [[likely]] { (n_ *= 10) += get_unchk() & 15; _ } } else _;
#undef _
// clang-format on
#else
while (is_digit(peek())) (n_ *= 10) += get_unchk() & 15;
#endif
if CEXP (sint_c<T>)
if (is_neg) n_ = -n_;
n = (T)n_;
}
return *this;
}
fastin& operator>>(std::floating_point auto& n) NE {
static strn s;
(*this >> s), std::from_chars(begin(s).base(), end(s).base(), n);
return *this;
}
//! ignore cntrl and space
fastin& operator>>(char_c auto& n) NE {
n = skip_cntrls().get();
return *this;
}
fastin& operator>>(strn& n) NE {
read_str<true>(n);
return *this;
}
fastin& getline(strn& n) NE {
read_str<false>(n);
return *this;
}
//! NOT ignore cntrl and space
fastin& strict_read(char_c auto& n) NE {
n = get();
return *this;
}
fastin& operator>>(fastin& (*func)(fastin&)) NE { return func(*this); }
};
inline fastin_data fid_stdin;
inline fastin<FS_NEWLINE | FS_SPACE | FS_NEG | FS_NUM | FS_ALPHA | FS_OTHERS> fin(fid_stdin);
inline fastin<FS_NEWLINE | FS_SPACE | FS_NEG | FS_NUM> fin_int(fid_stdin);
inline fastin<FS_NEWLINE | FS_SPACE | FS_NUM> fin_uint(fid_stdin);
template <u32 w>
inline fastin<w>& ws(fastin<w>& f) NE { return f.skip_cntrls(); }
} // namespace tifa_libs
#line 2 "src/io/fastout/lib.hpp"
#line 5 "src/io/fastout/lib.hpp"
namespace tifa_libs {
class fastout {
CEXP static u32 BUF = 0x200005, INTBUF = 63;
FILE* f_ = nullptr;
// NOLINTNEXTLINE(modernize-avoid-c-arrays)
chr int_buf[INTBUF];
// NOLINTNEXTLINE(modernize-avoid-c-arrays)
chr buf[BUF], *p;
chr CPC ed = buf + BUF;
std::chars_format fmt = std::chars_format::general;
int precision = 6;
fastout& write_str(chr CP n, usz len = 0) NE {
if (!len) len = strlen(n);
usz l_;
chr CP n_ = n;
while (p + len >= ed) memcpy(p, n_, l_ = usz(ed - p)), p += l_, n_ += l_, len -= l_, flush();
return memcpy(p, n_, len), p += len, *this;
}
public:
fastout(FILE* f = stdout) NE { rebind(f); }
fastout(fastout CR) = delete;
fastout& operator=(fastout CR) = delete;
~fastout() NE { flush(); }
void rebind(FILE* f) NE { f_ = f, p = buf; }
void flush() NE { fwrite(buf, 1, usz(p - buf), f_), p = buf; }
fastout& operator<<(char_c auto n) NE {
if (p == ed) [[unlikely]]
flush();
*(p++) = n;
return *this;
}
fastout& operator<<(chr CP n) NE { return write_str(n); }
fastout& operator<<(strn CR str) NE { return write_str(str.data(), str.size()); }
fastout& operator<<(strnv str) NE { return write_str(str.data(), str.size()); }
template <class T>
requires(smost64_c<T> && !char_c<T>)
fastout& operator<<(T n) NE {
if CEXP (sizeof(T) < sizeof(i32)) return *this << (i32)n;
else {
if (n < 0) return *this << '-' << -to_uint_t<T>(n);
return *this << to_uint_t<T>(n);
}
}
template <class T>
requires(umost64_c<T> && !char_c<T>)
fastout& operator<<(T n) NE {
if CEXP (std::same_as<T, bool>) return *this << (chr(n | '0'));
else if CEXP (sizeof(T) < sizeof(u32)) return *this << (u32)n;
else if (usz(p - buf) >= BUF - INTBUF) [[unlikely]] {
auto res = std::to_chars(int_buf, int_buf + INTBUF, n);
return write_str(int_buf, usz(res.ptr - int_buf));
} else {
auto res = std::to_chars(p, buf + BUF, n);
p = res.ptr;
return *this;
}
}
fastout& operator<<(std::floating_point auto n) NE {
if (usz(p - buf) >= BUF - INTBUF) [[unlikely]] {
auto res = std::to_chars(int_buf, int_buf + INTBUF, n, fmt, precision);
return write_str(int_buf, usz(res.ptr - int_buf));
} else {
auto res = std::to_chars(p, buf + BUF, n, fmt, precision);
p = res.ptr;
return *this;
}
}
fastout& setf(std::chars_format f) NE {
fmt = f;
return *this;
}
//! only tested in libstdc++
fastout& operator<<(decltype(std::setprecision(0)) p) NE {
precision = *(int*)(&p);
return *this;
}
fastout& operator<<(fastout& (*func)(fastout&)) NE { return func(*this); }
};
inline fastout fout;
inline fastout& scientific(fastout& f) NE { return f.setf(std::chars_format::scientific); }
inline fastout& fixed(fastout& f) NE { return f.setf(std::chars_format::fixed); }
inline fastout& hexfloat(fastout& f) NE { return f.setf(std::chars_format::hex); }
inline fastout& defaultfloat(fastout& f) NE { return f.setf(std::chars_format::general); }
inline fastout& endl(fastout& f) NE {
(f << '\n').flush();
return f;
}
using std::setprecision;
} // namespace tifa_libs
#line 2 "src/sps/comp/lib.hpp"
#line 2 "src/comb/seq/fact/lib.hpp"
#line 2 "src/math/mul_mod/lib.hpp"
#line 2 "src/math/safe_mod/lib.hpp"
#line 4 "src/math/safe_mod/lib.hpp"
namespace tifa_libs {
template <int_c T>
CEXP T safe_mod(T x, to_uint_t<T> mod) NE {
if CEXP (sint_c<T>) {
if (x <= -(T)mod || x >= (T)mod) x %= (T)mod;
retif_((x < 0), x + (T)mod, x);
} else {
retif_((x >= mod), x % mod, x);
}
}
} // namespace tifa_libs
#line 4 "src/math/mul_mod/lib.hpp"
namespace tifa_libs {
CEXP i64 mul_mod_s(i64 a, i64 b, u64 mod) NE {
if (std::bit_width((u64)abs(a)) + std::bit_width((u64)abs(b)) < 64) return safe_mod(a * b % (i64)mod, mod);
return safe_mod((i64)((i128)a * b % mod), mod);
}
CEXP u64 mul_mod_u(u64 a, u64 b, u64 mod) NE {
if (std::bit_width(a) + std::bit_width(b) <= 64) return a * b % mod;
return (u64)((u128)a * b % mod);
}
} // namespace tifa_libs
#line 5 "src/comb/seq/fact/lib.hpp"
namespace tifa_libs {
// i! from i=0..n-1
CEXP vecuu gen_fact(u32 n, u64 mod) NE {
retif_((n <= 1) [[unlikely]], vecuu(n, 1));
vecuu ans(n);
ans[0] = ans[1] = 1;
flt_ (u32, i, 2, n) ans[i] = mul_mod_u(ans[i - 1], i, mod);
return ans;
}
// i! from i=0..n-1
template <class mint>
CEXP vec<mint> gen_fact(u32 n) NE {
vec<mint> ans(n);
auto _ = gen_fact(n, mint::mod());
flt_ (u32, i, 0, n) ans[i] = _[i];
return ans;
}
} // namespace tifa_libs
#line 2 "src/comb/seq/ifact/lib.hpp"
#line 2 "src/comb/seq/inv/lib.hpp"
#line 5 "src/comb/seq/inv/lib.hpp"
namespace tifa_libs {
// i^{-1} from i=0..n-1
CEXP vecuu gen_inv(u32 n, u64 mod) NE {
retif_((n <= 1) [[unlikely]], vecuu(n, 1));
vecuu ans(n);
ans[0] = ans[1] = 1;
flt_ (u32, i, 2, n) ans[i] = mul_mod_u(mod - mod / i, ans[mod % i], mod);
return ans;
}
// i^{-1} from i=0..n-1
template <class mint>
CEXP vec<mint> gen_inv(u32 n) NE {
vec<mint> ans(n);
auto _ = gen_inv(n, mint::mod());
flt_ (u32, i, 0, n) ans[i] = _[i];
return ans;
}
} // namespace tifa_libs
#line 5 "src/comb/seq/ifact/lib.hpp"
namespace tifa_libs {
// (i!)^{-1} from i=0..n-1
CEXP vecuu gen_ifact(u32 n, u64 mod, vecuu inv) NE {
flt_ (u32, i, 2, n) inv[i] = mul_mod_u(inv[i], inv[i - 1], mod);
return inv;
}
// (i!)^{-1} from i=0..n-1
CEXP vecuu gen_ifact(u32 n, u64 mod) NE { return gen_ifact(n, mod, gen_inv(n, mod)); }
// (i!)^{-1} from i=0..n-1
template <class mint>
CEXP vec<mint> gen_ifact(u32 n, vec<mint> inv) NE {
flt_ (u32, i, 2, n) inv[i] *= inv[i - 1];
return inv;
}
// (i!)^{-1} from i=0..n-1
template <class mint>
CEXP vec<mint> gen_ifact(u32 n) NE { return gen_ifact(n, gen_inv<mint>(n)); }
} // namespace tifa_libs
#line 2 "src/conv/subset/lib.hpp"
#line 4 "src/conv/subset/lib.hpp"
namespace tifa_libs {
template <class T, u32 N>
struct conv_subset {
using arr_t = arr<T, N + 1>;
vecu pc;
CEXP void add(arr_t& l, cT_(arr_t) r, u32 d) CNE {
flt_ (u32, i, 0, d) l[i] += r[i];
}
CEXP void sub(arr_t& l, cT_(arr_t) r, u32 d) CNE {
flt_ (u32, i, d, N + 1) l[i] -= r[i];
}
public:
CEXP conv_subset() NE : pc(1u << N) {
flt_ (u32, i, 1, 1u << N) pc[i] = pc[i - (i & -i)] + 1;
}
CEXP void zeta(vec<arr_t>& a) CNE {
for (u32 w = 1; w < (u32)a.size(); w *= 2)
for (u32 k = 0; k < (u32)a.size(); k += w * 2)
flt_ (u32, i, 0, w) add(a[k + w + i], a[k + i], pc[k + w + i]);
}
CEXP void mobius(vec<arr_t>& a) CNE {
cu32 n = (u32)a.size();
for (u32 w = n >> 1; w; w /= 2)
for (u32 k = 0; k < n; k += w * 2)
flt_ (u32, i, 0, w) sub(a[k + w + i], a[k + i], pc[k + w + i]);
}
CEXP vec<arr_t> lift(spn<T> a) CNE {
vec<arr_t> A(a.size());
flt_ (u32, i, 0, (u32)a.size()) fill(A[i], T()), A[i][pc[i]] = a[i];
return A;
}
CEXP vec<T> unlift(spn<arr_t> A) CNE {
vec<T> a(A.size());
flt_ (u32, i, 0, (u32)A.size()) a[i] = A[i][pc[i]];
return a;
}
CEXP void prod(vec<arr_t>& A, spn<arr_t> B) CNE {
cu32 n = (u32)A.size(), d = (u32)std::countr_zero(n);
flt_ (u32, i, 0, n) {
arr_t c;
flt_ (u32, j, 0, d + 1)
for (u32 k = 0; k <= d - j; ++k) c[j + k] += A[i][j] * B[i][k];
A[i].swap(c);
}
}
CEXP vec<T> conv(spn<T> a, spn<T> b) CNE {
vec<arr_t> A = lift(a), B = lift(b);
zeta(A), zeta(B), prod(A, B), mobius(A);
return unlift(A);
}
};
} // namespace tifa_libs
#line 2 "src/fps/tsh/lib.hpp"
#line 2 "src/fps/ds/poly_c/lib.hpp"
#line 2 "src/util/strip/lib.hpp"
#line 4 "src/util/strip/lib.hpp"
namespace tifa_libs {
// pred(x) == true ==> drop
template <common_range R, class F>
CEXP auto lstrip_view(R CR range, F&& pred) NE {
auto v = range | views::drop_while(std::forward<F>(pred));
return subrange{begin(v), end(v)};
}
// pred(x) == true ==> drop
template <common_range R, class F>
CEXP auto rstrip_view(R CR range, F&& pred) NE {
auto v = range | views::reverse | views::drop_while(std::forward<F>(pred));
return subrange{end(v).base(), begin(v).base()};
}
// pred(x) == true ==> drop
template <common_range R, class F>
CEXP auto strip_view(R CR range, F&& pred) NE {
auto v = range | views::drop_while(std::forward<F>(pred)) | views::reverse | views::drop_while(std::forward<F>(pred));
return subrange{end(v).base(), begin(v).base()};
}
} // namespace tifa_libs
#line 5 "src/fps/ds/poly_c/lib.hpp"
namespace tifa_libs {
// clang-format off
enum class CCORE : u8 { FFT_R2, NTT3, NTT };
// clang-format on
namespace poly_impl_ {
template <class ccore>
requires requires(ccore cc, vec<TPN ccore::val_t> l, vec<TPN ccore::val_t> r, u32 sz) {
{ ccore::ct_cat } -> std::same_as<CCORE CR>;
cc.conv(l, r), cc.conv(l, r, sz);
}
struct poly : vec<TPN ccore::val_t> {
using ccore_t = ccore;
using val_t = ccore_t::val_t;
using data_t = vec<val_t>;
static inline ccore_t conv_core;
CEXPE poly(u32 sz = 1, cT_(val_t) val = val_t{}) NE : data_t(sz, val) {}
CEXP poly(TPN data_t::const_iterator begin, TPN data_t::const_iterator end) NE : data_t(begin, end) {}
CEXP poly(data_t CR v) NE : data_t(v) {}
CEXP poly(data_t&& v) NE : data_t(std::move(v)) {}
CEXP poly(itl<val_t> v) NE : data_t(v) {}
CEXP poly(common_range auto CR v) NE : data_t(begin(v), end(v)) {}
friend CEXP auto& operator>>(istream_c auto& is, poly& poly) NE {
for (auto& val : poly) is >> val;
return is;
}
friend CEXP auto& operator<<(ostream_c auto& os, poly CR poly) NE {
retif_((!poly.size()) [[unlikely]], os);
flt_ (u32, i, 1, (u32)poly.size()) os << poly[i - 1] << ' ';
return os << poly.back();
}
ND CEXP bool is_zero() CNE {
for (auto&& i : *this)
if (i != 0) return false;
return true;
}
CEXP val_t operator()(val_t x) CNE {
val_t ans = 0;
for (u32 i = data_t::size() - 1; ~i; --i) ans = ans * x + data_t::data()[i];
return ans;
}
template <class F>
requires requires(F f, u32 idx, val_t& val) { f(idx, val); }
CEXP void apply_range(u32 l, u32 r, F&& f) NE {
assert(l < r && r <= data_t::size());
flt_ (u32, i, l, r) f(i, data_t::data()[i]);
}
template <class F>
CEXP void apply(F&& f) NE { apply_range(0, (u32)data_t::size(), std::forward<F>(f)); }
ND CEXP poly pre(u32 sz) CNE {
if (sz <= this->size()) return {this->begin(), this->begin() + sz};
poly _ = *this;
_.resize(sz);
return _;
}
CEXP void strip() NE {
auto [_, r] = rstrip_view(*this, [](cT_(val_t) x) NE { return x.val() == 0; });
if (data_t::erase(r, this->end()); data_t::empty()) data_t::push_back(val_t(0));
}
friend poly stripped(poly CR p) NE {
poly ret(rstrip_view(p, [](cT_(val_t) x) NE { return x.val() == 0; }));
if (ret.empty()) return {0};
return ret;
}
CEXP void reverse(u32 n = 0) NE { std::ranges::reverse(data_t::begin(), data_t::begin() + (n ? n : (u32)data_t::size())); }
CEXP void conv(poly CR r, u32 ans_size = 0) NE { conv_core.conv(*this, r, ans_size); }
CEXP poly operator-() CNE {
poly ret = *this;
ret.apply([](u32, auto& v) NE { v = -v; });
return ret;
}
friend CEXP poly operator+(poly p, val_t c) NE {
p[0] += c;
return p;
}
friend CEXP poly operator+(val_t c, poly CR p) NE { return p + c; }
friend CEXP poly operator-(poly p, val_t c) NE {
p[0] -= c;
return p;
}
friend CEXP poly operator-(val_t c, poly CR p) NE { return p - c; }
CEXP poly& operator*=(val_t c) NE {
apply([&c](u32, auto& v) NE { v *= c; });
return *this;
}
friend CEXP poly operator*(poly p, val_t c) NE { return p *= c; }
friend CEXP poly operator*(val_t c, poly p) NE { return p *= c; }
CEXP poly& operator+=(poly CR r) NE {
retif_((r.empty()) [[unlikely]], *this);
data_t::resize(max(data_t::size(), r.size())), apply_range(0, (u32)r.size(), [&r](u32 i, auto& v) NE { v += r[i]; });
return *this;
}
friend CEXP poly operator+(poly l, poly CR r) NE { return l += r; }
CEXP poly& operator-=(poly CR r) NE {
retif_((r.empty()) [[unlikely]], *this);
data_t::resize(max(data_t::size(), r.size()));
apply_range(0, (u32)r.size(), [&r](u32 i, auto& v) NE { v -= r[i]; });
return *this;
}
friend CEXP poly operator-(poly l, poly CR r) NE { return l -= r; }
CEXP poly& operator*=(poly CR r) NE {
if (r.empty()) {
data_t::resize(1), *data_t::data() = 0;
return *this;
}
conv(r);
return *this;
}
friend CEXP poly operator*(poly l, poly CR r) NE { return l *= r; }
CEXP auto operator<=>(poly CR r) CNE {
auto l_ = stripped(*this), r_ = stripped(r);
if (l_.size() != r_.size()) return l_.size() <=> r_.size();
return std::lexicographical_compare_three_way(l_.rbegin(), l_.rend(), r_.rbegin(), r_.rend());
}
CEXP bool operator==(poly CR r) CNE { return std::is_eq(*this <=> r); }
};
} // namespace poly_impl_
template <class T>
concept poly_c = std::same_as<T, poly_impl_::poly<TPN T::ccore_t>>;
} // namespace tifa_libs
#line 6 "src/fps/tsh/lib.hpp"
namespace tifa_libs {
template <poly_c poly_t, class T>
CEXP auto tsh_fps(poly_t CR f, TPN poly_t::val_t c, vec<T> CR fact, vec<T> CR ifact) NE {
cu32 n = (u32)f.size();
retif_((n == 1) [[unlikely]], f);
poly_t s = f, p((u32)f.size());
flt_ (u32, i, 0, n) p[n - i - 1] = f[i] * fact[i];
TPN poly_t::val_t _ = 1;
for (u32 i = 0; i < n; ++i, _ *= c) s[i] = _ * ifact[i];
(p *= s).resize(n);
flt_ (u32, i, 0, n) s[n - i - 1] = p[i] * ifact[n - i - 1];
return s;
}
template <poly_c poly_t>
CEXP auto tsh_fps(poly_t CR f, TPN poly_t::val_t c) NE {
cu32 n = (u32)f.size();
retif_((n == 1) [[unlikely]], f);
return tsh_fps(f, c, gen_fact(n, poly_t::val_t::mod()), gen_ifact(n, poly_t::val_t::mod()));
}
} // namespace tifa_libs
#line 7 "src/sps/comp/lib.hpp"
namespace tifa_libs {
// @return $f(g(x_0, \dots, x_{n-1}))$
template <class poly, class T, u32 N = 21>
auto comp_fpssps(u32 n, poly f, vec<TPN poly::val_t> g, vec<T> CR fact, vec<T> CR ifact) NE {
using mint = TPN poly::val_t;
static conv_subset<mint, N> ss;
if (assert(n <= N); !f.size()) return vec<mint>(1 << n);
if (g[0] != 0) f = tsh_fps(f, g[0], fact, ifact), g[0] = 0;
f.resize(n + 1), g.resize(1 << n);
flt_ (u32, i, 0, n + 1) f[i] *= fact[i];
v3ec<mint> h(n + 1, vvec<mint>(n + 1, vec<mint>(1)));
flt_ (u32, i, 0, n + 1) h[0][i][0] = f[i];
flt_ (u32, k, 1, n + 1) {
auto A = ss.lift({begin(g) + (1 << (k - 1)), begin(g) + (1 << k)});
ss.zeta(A);
flt_ (u32, j, 0, n - k + 1) {
h[k][j] = h[k - 1][j];
auto B = ss.lift(h[k - 1][j + 1]);
ss.zeta(B), ss.prod(B, A), ss.mobius(B);
auto c = ss.unlift(B);
copy(c, std::back_inserter(h[k][j]));
}
}
return h[n][0];
}
// @return $f(g(x_0, \dots, x_{n-1}))$
template <class poly, u32 N = 21>
CEXP auto comp_fpssps(u32 n, poly CR f, vec<TPN poly::val_t> CR g) NE {
using mint = TPN poly::val_t;
return comp_fpssps<poly, u64, N>(n, f, g, gen_fact(max((u32)f.size(), n) + 1, mint::mod()), gen_ifact(max((u32)f.size(), n) + 1, mint::mod()));
}
} // namespace tifa_libs
#line 7 "test/cpv/library-checker-set_power_series/polynomial_composite_set_power_series.mints-bs.poly_anymod-pmtt.cpp"
using namespace tifa_libs;
CEXP u32 MOD = 998244353;
#line 2 "src/fps/ds/mtt/lib.hpp"
#line 2 "src/conv/add/mtt/lib.hpp"
#line 2 "src/conv/trans/fft_r2/lib.hpp"
#line 4 "src/conv/trans/fft_r2/lib.hpp"
namespace tifa_libs {
template <std::floating_point FP>
class fft_r2 {
using C = std::complex<FP>;
const FP TAU = std::acos((FP)-1.) * 2;
vecu rev;
vec<C> w;
public:
using data_t = C;
ND CEXP u32 size() CNE { return (u32)rev.size(); }
CEXP void bzr(u32 len) NE {
cu32 n = max(std::bit_ceil(len), 2_u32);
if (n == size()) return;
rev.resize(n, 0);
cu32 k = (u32)(std::bit_width(n) - 1);
flt_ (u32, i, 0, n) rev[i] = (rev[i / 2] / 2) | ((i & 1) << (k - 1));
w.resize(n), w[0].real(1);
flt_ (u32, i, 1, n) w[i] = {std::cos(TAU * (FP)i / (FP)n), std::sin(TAU * (FP)i / (FP)n)};
}
CEXP void dif(vec<data_t>& f, u32 n = 0) CNE {
if (!n) n = size();
if (f.size() < n) f.resize(n);
assert(n <= size());
flt_ (u32, i, 0, n)
if (i < rev[i]) swap(f[rev[i]], f[i]);
#pragma GCC diagnostic ignored "-Wsign-conversion"
for (u32 i = 2, d = n / 2; i <= n; i *= 2, d /= 2)
for (u32 j = 0; j < n; j += i) {
auto l = begin(f) + j, r = begin(f) + j + i / 2;
auto p = begin(w);
for (u32 k = 0; k < i / 2; ++k, ++l, ++r, p += d) {
const data_t _ = *r * *p;
*r = *l - _, *l = *l + _;
}
}
#pragma GCC diagnostic warning "-Wsign-conversion"
}
CEXP void dit(vec<data_t>& f, u32 n = 0) CNE {
if (!n) n = size();
dif(f, n);
flt_ (u32, i, 0, n) f[i] /= (FP)n;
}
};
} // namespace tifa_libs
#line 2 "src/conv/add/naive/lib.hpp"
#line 4 "src/conv/add/naive/lib.hpp"
namespace tifa_libs {
CEXP inline u32 CONV_NAIVE_THRESHOLD = 16;
template <class U, class T = U>
requires(sizeof(U) <= sizeof(T))
CEXP vec<T> conv_naive(vec<U> CR l, vec<U> CR r, u32 ans_size = 0) NE {
retif_((l.empty() || r.empty()) [[unlikely]], {});
if (!ans_size) ans_size = u32(l.size() + r.size() - 1);
vec<T> ans(ans_size);
u32 n = (u32)l.size(), m = (u32)r.size();
auto &&l_ = n < m ? r : l, &&r_ = n < m ? l : r;
if (n < m) swap(n, m);
flt_ (u32, i, 0, n)
flt_ (u32, j, 0, min(m, ans_size - i)) ans[i + j] += (T)l_[i] * (T)r_[j];
return ans;
}
} // namespace tifa_libs
#line 5 "src/conv/add/mtt/lib.hpp"
namespace tifa_libs {
template <class mint, class FP>
CEXP vec<mint> conv_mtt(fft_r2<FP>& fft, vec<mint> CR l, vec<mint> CR r, u32 ans_size = 0) NE {
using C = TPN fft_r2<FP>::data_t;
if (!ans_size) ans_size = u32(l.size() + r.size() - 1);
if (min(l.size(), r.size()) < CONV_NAIVE_THRESHOLD) return conv_naive(l, r, ans_size);
if (l.size() == 1) {
vec<mint> ans = r;
for (ans.resize(ans_size); auto& i : ans) i *= l[0];
return ans;
}
if (r.size() == 1) {
vec<mint> ans = l;
for (ans.resize(ans_size); auto& i : ans) i *= r[0];
return ans;
}
fft.bzr(max({(u32)l.size(), (u32)r.size(), min(u32(l.size() + r.size() - 1), ans_size)}));
cu32 n = fft.size();
csint OFS = ((int)sizeof(decltype(mint::mod())) * 8 - std::countl_zero(mint::mod() - 1) + 1) / 2;
cu32 MSK = ((1u << OFS) - 1);
vec<mint> ans(ans_size);
vec<C> a(n), b(n);
flt_ (u32, i, 0, (u32)l.size()) a[i] = {(FP)(l[i].val() & MSK), (FP)(l[i].val() >> OFS)};
flt_ (u32, i, 0, (u32)r.size()) b[i] = {(FP)(r[i].val() & MSK), (FP)(r[i].val() >> OFS)};
fft.dif(a), fft.dif(b);
{
vec<C> p(n), q(n);
for (u32 i = 0, j; i < n; ++i) {
j = (n - i) & (n - 1);
C da = (a[i] + std::conj(a[j])) * C(.5, 0), db = (a[i] - std::conj(a[j])) * C(0, -.5),
dc = (b[i] + std::conj(b[j])) * C(.5, 0), dd = (b[i] - std::conj(b[j])) * C(.5, 0);
p[j] = da * dc + da * dd;
q[j] = db * dc + db * dd;
}
a = p, b = q;
}
fft.dif(a), fft.dif(b);
flt_ (u32, i, 0, ans_size) {
ci64 da = (i64)(a[i].real() / (FP)n + .5) % mint::smod(),
db = (i64)(a[i].imag() / (FP)n + .5) % mint::smod(),
dc = (i64)(b[i].real() / (FP)n + .5) % mint::smod(),
dd = (i64)(b[i].imag() / (FP)n + .5) % mint::smod();
ans[i] = da + ((db + dc) << OFS) % mint::smod() + (dd << (OFS * 2)) % mint::smod();
}
return ans;
}
} // namespace tifa_libs
#line 5 "src/fps/ds/mtt/lib.hpp"
namespace tifa_libs {
namespace polymtt_impl_ {
template <class mint, class FP>
struct cconv_mtt : public fft_r2<FP> {
using val_t = mint;
static CEXP auto ct_cat = CCORE::FFT_R2;
CEXP void conv(vec<val_t>& l, vec<val_t> CR r, u32 sz = 0) NE { l = conv_mtt(*this, l, r, sz); }
};
} // namespace polymtt_impl_
template <class mint, class FP = f64>
using polymtt = poly_impl_::poly<polymtt_impl_::cconv_mtt<mint, FP>>;
} // namespace tifa_libs
#line 2 "src/math/ds/mint/bs/lib.hpp"
#line 2 "src/nt/mod/barrett/lib.hpp"
#line 4 "src/nt/mod/barrett/lib.hpp"
namespace tifa_libs {
template <u64 MOD, u64 B_ = 1>
struct barrett {
static CEXP u64 B = B_ % MOD, R = ((u128)B << 64) / MOD;
static CEXP u64 reduce(u64 a) NE {
if (u64 q = u64((u128)a * R >> 64); (a = a * B - q * MOD) >= MOD) a -= MOD;
return a;
}
};
template <> // dynamic
struct barrett<0> {
u64 mod, b, r;
CEXP barrett() NE = default;
CEXPE barrett(u64 mod, u64 b = 1) NE { reset(mod, b); }
CEXP void reset(u64 mod_, u64 b_ = 1) NE { assert(mod_), mod = mod_, b = b_ % mod, r = (u64(((u128)b << 64) / mod)); }
ND CEXP u64 reduce(u64 a) CNE {
if (cu64 q = u64((u128)a * r >> 64); (a = a * b - q * mod) >= mod) a -= mod;
return a;
}
};
} // namespace tifa_libs
#line 2 "src/math/ds/mint/_base/lib.hpp"
#line 2 "src/nt/inverse/lib.hpp"
#line 2 "src/nt/gl/inv_gcd/lib.hpp"
#line 2 "src/nt/gl/exgcd/lib.hpp"
#line 4 "src/nt/gl/exgcd/lib.hpp"
namespace tifa_libs {
// Binary exgcd
template <uint_c U, bool only_x = false>
CEXP auto exgcd_b(U a, U b) NE {
using T = to_sint_t<U>;
if CEXP (only_x) {
if (!a) return std::make_tuple(b, (T)0);
if (!b) return std::make_tuple(a, (T)1);
} else {
if (!a) return std::make_tuple(b, (T)0, (T) !!b);
if (!b) return std::make_tuple(a, (T)1, (T)0);
}
auto r = std::__countr_zero(a | b);
a >>= r, b >>= r;
T x = (T)a, y = (T)b, s = 1, t = 0, u = 0, v = 1;
while (x) {
while (!(x & 1))
if (x /= 2; !((s | t) & 1)) s /= 2, t /= 2;
else s = (s + (T)b) / 2, t = (t - (T)a) / 2;
while (!(y & 1))
if (y /= 2; !((u | v) & 1)) u /= 2, v /= 2;
else u = (u + (T)b) / 2, v = (v - (T)a) / 2;
if (x >= y) x -= y, s -= u, t -= v;
else y -= x, u -= s, v -= t;
}
if (y > 1) a /= (U)y, b /= (U)y;
if (a && (U)abs(v) >= a) {
const T _ = v / (T)a;
v -= _ * (T)a, u += _ * (T)b;
}
if (b && (U)abs(u) >= b) {
const T _ = u / (T)b;
u -= _ * (T)b, v += _ * (T)a;
}
if (const T u_ = u + (T)b, v_ = v - (T)a; abs(u_) + abs(v_) <= abs(u) + abs(v)) u = u_, v = v_;
if (const T u_ = u - (T)b, v_ = v + (T)a; abs(u_) + abs(v_) <= abs(u) + abs(v)) u = u_, v = v_;
if CEXP (only_x) return std::make_tuple(U(y << r), u);
else return std::make_tuple(U(y << r), u, v);
}
// @return then return tuple(g, x[, y]) s.t. g = gcd(a, b), xa + yb = g, |x| + |y| is the minimal (primary) and x <= y (secondarily)
template <sint_c T, bool only_x = false>
CEXP auto exgcd(T a, T b) NE {
using U = to_uint_t<T>;
if (auto [x, y] = minmax(a, b); x >= 0 && y <= T(U(-1) >> sizeof(U))) return exgcd_b<U, only_x>((U)a, (U)b);
if CEXP (only_x) {
T s = 1, u = 0;
while (b) {
T c = a / b;
std::tie(s, u, a, b) = std::make_tuple(u, s - u * c, b, a - b * c);
}
return std::make_tuple((U)a, s);
} else {
T s = 1, t = 0, u = 0, v = 1;
while (b) {
T c = a / b;
std::tie(s, t, u, v, a, b) = std::make_tuple(u, v, s - u * c, t - v * c, b, a - b * c);
}
return std::make_tuple((U)a, s, t);
}
}
} // namespace tifa_libs
#line 6 "src/nt/gl/inv_gcd/lib.hpp"
namespace tifa_libs {
template <uint_c T>
CEXP ptt<T> inv_gcd(T n, T mod) NE {
using U = to_sint_t<T>;
auto [g, x] = exgcd<U, true>(U(n % mod), (U)mod);
return {g, safe_mod(x, mod)};
}
} // namespace tifa_libs
#line 4 "src/nt/inverse/lib.hpp"
namespace tifa_libs {
// simple but slower: inv(n, mod) -> 1 < n ? mod - inv(mod % n, n) * mod / n : 1;
template <uint_c T, uint_c U>
CEXP U inverse(T n, U mod) NE {
auto [g, x] = inv_gcd(U(n % mod), mod);
assert(g == 1);
return x;
}
} // namespace tifa_libs
#line 5 "src/math/ds/mint/_base/lib.hpp"
namespace tifa_libs::mint_impl_ {
struct mint_tag_base {};
template <std::derived_from<mint_tag_base> tag_t>
struct mint : tag_t {
CEXP mint() = default;
CEXP mint(int_c auto v) NE : tag_t(v) {}
using raw_t = tag_t::raw_t;
using sraw_t = to_sint_t<raw_t>;
static CEXP sraw_t smod() NE { return (sraw_t)tag_t::mod(); }
ND CEXP sraw_t sval() CNE { return (sraw_t)tag_t::val(); }
template <int_c T>
CEXPE operator T() CNE { return (T)tag_t::val(); }
CEXP mint& operator+=(mint CR r) NE {
mint::add(r);
return *this;
}
CEXP mint& operator-=(mint CR r) NE {
mint::sub(r);
return *this;
}
CEXP mint& operator*=(mint CR r) NE {
mint::mul(r);
return *this;
}
CEXP mint& operator/=(mint CR r) NE { return *this = *this * r.inv(); }
CEXP mint CR operator+() CNE { return *this; }
CEXP mint operator-() CNE { return tag_t::template neg<mint>(); }
ND CEXP mint inv() CNE { return inverse(tag_t::val(), tag_t::mod()); }
friend CEXP mint operator+(mint l, mint CR r) NE { return l += r; }
friend CEXP mint operator-(mint l, mint CR r) NE { return l -= r; }
friend CEXP mint operator*(mint l, mint CR r) NE { return l *= r; }
friend CEXP mint operator/(mint l, mint CR r) NE { return l /= r; }
friend CEXP bool operator==(mint CR l, mint CR r) NE { return l.val() == r.val(); }
friend CEXP auto operator<=>(mint CR l, mint CR r) NE { return l.sval() <=> r.sval(); }
friend auto& operator>>(istream_c auto& is, mint& x) NE {
i64 _;
is >> _, x = mint(_);
return is;
}
friend auto& operator<<(ostream_c auto& os, mint CR x) NE { return os << x.val(); }
friend CEXP auto abs(mint CR x) NE { return x.val(); }
};
} // namespace tifa_libs::mint_impl_
#line 5 "src/math/ds/mint/bs/lib.hpp"
namespace tifa_libs {
template <u64 MOD_>
class mint_bs_tag : public mint_impl_::mint_tag_base {
static_assert(MOD_ && MOD_ <= UINT32_MAX);
using core = barrett<MOD_>;
public:
static CEXP bool FIXED_MOD = true;
protected:
using raw_t = u32;
raw_t v_{};
CEXP mint_bs_tag() NE = default;
CEXP mint_bs_tag(int_c auto v) NE : v_{mod(v)} {}
public:
static CEXP raw_t mod(sint_c auto v) NE {
if (v >= 0) return mod((to_uint_t<decltype(v)>)v);
if (auto ret = mod((to_uint_t<decltype(v)>)-v); ret) return mod() - ret;
else return ret;
}
static CEXP raw_t mod(uint_c auto v) NE {
if CEXP (umost64_c<decltype(v)>) return (raw_t)core::reduce((u64)v);
else if (v < UINT64_MAX) return (raw_t)core::reduce((u64)v);
else return raw_t(v % mod());
}
static CEXP raw_t mod() NE { return MOD_; }
ND CEXP raw_t val() CNE { return v_; }
CEXP raw_t& data() NE { return v_; }
protected:
template <class mint>
CEXP auto neg() CNE {
mint res;
if (v_) res.v_ = mod() - v_;
return res;
}
CEXP void add(mint_bs_tag CR r) NE {
if ((v_ += r.v_) >= mod()) v_ -= mod();
}
CEXP void sub(mint_bs_tag CR r) NE {
if (i32(v_ -= r.v_) < 0) v_ += mod();
}
CEXP void mul(mint_bs_tag CR r) NE { v_ = (raw_t)core::reduce(u64(v_) * r.v_); }
};
template <u64 MOD>
using mint_bs = mint_impl_::mint<mint_bs_tag<MOD>>;
} // namespace tifa_libs
#line 13 "test/cpv/library-checker-set_power_series/polynomial_composite_set_power_series.mints-bs.poly_anymod-pmtt.cpp"
using namespace tifa_libs;
using mint = mint_bs<MOD>;
using namespace tifa_libs;
using poly = polymtt<mint>;
int main() {
u32 m, n;
tifa_libs::fin_uint >> m >> n;
poly a(m);
tifa_libs::fin_uint >> a;
vec<mint> b(1 << n);
for (auto& i : b) tifa_libs::fin_uint >> i;
tifa_libs::fout << tifa_libs::comp_fpssps(n, a, b) << '\n';
return 0;
}
test/cpv/library-checker-set_power_series/polynomial_composite_set_power_series.mints-bs.poly_anymod-pmtt.cpp