#include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include using namespace std; //#define int long long typedef long long ll; typedef unsigned long long ul; typedef unsigned int ui; constexpr ll mod =1000000007; const ll INF = mod * mod; typedef pairP; #define stop char nyaa;cin>>nyaa; #define rep(i,n) for(int i=0;i=0;i--) #define Rep(i,sta,n) for(int i=sta;i=1;i--) #define Rep1(i,sta,n) for(int i=sta;i<=n;i++) #define all(v) (v).begin(),(v).end() typedef pair LP; typedef double ld; typedef pair LDP; const ld eps = 1e-12; const ld pi = acos(-1.0); ll mod_pow(ll x, ll n, ll m = mod) { ll res = 1; while (n) { if (n & 1)res = res * x % m; x = x * x % m; n >>= 1; } return res; } struct modint { ll n; modint() :n(0) { ; } modint(ll m) :n(m) { if (n >= mod)n %= mod; else if (n < 0)n = (n % mod + mod) % mod; } operator int() { return n; } }; bool operator==(modint a, modint b) { return a.n == b.n; } modint operator+=(modint& a, modint b) { a.n += b.n; if (a.n >= mod)a.n -= mod; return a; } modint operator-=(modint& a, modint b) { a.n -= b.n; if (a.n < 0)a.n += mod; return a; } modint operator*=(modint& a, modint b) { a.n = ((ll)a.n * b.n) % mod; return a; } modint operator+(modint a, modint b) { return a += b; } modint operator-(modint a, modint b) { return a -= b; } modint operator*(modint a, modint b) { return a *= b; } modint operator^(modint a, ll n) { if (n == 0)return modint(1); modint res = (a * a) ^ (n / 2); if (n % 2)res = res * a; return res; } ll inv(ll a, ll p) { return (a == 1 ? 1 : (1 - p * inv(p % a, a)) / a + p); } modint operator/(modint a, modint b) { return a * modint(inv(b, mod)); } ll gcd(ll a, ll b) { if (a < b)swap(a, b); while (b) { ll r = a % b; a = b; b = r; } return a; } struct kitamasa { private: vector ori; int k; public: kitamasa(vector d) { k = d.size(); rep(i, k) { ori.push_back(d[i]); } } void plus1(vector& s) { vector ss; ss.push_back(s[k - 1] * ori[0]); rep1(i, k - 1) { ss.push_back((s[i - 1] + s[k - 1] * ori[i]) % mod); } rep(i, k)s[i] = ss[i]; } void multi2(vector& s) { vector memo = s; vector> v; rep(i, k) { plus1(s); v.push_back(s); } rep(i, k) { ll csum = 0; rep(j, k) { csum += memo[j] * v[j][i] % mod; csum %= mod; } s[i] = csum; } } vector calc(ll n) { n += k; vector s; s.push_back(1); rep(i, k - 1)s.push_back(0); ll cop = n; int cnt = 0; while (cop) { cnt++; cop >>= 1; } per(i, cnt - 1) { ll z = (ll)1 << i; multi2(s); if (n & z) { plus1(s); } } return s; } }; vector a = { 2,3,5,7,11,13 }; vector b = { 4,6,8,9,10,12 }; modint dp1[3901][6]; modint sum1[3901]; modint dp2[3601][6]; modint sum2[3601]; modint dp[7501]; void solve() { ll n; cin >> n; int p, c; cin >> p >> c; dp1[0][0] = 1; rep(i, p) { per(j, 13 * i + 1) { per(k, 6) { for (int l = k; l < 6; l++) { dp1[j + a[l]][l] += dp1[j][k]; } dp1[j][k] = 0; } } } dp2[0][0] = 1; rep(i, c) { per(j, 12*i + 1) { per(k, 6) { for (int l = k; l < 6; l++) { dp2[j + b[l]][l] += dp2[j][k]; } dp2[j][k] = 0; } } } rep(i, 13 * p + 1) { rep(j, 6)sum1[i] += dp1[i][j]; } rep(i, 12 * c + 1)rep(j, 6)sum2[i] += dp2[i][j]; rep(i, 13 * p + 1)rep(j, 12 * c + 1)dp[i + j] += sum1[i] * sum2[j]; int sup = 13 * p + 12 * c; vector ori(sup); rep(i, sup) { ori[i] = dp[sup-i]; } kitamasa kt(ori); ll le = max((ll)0, (ll)n - sup); //cout << "?? " << le << "\n"; vector s = kt.calc(le); int sz = min((ll)sup, n); vector val(sz); rep(i, sz) { val[i] = s.back(); kt.plus1(s); //rep(j, s.size())cout << s[j] << " "; cout << "\n"; } //cout << le << " " << s.back() << "\n"; modint ans = 0; for (int i = sz; i < sz + sup; i++) { rep(j, sup+1) { int to = i - j; if (to >= 0 && to < sz) { ans += dp[j] * (modint)val[to]; } } } /*rep(i, sup + 1)cout <> t; rep(i, t) solve(); return 0; }