#include #include using namespace std; using namespace atcoder; typedef long long int ll; typedef long double ld; typedef vector vi; typedef vector vl; typedef vector vvl; typedef vector vvvl; typedef vector vvvvl; typedef vector vb; typedef vector vvb; typedef vector vvvb; typedef vector vvvvb; typedef pair pl; typedef pair ppl; typedef pair pppl; typedef pair pppppl; #define rep(i,a,b) for(int i=(a);i<(b);i++) #define rrep(i,a,b) for(int i=(b)-1;i>=(a);i--) #define all(a) begin(a),end(a) #define sz(a) (int)(a).size() #define F first #define S second #define bs(A,x) binary_search(all(A),x) #define lb(A,x) (ll)(lower_bound(all(A),x)-A.begin()) #define ub(A,x) (ll)(upper_bound(all(A),x)-A.begin()) #define cou(A,x) (ll)(upper_bound(all(A),x)-lower_bound(all(A),x)) templateusing min_priority_queue=priority_queue,greater>; templatebool chmax(T&a,T b){if(abool chmin(T&a,T b){if(b vm; typedef vector vvm; typedef vector vvvm; typedef vector vvvvm; ostream&operator<<(ostream&os,mint a){os<>(istream&is,mint&a){int x;is>>x;a=mint(x);return is;} //*/ templateostream&operator<<(ostream&os,pairp){os<istream&operator>>(istream&is,pair&p){is>>p.F>>p.S;return is;} templateostream&operator<<(ostream&os,vectorv){rep(i,0,sz(v))os<istream&operator>>(istream&is,vector&v){for(T&in:v)is>>in;return is;} vm inv(const vm&f){ vm g{1/f[0]}; while(sz(g)sync_with_stdio(0); cin.exceptions(cin.failbit); ll N,M;cin>>N>>M; vl V(N);cin>>V; queue>Q; rep(i,0,N)Q.emplace(make_pair(vm{1},vm{1,-V[i]})); while(sz(Q)>1){ queue>_Q; while(sz(Q)>1){ auto[p,q]=Q.front();Q.pop(); auto[r,s]=Q.front();Q.pop(); auto f=convolution(p,s),g=convolution(q,r); rep(i,0,sz(g)){ if(i==sz(f))f.emplace_back(g[i]); else f[i]+=g[i]; } _Q.emplace(make_pair(f,convolution(q,s))); } if(sz(Q))_Q.emplace(Q.front()); Q=_Q; } auto[p,q]=Q.front(); q.resize(100010); auto F=convolution(p,inv(q)); vb prime(2e6,1); rep(i,2,2e6)if(prime[i])for(ll j=2*i;j