#include <algorithm>
#include <iostream>
#include <cstdio>
#include <map>
#include <numeric>
#include <cmath>
#include <set>
#include <sstream>
#include <string>
#include <vector>
#include <queue>
#include <stack>
#include <complex>
#include <string.h>
#include <unordered_set>
#include <unordered_map>
#include <bitset>
#include <iomanip>
#include <sys/time.h>
#include <tuple>
#include <random>
using namespace std;

#define endl '\n'
#define ALL(v) (v).begin(), (v).end()
#define RALL(v) (v).rbegin(), (v).rend()
#define UNIQ(v) (v).erase(unique((v).begin(), (v).end()), (v).end())

typedef long long ll;
typedef long double ld;
typedef pair<int, int> P;
typedef complex<double> comp;
typedef vector< vector<ld> > matrix;
struct pairhash {
public:
    template<typename T, typename U>
    size_t operator()(const pair<T, U> &x) const {
	size_t seed = hash<T>()(x.first);
	return hash<U>()(x.second) + 0x9e3779b9 + (seed<<6) + (seed>>2);
    }
};
const int inf = 1e9 + 9;
const ll mod = 1e9 + 7;
const double eps = 1e-8;
const double pi = acos(-1);

ll n;
typedef vector<ll> vec;
typedef vector<vec> mat;

mat mult(mat &A, mat &B) {
    mat C(A.size(), vec(B[0].size()));
    for (int i = 0; i < A.size(); i++) {
        for (int k = 0; k < B.size(); k++) {
            for (int j = 0; j < B[0].size(); j++) {
                C[i][j] = (C[i][j] + A[i][k]*B[k][j] + mod) % mod;
            }
        }
    }
    return C;
}

mat pow(mat A, ll n) {
    mat B(A.size(), vec(A.size()));
    for (int i = 0; i < A.size(); i++)
        B[i][i] = 1;
    while (n > 0) {
        if (n & 1) B = mult(B, A);
        A = mult(A, A);
        n >>= 1;
    }
    return B;
}

ll solve() {
    mat A(20, vec(20, 0));
    A[0][0] = 1;
    A[1][0] = A[1][1] = A[1][2] = A[1][3] = A[1][8] = 1;
    A[2][0] = A[2][1] = A[2][2] = A[2][3] = A[2][4] = A[2][5] = 1;
    A[3][0] = A[3][1] = A[3][2] = A[3][3] = A[3][4] = A[3][5] = A[3][6] = A[3][7] = 1;
    A[4][0] = A[4][2] = A[4][3] = A[4][4] = A[4][5] = 1;
    A[5][0] = A[5][2] = A[5][3] = A[5][4] = A[5][5] = A[5][6] = 1;
    A[6][0] = A[6][3] = A[6][5] = A[6][6] = A[6][8] = 1;
    A[7][0] = /*A[7][2] =*/ A[7][1] = /*A[7][5] =*/ A[7][6] = A[7][7] = 1;
    A[8][3] = A[8][8] = 1;
    A[9][1] = A[9][2] = A[9][3] = A[9][4] = A[9][5] = A[9][6] = A[9][8] = 1;
    for (int i = 10; i < 20; i++) {
        A[i][i] = A[i][i-10] = 1;
    }
    mat B = pow(A, n+2);
    return B[19][0];
}

void input() {
    cin >> n;
}

int main() {
    ios::sync_with_stdio(false);
    cin.tie(0);
    cout << fixed << setprecision(15);

    input();
    cout << solve() << endl;
}