#include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include using namespace std; typedef long long ll; typedef unsigned long long ul; typedef unsigned int ui; typedef long double ld; const int inf=1e9+7; const ll INF=1LL<<60 ; const ll mod=1e9+7 ; #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++) typedef complex Point; const ld eps = 1e-8; const ld pi = acos(-1.0); typedef pair P; typedef pair LDP; typedef pair LP; #define fr first #define sc second #define all(c) c.begin(),c.end() #define pb push_back #define debug(x) cout << #x << " = " << (x) << endl; template inline bool chmax(T& a, T b) { if (a < b) { a = b; return 1; } return 0; } template inline bool chmin(T& a, T b) { if (a > b) { a = b; return 1; } return 0; } //#define int long long typedef vector vec; typedef vector mat; mat mul(mat &A, mat &B) { mat C(A.size(), vec(B[0].size())); for(int i = 0; i < A.size(); i++) { for(int j = 0; j < B[0].size(); j++) { for(int k = 0; k < B.size(); k++) C[i][j] = (C[i][j] + A[i][k] * B[k][j]) % 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; if(n == 0) return B; mat C(A.size(), vec(A.size())); C = pow(mul(A, A), n / 2); if(n & 1) C = mul(C, A); return C; } void solve() { ll n; cin >> n; mat A(2, vec(2)); A[0][0] = 10; A[0][1] = 3; A[1][0] = 0; A[1][1] = 1; mat C = pow(A, n); ll ans = C[0][0] + C[0][1]; cout << ans % mod << endl; } signed main() { ios::sync_with_stdio(false); cin.tie(0); //cout << fixed << setprecision(10); //init(); solve(); //cout << "finish" << endl; return 0; }