Problem: Oh, no!

The coronavirus has caught you, and now you're sitting in a dark cellar, with tied legs (but not hands). You have a delicious cookie, a laptop in front of you, and your ideal development environment is open. The coronavirus convinces you to solve the following problem.

You are given two arrays A and B of size n. You can do operations of two types with array A: 

  * Reverse array A. That is the array [A_1,\ A_2,\ …,\ A_n] transformes into [A_n,\ A_{n-1},\ …,\ A_1]. 
  * Replace A with an array of its prefix sums. That is, the array [A_1,\ A_2,\ …,\ A_n] goes to [A_1,\ (A_1+A_2),\ …,\ (A_1+A_2+…+A_n)]. 



You need to understand if you can get an array B from the array A. If it is possible, you will have to restore the order of these operations by minimizing the number of operations of the second type. Fortunately, the coronavirus is good today, so he has allowed you not to restore actions if the minimum number of second type operations is more than 2⋅ 10^5. But coronavirus resents you, so if you restore the answer, the total number of operations should not exceed 5⋅ 10^5.

Solve this problem and get the cookie, or the coronavirus will extend the quarantine for five years and make the whole economy collapse! 

Input

The first line contains a single integer n (1≤ n ≤ 2⋅ 10^5).

The second line contains n integers A_1, A_2, …, A_n (1 ≤ A_i ≤ 10 ^ {12}).

The third line contains n integers B_1, B_2, …, B_n (1 ≤ B_i ≤ 10 ^ {12}).

Output

If you cannot get B from the A array, print "IMPOSSIBLE" (without quotes) on a single line.

If the minimum number of operations of the second type exceeds 2⋅ 10^5, print "BIG" (without quotes). In the second line print the number of operations of the second type, that needs to be applied to get array B from A.

Otherwise, in the first line print "SMALL" (without quotes). In the second line print the total number of operations of the first and second types m ≤ 5⋅ 10^5 (it is guaranteed that in this case there is such a sequence of actions). In the third line print a line of length m, consisting of characters 'R"and 'P' (without quotes).

The i-th character should be 'R', if the i-th action is of the first type, and should be 'P', otherwise.

If there are several such sequences, you can print any of them.

You can print each character in the uppercase or in the lowercase.

Examples

Input


2
5 7
5 7


Output


SMALL
0



Input


2
1 1
300000 1


Output


BIG
299999


Input


2
10 1
13 14


Output


SMALL
6
RPPPRP


Input


3
1 2 1
2 1 2


Output


IMPOSSIBLE

Note

In the first example, the arrays A and B already equal, so the number of required operations =0.

In the second example, we need to replace A with the prefix sums 299999 times and then reverse the array. Since 299999>2⋅ 10^5, there is no need to restore the answer.

