#include <bits/stdc++.h>
#define rep(i, n) for (ll i = 0; i < (ll)(n); ++i)
#define rep2(i, s, n) for (ll i = s; i < (ll)(n); i++)
#define repr(i, n) for (ll i = n; i >= 0; i--)
#define pb push_back
#define COUT(x) cout << (x) << "\n"
#define COUTF(x) cout << setprecision(15) << (x) << "\n"
#define ENDL cout << "\n"
#define DF(x) x.erase(x.begin())  // 先頭文字削除
#define ALL(x) x.begin(), x.end()
#define SZ(x) (ll) x.size()
#define SORT(x) sort(ALL(x))
#define REVERSE(x) reverse(ALL(x))
#define MAX(x, y, z) max(x, max(y, z))
#define MIN(x, y, z) min(x, min(y, z))
#define ANS cout << ans << "\n"
#define RETURN(x)    \
  cout << x << "\n"; \
  return 0
clock_t CLOCK;
#define START_TIMER CLOCK = clock()
#define SHOW_TIMER cerr << "time: " << (ld)(clock() - CLOCK) / 1000000 << "\n"
#define init() \
  cin.tie(0);  \
  ios::sync_with_stdio(false)
#define LINE cerr << "[debug] line: " << __LINE__ << "\n";
#define debug(x) cerr << "[debug] " << #x << ": " << x << "\n";
#define debugV(v)                       \
  cerr << "[debugV] " << #v << ":";     \
  rep(i, v.size()) cerr << " " << v[i]; \
  cerr << "\n";
using namespace std;
using ll = long long;
using ld = long double;
using vll = vector<ll>;
using vvll = vector<vector<ll>>;
using mll = map<ll, ll>;
using qll = queue<ll>;
using P = pair<ll, ll>;

constexpr ll INF = 0x3f3f3f3f3f3f3f3f;
constexpr ld PI = 3.141592653589793238462643383279;
ll get_digit(ll x) {
  return to_string(x).size();
}

ll gcd(ll x, ll y) {
  return y ? gcd(y, x % y) : x;
}

ll lcm(ll a, ll b) {
  return a / gcd(a, b) * b;
}

vector<P> factorize(ll n) {
  vector<P> result;
  for (ll i = 2; i * i <= n; ++i) {
    if (n % i == 0) {
      result.pb({i, 0});
      while (n % i == 0) {
        n /= i;
        result.back().second++;
      }
    }
  }
  if (n != 1) {
    result.pb({n, 1});
  }
  return result;
}

vll divisor(ll n) {
  vll ret;
  for (ll i = 1; i * i <= n; i++) {
    if (n % i == 0) {
      ret.push_back(i);
      if (i * i != n) ret.push_back(n / i);
    }
  }
  SORT(ret);
  return (ret);
}

const int mod = 1000000007;
struct mint {
  ll x;
  // コンストラクタ。引数のxが負でもxは正になるようにしている
  mint(ll x = 0) : x((x % mod + mod) % mod) {
  }
  mint operator-() const {
    return mint(-x);
  }
  mint& operator+=(const mint a) {
    if ((x += a.x) >= mod) x -= mod;
    return *this;
  }
  mint& operator-=(const mint a) {
    if ((x += mod - a.x) >= mod) x -= mod;
    return *this;
  }
  mint& operator*=(const mint a) {
    (x *= a.x) %= mod;
    return *this;
  }
  mint operator+(const mint a) const {
    return mint(*this) += a;
  }
  mint operator-(const mint a) const {
    return mint(*this) -= a;
  }
  mint operator*(const mint a) const {
    return mint(*this) *= a;
  }
  mint pow(ll t) const {
    if (!t) return 1;
    mint a = pow(t >> 1);
    a *= a;
    if (t & 1) a *= *this;
    return a;
  }

  // for prime mod
  mint inv() const {
    return pow(mod - 2);
  }
  mint& operator/=(const mint a) {
    return *this *= a.inv();
  }
  mint operator/(const mint a) const {
    return mint(*this) /= a;
  }
};
istream& operator>>(istream& is, const mint& a) {
  return is >> a.x;
}
ostream& operator<<(ostream& os, const mint& a) {
  return os << a.x;
}

signed main() {
  init();
  ll N;
  cin >> N;

  vector<map<string, mint>> dp(N + 1);
  string s = "ACGT";
  rep(i, 4) {
    rep(j, 4) {
      rep(k, 4) {
        string ss = {s[i], s[j], s[k]};
        if (ss == "AGC" || ss == "ACG" || ss == "GAC") continue;
        dp[2][ss] += 1;
      }
    }
  }

  rep2(i, 2, N - 1) {
    for (auto mm : dp[i]) {
      string ss = mm.first;
      // debug(ss);
      if (ss[0] == 'A' && ss[2] == 'G') {
        rep(j, 4) {
          if (s[j] == 'C') continue;
          string sss = {ss[1], ss[2], s[j]};
          dp[i + 1][sss] += dp[i][ss];
        }
        continue;
      }
      if (ss[1] == 'A' && ss[2] == 'C') {
        rep(j, 4) {
          if (s[j] == 'G') continue;
          string sss = {ss[1], ss[2], s[j]};
          dp[i + 1][sss] += dp[i][ss];
        }
        continue;
      }
      if (ss[1] == 'G' && ss[2] == 'A') {
        rep(j, 4) {
          if (s[j] == 'C') continue;
          string sss = {ss[1], ss[2], s[j]};
          dp[i + 1][sss] += dp[i][ss];
        }
        continue;
      }
      if (ss[1] == 'A' && ss[2] == 'G') {
        rep(j, 4) {
          if (s[j] == 'C') continue;
          string sss = {ss[1], ss[2], s[j]};
          dp[i + 1][sss] += dp[i][ss];
        }
        continue;
      }
      if (ss[0] == 'A' && ss[1] == 'G') {
        rep(j, 4) {
          if (s[j] == 'C') continue;
          string sss = {ss[1], ss[2], s[j]};
          dp[i + 1][sss] += dp[i][ss];
        }
        continue;
      }
      rep(j, 4) {
        string sss = {ss[1], ss[2], s[j]};
        dp[i + 1][sss] += dp[i][ss];
      }
    }
  }

  mint ans = 0;
  for (auto mm : dp[N - 1]) {
    ans += mm.second;
  }
  ANS;

  return 0;
}

Measured memory_bytes: 4056