// verification-helper: PROBLEM https://yukicoder.me/problems/104 #include using namespace std; #define call_from_test template struct Mint{ static constexpr T mod = MOD; T v; Mint():v(0){} Mint(signed v):v(v){} Mint(long long t){v=t%MOD;if(v<0) v+=MOD;} Mint pow(long long k){ Mint res(1),tmp(v); while(k){ if(k&1) res*=tmp; tmp*=tmp; k>>=1; } return res; } static Mint add_identity(){return Mint(0);} static Mint mul_identity(){return Mint(1);} Mint inv(){return pow(MOD-2);} Mint& operator+=(Mint a){v+=a.v;if(v>=MOD)v-=MOD;return *this;} Mint& operator-=(Mint a){v+=MOD-a.v;if(v>=MOD)v-=MOD;return *this;} Mint& operator*=(Mint a){v=1LL*v*a.v%MOD;return *this;} Mint& operator/=(Mint a){return (*this)*=a.inv();} Mint operator+(Mint a) const{return Mint(v)+=a;} Mint operator-(Mint a) const{return Mint(v)-=a;} Mint operator*(Mint a) const{return Mint(v)*=a;} Mint operator/(Mint a) const{return Mint(v)/=a;} Mint operator-() const{return v?Mint(MOD-v):Mint(v);} bool operator==(const Mint a)const{return v==a.v;} bool operator!=(const Mint a)const{return v!=a.v;} bool operator <(const Mint a)const{return v constexpr T Mint::mod; template ostream& operator<<(ostream &os,Mint m){os< vector berlekamp_massey(vector &as){ using Poly = vector; int n=as.size(); Poly bs({-T(1)}),cs({-T(1)}); T y(1); for(int ed=1;ed<=n;ed++){ int l=cs.size(),m=bs.size(); T x(0); for(int i=0;i decltype(auto) naive(){ using Poly = vector; auto conv=[](Poly as, Poly bs){ Poly cs(as.size()+bs.size()-1,0); for(int i=0;i<(int)as.size();i++) for(int j=0;j<(int)bs.size();j++) cs[i+j]+=as[i]*bs[j]; return cs; }; return +conv; } // Find k-th term of linear recurrence template struct BostanMori{ using Poly = vector; using Conv = function; Conv conv; BostanMori(Conv conv_):conv(conv_){} Poly sub(Poly as,int odd){ Poly bs((as.size()+!odd)/2); for(int i=odd;i<(int)as.size();i+=2) bs[i/2]=as[i]; return bs; } // as: initial values // cs: monic polynomial T build(long long k,Poly as,Poly cs){ reverse(cs.begin(),cs.end()); assert(cs[0]==T(1)); int n=cs.size()-1; as.resize(n,0); Poly bs=conv(as,cs); bs.resize(n); while(k){ Poly ds(cs); for(int i=1;i<(int)ds.size();i+=2) ds[i]=-ds[i]; bs=sub(conv(bs,ds),k&1); cs=sub(conv(cs,ds),0); k>>=1; } return bs[0]; } }; #undef call_from_test signed main(){ cin.tie(0); ios::sync_with_stdio(0); long long n; int p,c; cin>>n>>p>>c; using M = Mint; const int d = 1500; const int MAX = p+c+1; vector> cf(MAX,vector(d,0)); cf[0][0]=M(1); for(int v:{2,3,5,7,11,13}){ vector> nx(MAX,vector(d,0)); for(int t=0;t<=p;t++) for(int i=0;i> nx(MAX,vector(d,0)); for(int t=p;t<=p+c;t++) for(int i=0;i dp(d*3,0),as(d*3,0); dp[0]=M(1); for(int i=0;i<(int)dp.size();i++){ for(int j=0;j bm(naive()); cout<