In the fourth example, you cannot get B from the A.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int MOD = (int)1e9 + 7;
const int FFTMOD = 119 << 23 | 1;
const int INF = (int)1e9 + 23111992;
const long long LINF = (long long)1e18 + 23111992;
const long double PI = acos((long double)-1);
const long double EPS = 1e-9;
inline long long gcd(long long a, long long b) {
  long long r;
  while (b) {
    r = a % b;
    a = b;
    b = r;
  }
  return a;
}
inline long long lcm(long long a, long long b) { return a / gcd(a, b) * b; }
inline long long fpow(long long n, long long k, int p = MOD) {
  long long r = 1;
  for (; k; k >>= 1) {
    if (k & 1) r = r * n % p;
    n = n * n % p;
  }
  return r;
}
template <class T>
inline int chkmin(T& a, const T& val) {
  return val < a ? a = val, 1 : 0;
}
template <class T>
inline int chkmax(T& a, const T& val) {
  return a < val ? a = val, 1 : 0;
}
inline unsigned long long isqrt(unsigned long long k) {
  unsigned long long r = sqrt(k) + 1;
  while (r * r > k) r--;
  return r;
}
inline long long icbrt(long long k) {
  long long r = cbrt(k) + 1;
  while (r * r * r > k) r--;
  return r;
}
inline void addmod(int& a, int val, int p = MOD) {
  if ((a = (a + val)) >= p) a -= p;
}
inline void submod(int& a, int val, int p = MOD) {
  if ((a = (a - val)) < 0) a += p;
}
inline int mult(int a, int b, int p = MOD) { return (long long)a * b % p; }
inline int inv(int a, int p = MOD) { return fpow(a, p - 2, p); }
inline int sign(long double x) { return x < -EPS ? -1 : x > +EPS; }
inline int sign(long double x, long double y) { return sign(x - y); }
mt19937 mt(chrono::high_resolution_clock::now().time_since_epoch().count());
inline int mrand() { return abs((int)mt()); }
inline int mrand(int k) { return abs((int)mt()) % k; }
void chemthan() {
  int n;
  cin >> n;
  vector<long long> a(n);
  vector<long long> b(n);
  for (int i = (0); i < (n); ++i) cin >> a[i];
  for (int i = (0); i < (n); ++i) cin >> b[i];
  if (n == 1) {
    if (a[0] != b[0]) {
      cout << "IMPOSSIBLE\n";
      return;
    } else {
      cout << "SMALL\n";
      cout << 0 << "\n";
      return;
    }
  }
  long long sa = accumulate((a).begin(), (a).end(), 0LL);
  vector<long long> res;
  while (sa < accumulate((b).begin(), (b).end(), 0LL)) {
    int fa = 0;
    for (int i = (0); i < (n - 1); ++i) {
      if (b[i] < b[i + 1]) {
        fa |= 1;
      } else if (b[i + 1] < b[i]) {
        fa |= 2;
      } else {
        fa |= 4;
      }
    }
    if ((((fa) >> (2)) & 1) || ((((fa) >> (0)) & 1) && (((fa) >> (1)) & 1))) {
      break;
    }
    if (fa == 2) {
      reverse((b).begin(), (b).end());
      res.push_back(1);
    }
    if (!b[0]) {
      break;
    }
    if (n == 2) {
      long long lo = 0, hi = b[1] / b[0];
      while (lo < hi) {
        long long mi = lo + hi >> 1;
        if (sa < b[0] + b[1] - b[0] * mi) {
          lo = mi + 1;
        } else {
          hi = mi;
        }
      }
      long long mi = lo + hi >> 1;
      b[1] -= mi * b[0];
      if (mi) {
        res.push_back(-mi);
      }
    } else {
      for (int i = (n)-1; i >= (1); --i) b[i] -= b[i - 1];
      res.push_back(-1);
    }
  }
  int found = 0;
  for (int i = (0); i < (n); ++i) {
    if (a[i] != b[i]) {
      found = 1;
    }
  }
  if (found) {
    reverse((b).begin(), (b).end());
    res.push_back(1);
  }
  found = 0;
  for (int i = (0); i < (n); ++i) {
    if (a[i] != b[i]) {
      found = 1;
    }
  }
  if (found) {
    cout << "IMPOSSIBLE\n";
    return;
  }
  long long total = 0;
  for (auto e : res) {
    if (e < 0) {
      total += -e;
      chkmin(total, LINF);
    }
  }
  if (2e5 < total) {
    cout << "BIG\n";
    cout << total << "\n";
    return;
  }
  reverse((res).begin(), (res).end());
  string sres;
  for (auto x : res) {
    if (x < 0) {
      for (int j = (0); j < (-x); ++j) {
        sres += "P";
      }
    } else {
      sres += "R";
    }
  }
  cout << "SMALL\n";
  cout << int((sres).size()) << "\n";
  cout << sres << "\n";
}
int main(int argc, char* argv[]) {
  ios_base::sync_with_stdio(0), cin.tie(0);
  if (argc > 1) {
    assert(freopen(argv[1], "r", stdin));
  }
  if (argc > 2) {
    assert(freopen(argv[2], "wb", stdout));
  }
  chemthan();
  cerr << "\nTime elapsed: " << 1000 * clock() / CLOCKS_PER_SEC << "ms\n";
  return 0;
}