Problem: Because of budget cuts one IT company established new non-financial reward system instead of bonuses.

Two kinds of actions are rewarded: fixing critical bugs and suggesting new interesting features. A man who fixed a critical bug gets "I fixed a critical bug" pennant on his table. A man who suggested a new interesting feature gets "I suggested a new feature" pennant on his table.

Because of the limited budget of the new reward system only 5 "I fixed a critical bug" pennants and 3 "I suggested a new feature" pennants were bought.

In order to use these pennants for a long time they were made challenge ones. When a man fixes a new critical bug one of the earlier awarded "I fixed a critical bug" pennants is passed on to his table. When a man suggests a new interesting feature one of the earlier awarded "I suggested a new feature" pennants is passed on to his table.

One man can have several pennants of one type and of course he can have pennants of both types on his table. There are n tables in the IT company. Find the number of ways to place the pennants on these tables given that each pennant is situated on one of the tables and each table is big enough to contain any number of pennants.

Input

The only line of the input contains one integer n (1 ≤ n ≤ 500) — the number of tables in the IT company.

Output

Output one integer — the amount of ways to place the pennants on n tables.

Examples

Input

2


Output

24

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int MOD = 1e8;
const double PI = 4 * atan(1);
set<char> vowel = {'A', 'O', 'Y', 'E', 'U', 'I', 'a', 'o', 'y', 'e', 'u', 'i'};
int dx[] = {1, -1, 0, 0, 1, -1, 1, -1};
int dy[] = {0, 0, 1, -1, 1, 1, -1, -1};
long long gcd(long long a, long long b) { return (b == 0 ? a : gcd(b, a % b)); }
long long lcm(long long a, long long b) { return a * (b / gcd(a, b)); }
bool issquare(long long w) { return trunc(sqrt(w)) * trunc(sqrt(w)) == w; }
bool isprime(long long u) {
  for (long long i = 2; i <= (int)sqrt(u); i++) {
    if (u % i == 0) return 0;
  }
  return 1;
}
long long mod(long long to_mod) {
  to_mod %= MOD;
  while (to_mod < 0) to_mod += MOD;
  return to_mod % MOD;
}
long long power(long long x, long long y, long long p) {
  long long res = 1;
  x = x % p;
  while (y > 0) {
    if (y & 1) res = (res * x) % p;
    y = y >> 1;
    x = (x * x) % p;
  }
  return res;
}
long long _sieve_size;
bitset<5000005> bs;
vector<long long> primes;
void sieve(long long upperbound) {
  _sieve_size = upperbound + 1;
  bs.set();
  bs[0] = bs[1] = 0;
  for (long long i = 2; i <= _sieve_size; i++)
    if (bs[i]) {
      for (long long j = i * i; j <= _sieve_size; j += i) bs[j] = 0;
      primes.push_back(i);
    }
}
long long n, m, k, a, l, r, b, t, ans = 0, res = 0, x, y, z, xmax, xmin;
vector<long long> vv, v;
double db;
vector<vector<long long> > vvv;
map<long long, vector<long long> > adj;
char c;
bool check = true;
map<long long, long long> maa, maaa;
map<string, long long> ma;
string ch, ch1, ch2;
unordered_set<long long> ss;
long long tab[550][550];
long long nck(long long n, long long k) {
  if (n == k || k == 0) return 1;
  if (k > n) return 0;
  if (tab[n][k] != -1) return tab[n][k];
  long long to_return = nck(n - 1, k - 1) + nck(n - 1, k);
  tab[n][k] = to_return;
  return to_return;
}
int main() {
  ios_base::sync_with_stdio(false);
  memset(tab, -1, sizeof(tab));
  cin >> n;
  res = 0;
  ans = 0;
  if (n == 1) {
    cout << 1;
    return 0;
  }
  if (n >= 2) {
    res += nck(n, 1);
    res += 2 * nck(n, 2);
  }
  if (n >= 3) {
    res += nck(n, 3);
  }
  if (n >= 2) {
    ans += nck(n, 1);
    ans += 4 * nck(n, 2);
  }
  if (n >= 3) {
    ans += 6 * nck(n, 3);
  }
  if (n >= 4) {
    ans += 4 * nck(n, 4);
  }
  if (n >= 5) {
    ans += nck(n, 5);
  }
  cout << ans * res;
  return 0;
}