#include <iostream>
#include <string>
#include <algorithm>
#include <vector>
#include <cmath>
#include <queue>
#include <deque>
#include <map>
#include <set>
#include <tuple>
#include <stack>
#include <bitset>
#include <utility>
#include<iomanip>
// #include <numeric>
using namespace std;



typedef unsigned long ul;
typedef unsigned long long ull;
typedef long long ll;
typedef vector<ll> vint;
typedef vector<vector<ll>> vvint;
typedef vector<string> vstring;
typedef vector<vector<string>> vvstring;
typedef vector<char> vchar;
typedef vector<vector<char>> vvchar;
typedef vector<long double> vdouble;
typedef vector<vector<long double>> vvdouble;
typedef vector<vector<vector<long double>>> vvvdouble;
typedef pair<ll,ll> pint;
typedef vector<pint> vpint;
typedef vector<bool> vbool;
typedef vector<vector<bool>> vvbool;
typedef vector<vector<vector<bool>>> vvvbool;

#define rep(i,n) for(ll i=0;i<n;i++)
#define repf(i,f,n) for(ll i=f;i<n;i++)
#define repr(i,n) for(ll i=n-1;i>=0;i--)
#define mp make_pair
#define mt make_tuple
#define pb push_back
#define pf push_front
#define fi first
#define se second
#define INT_MAX 2147483647
#define LLONG_MAX 9223372036854775807
#define vmax(vec) *max_element(vec.begin(), vec.end())
#define vmin(vec) *min_element(vec.begin(), vec.end())
#define vsort(vec) sort(vec.begin(), vec.end())
#define vsortgr(vec) sort(vec.begin(), vec.end(), greater<ll>())
#define MOD 1000000007


//
// struct Node{
//   vint children;
//   ll index;
//   ll prop;
// };
// struct edge{ll to; ll cost;};



int dy[]={0, 0, 1, -1};
int dx[]={1, -1, 0, 0,};

// ll X,Y,Z,K;
// ll pmax = 30000000000;
// vint A,B,C;




// struct UnionFind {
//     vector<int> par; // par[i]:iの親の番号　(例) par[3] = 2 : 3の親が2
//
//     UnionFind(int N) : par(N) { //最初は全てが根であるとして初期化
//         for(int i = 0; i < N; i++) par[i] = i;
//     }
//
//     int root(int x) { // データxが属する木の根を再帰で得る：root(x) = {xの木の根}
//         if (par[x] == x) return x;
//         return par[x] = root(par[x]);
//     }
//
//     void unite(int x, int y) { // xとyの木を併合
//         int rx = root(x); //xの根をrx
//         int ry = root(y); //yの根をry
//         if (rx == ry) return; //xとyの根が同じ(=同じ木にある)時はそのまま
//         par[rx] = ry; //xとyの根が同じでない(=同じ木にない)時：xの根rxをyの根ryにつける
//     }
//
//     bool same(int x, int y) { // 2つのデータx, yが属する木が同じならtrueを返す
//         int rx = root(x);
//         int ry = root(y);
//         return rx == ry;
//     }
// };
//
// vint divisor(ll n){ // nの約数
//   vint ret;
//   for(ll i=1;i*i<=n;i++){
//     if(n%i == 0){
//       ret.pb(i);
//       if(i*i!=n) ret.pb(n/i);
//     }
//   }
//   vsort(ret);
//   return ret;
// }
//
ll my_pow(ll x, ll y){
  ll rtn = 1;
  rep(i,y) rtn*=x;
  return rtn;
}

ll get_digits_num(ll n){
  ll ret=0;
  while(n){
    n/=10;
    ret++;
  }
  return ret;
}

ll gcd(ll m, ll n){
  if(m<n) swap(m,n);
  if(n==0) return m;
  return gcd(n, m%n);
}



ll get_digits_in(ll n,ll m, ll max_digits){
  rep(i,max_digits-m){
    n/=10;
  }
  return n%10;
}

ll dp[101][4][4][4];

int main() {
  cout<<fixed<<setprecision(10);

  ll n;cin>>n;

  // init
  rep(i,4){
    rep(j,4){
      rep(k,4){
        dp[3][i][j][k] = 1;
      }
    }
  }
  dp[3][0][1][2] = dp[3][1][0][2] = dp[3][0][2][1] = 0;

  repf(i,4,n+1){
    rep(j,4){
      rep(k,4){
        rep(l,4){
          rep(m,4){
            if(k==0&&l==1&&m==2) continue;
            if(k==1&&l==0&&m==2) continue;
            if(k==0&&l==2&&m==1) continue;
            if(j==0&&l==1&&m==2) continue;
            if(j==0&&k==1&&m==2) continue;
            dp[i][k][l][m] += dp[i-1][j][k][l];
            dp[i][k][l][m] %= MOD;

          }
        }
      }
    }
  }

  ll ans = 0;
  rep(i,4){
    rep(j,4){
      rep(k,4){
        ans += dp[n][i][j][k];
        ans %= MOD;
      }
    }
  }
  cout<<ans<<endl;

}

















//


Measured memory_bytes: 256