Problem: Suppose you have two polynomials <image> and <image>. Then polynomial <image> can be uniquely represented in the following way:

<image>

This can be done using [long division](https://en.wikipedia.org/wiki/Polynomial_long_division). Here, <image> denotes the degree of polynomial P(x). <image> is called the remainder of division of polynomial <image> by polynomial <image>, it is also denoted as <image>. 

Since there is a way to divide polynomials with remainder, we can define Euclid's algorithm of finding the greatest common divisor of two polynomials. The algorithm takes two polynomials <image>. If the polynomial <image> is zero, the result is <image>, otherwise the result is the value the algorithm returns for pair <image>. On each step the degree of the second argument decreases, so the algorithm works in finite number of steps. But how large that number could be? You are to answer this question. 

You are given an integer n. You have to build two polynomials with degrees not greater than n, such that their coefficients are integers not exceeding 1 by their absolute value, the leading coefficients (ones with the greatest power of x) are equal to one, and the described Euclid's algorithm performs exactly n steps finding their greatest common divisor. Moreover, the degree of the first polynomial should be greater than the degree of the second. By a step of the algorithm we mean the transition from pair <image> to pair <image>. 

Input

You are given a single integer n (1 ≤ n ≤ 150) — the number of steps of the algorithm you need to reach.

Output

Print two polynomials in the following format.

In the first line print a single integer m (0 ≤ m ≤ n) — the degree of the polynomial. 

In the second line print m + 1 integers between  - 1 and 1 — the coefficients of the polynomial, from constant to leading. 

The degree of the first polynomial should be greater than the degree of the second polynomial, the leading coefficients should be equal to 1. Euclid's algorithm should perform exactly n steps when called using these polynomials.

If there is no answer for the given n, print -1.

If there are multiple answer, print any of them.

Examples

Input

1


Output

1
0 1
0
1


Input

2


Output

2
-1 0 1
1
0 1

Note

In the second example you can print polynomials x2 - 1 and x. The sequence of transitions is

(x2 - 1, x) → (x, - 1) → ( - 1, 0).

There are two steps in it.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <typename T>
inline T abs(T a) {
  return ((a < 0) ? -a : a);
}
template <typename T>
inline T sqr(T a) {
  return a * a;
}
template <class T>
T gcd(T a, T b) {
  return a ? gcd(b % a, a) : b;
}
template <class T>
T lcm(T a, T b) {
  return a / gcd(a, b) * b;
}
template <class T>
T sign(T a) {
  return a > 0 ? 1 : (a < 0 ? -1 : 0);
}
template <class A, class B>
ostream &operator<<(ostream &out, const pair<A, B> &p) {
  return out << "(" << p.first << ", " << p.second << ")";
};
template <class A>
ostream &operator<<(ostream &out, const vector<A> &v) {
  out << "[";
  for (int i = int(0); i < int(int((v).size())); i++) {
    if (i) out << ", ";
    out << v[i];
  }
  return out << "]";
}
const int INF = int(1e9) + 100;
const long long INF64 = int(1e18) + 100;
const long double EPS = 1e-9;
const long double PI = acosl(-1.0);
const int dx[] = {-1, 0, 1, 0};
const int dy[] = {0, 1, 0, -1};
const int dxK[] = {-1, -1, 0, 1, 1, 1, 0, -1};
const int dyK[] = {0, 1, 1, 1, 0, -1, -1, -1};
const int dxKn[] = {-2, -1, 1, 2, 2, 1, -1, -2};
const int dyKn[] = {1, 2, 2, 1, -1, -2, -2, -1};
const int N = 200;
int n;
vector<pair<vector<int>, vector<int> > > ans[N];
vector<int> mul(vector<int> a, vector<int> b) {
  vector<int> c((int((a).size()) + int((b).size()) - 1), 0);
  for (int i = int(0); i < int(int((a).size())); i++)
    for (int j = int(0); j < int(int((b).size())); j++) c[i + j] += a[i] * b[j];
  return c;
}
vector<int> add(vector<int> a, vector<int> b) {
  vector<int> c(max(int((a).size()), int((b).size())), 0);
  for (int i = int(0); i < int(int((c).size())); i++) {
    if (i < int((a).size())) c[i] += a[i];
    if (i < int((b).size())) c[i] += b[i];
  }
  return c;
}
bool ok(vector<int> v) {
  for (int i = int(0); i < int(int((v).size())); i++)
    if (abs(v[i]) > 1) return false;
  return true;
}
inline bool read() {
  if (!(cin >> n)) return false;
  return true;
}
inline void solve() {
  vector<int> v1(2), v2(1);
  v1[0] = 0, v1[1] = 1;
  v2[0] = 1;
  ans[1].push_back(make_pair(v1, v2));
  v2[0] = -1;
  ans[1].push_back(make_pair(v1, v2));
  for (int i = 2; i <= n; ++i) {
    for (auto it : ans[i - 1]) {
      vector<int> Y = it.first;
      vector<int> rem = it.second;
      vector<int> c(2);
      for (int i1 = -1; i1 <= 1; ++i1)
        for (int i2 = -1; i2 <= 1; ++i2) {
          c[0] = i1, c[1] = i2;
          vector<int> X = add(mul(Y, c), rem);
          if (ok(X) && abs(X.back()) == 1 && int((ans[i]).size()) < 1000)
            ans[i].push_back(make_pair(X, Y));
        }
    }
  }
  if (int((ans[n]).size()) == 0)
    puts("-1");
  else {
    for (int i = int(0); i < int(int((ans[n]).size())); i++) {
      vector<int> a = ans[n][i].first, b = ans[n][i].second;
      if (a.back() != 1 || b.back() != 1) continue;
      cout << int((a).size()) - 1 << endl;
      for (int i = int(0); i < int(int((a).size())); i++) cout << a[i] << ' ';
      cout << endl;
      cout << int((b).size()) - 1 << endl;
      for (int i = int(0); i < int(int((b).size())); i++) cout << b[i] << ' ';
      cout << endl;
      return;
    }
  }
}
int main() {
  cout << fixed << setprecision(15);
  cerr << fixed << setprecision(15);
  while (read()) {
    solve();
  }
  return 0;
}