#include <bits/stdc++.h>
#include <iomanip>
#include <math.h>
#include <unistd.h>
#include <stdio.h>
#pragma GCC target("avx2")
#pragma GCC optimize("O3")
#pragma GCC optimize("unroll-loops")
#define all(a) (a).begin(),(a).end()
#define vecin(a) rep(i,a.size())cin >> a[i]
#define vecout(a) rep(i,a.size()){cout << a[i];cout << (i == a.size() - 1 ? "\n":" ");}
#define rep(i,x) for(ll i = 0;i<x;i++)
#define REP(i,x) for(ll i = 1;i<=x;i++)
#define mp make_pair
#define debug(x) cerr << #x << ": " << x << "\n"
using ll = long long;
using ld = long double;
using namespace std;
using dou = double;
const ll inf = 2147483647;
const ll INF = 1LL << 60;
const dou pi = 3.14159265358;
const ll mod = 1000000007LL;
//const ll mod = 998244353LL;
typedef pair<ll,ll> P;
using graph = vector<vector<ll>>;
template<class T, class U> inline bool chmin(T& a, const U& b){ if(a > b){ a = b; return 1; } return 0; }
template<class T, class U> inline bool chmax(T& a, const U& b){ if(a < b){ a = b; return 1; } return 0; }
template<class T, class U> inline bool change(T& a,U& b){if(a > b){swap(a,b);return 1;}return 0;}
//0の場合のアレンジに注意
template<class T>
T gcd(T a,T b){
    if(a == 0)return b;
    else if(b == 0)return a;
    if(a < b)swap(a,b);
    if(a % b == 0)return b;
    else return gcd(b,a%b);
}
template<class T>
T lcm(T a,T b){
    return a / gcd(a,b) * b;
}

//素数判定O(sqrt(N))
template<class T>
inline bool isp(T n){
    bool res = true;
    if(n == 1)return false;
    else{
        for(ll i = 2;i * i <= n;i++){
            if(n % i == 0){
                res = false;
                break;
            }
        }
        return res;
    }
}
const ll cmax = 1000000;
vector<ll> fac(cmax),finv(cmax),inv(cmax);

// テーブルを作る前処理
void COMinit() {
    fac[0] = fac[1] = 1;
    finv[0] = finv[1] = 1;
    inv[1] = 1;
    for (ll i = 2; i < cmax; i++){
        fac[i] = fac[i - 1] * i % mod;
        inv[i] = mod - inv[mod%i] * (mod / i) % mod;
        finv[i] = finv[i - 1] * inv[i] % mod;
    }
}

// 二項係数計算
ll nCk(ll n, ll k){
    if(fac[0] == 0)COMinit();
    if (n < k) return 0;
    if (n < 0 || k < 0) return 0;
    return fac[n] * (finv[k] * finv[n - k] % mod) % mod;
}
//nのm乗をMODで割ったあまりO(logm)
ll modpow(ll n,ll m,ll MOD){
    if(m == 0)return 1;
    if(m < 0)return -1;
    ll res = 1;
    while(m){
        if(m & 1)res = (res * n) % MOD;
        m >>= 1;
        n *= n;
        n %= MOD;
    }
    return res;
}
ll mypow(ll n,ll m){
    if(m == 0)return 1;
    if(m < 0)return -1;
    ll res = 1;
    while(m){
        if(m & 1)res = (res * n);
        m >>= 1;
        n *= n;
    }
    return res;
}

int main(){
    ios::sync_with_stdio(false);
    cin.tie(0);cout.tie(0);
    ll N;
    cin >> N;
    ll memo[105][4][4][4] = {};//A:0 C:1 G:2 T:3
    rep(i,4){
        rep(j,4){
            rep(k,4){
                if(i == 0 && j == 2 && k == 1)continue;
                else if(i == 0 && j == 1 && k == 2)continue;
                else if(i == 2 && j == 0 && k == 1)continue;
                else memo[3][i][j][k]++;
            }
        }
    }//021,012,201
    for(ll i = 4;i <= N;i++){
        rep(j,4){
            rep(k,4){
                rep(x,4){
                    if((x == 0 && j == 2 && k == 1) || 
                    (x == 0 && j == 1 && k == 2) || 
                    (x == 2 && j == 0 && k == 1))continue;
                    rep(y,4){//y,x,j,k
                        if((y == 0 && x == 2 && j == 1) || 
                        (y == 0 && x == 1 && j == 2) || 
                        (y == 2 && x == 0 && j == 1))continue;
                        if(y == 0 && j == 2 && k == 1)continue;
                        if(y == 0 && x == 2 && k == 1)continue;
                        memo[i][x][j][k] += memo[i - 1][y][x][j];
                        memo[i][x][j][k] %= mod;
                    }
                }
            }
        }
    }
    ll ans = 0;
    rep(i,4){
        rep(j,4){
            rep(k,4){
                ans += memo[N][i][j][k];
                ans %= mod;
            }
        }
    }
    cout << ans << endl;
    /*rep(i,4){
        rep(j,4){
            rep(k,4){
                cout << memo[4][i][j][k] << " ";
            }
            cout << "\n";
        }
    }*/
}

Measured memory_bytes: 26592