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 long long MOD = 1e9 + 7;
template <class T>
inline bool MX(T &l, const T &r) {
  return l < r ? l = r, 1 : 0;
}
template <class T>
inline bool MN(T &l, const T &r) {
  return l > r ? l = r, 1 : 0;
}
int N;
vector<long long> as, bs;
vector<char> ans;
long long sec;
void Imp() {
  cout << "IMPOSSIBLE\n";
  exit(0);
}
void Answer() {
  if (sec > 200000) {
    cout << "BIG\n";
    cout << sec << endl;
    exit(0);
  }
  cout << "SMALL\n";
  cout << ans.size() << endl;
  reverse((ans).begin(), (ans).end());
  for (char c : ans) cout << c;
  cout << endl;
  exit(0);
}
void Extra() {
  multiset<long long> ast, bst;
  for (int(i) = 0; (i) < (2); ++(i)) {
    ast.insert(as[i]);
    bst.insert(bs[i]);
  }
  bool found = 0;
  long long ad = -1;
  for (int(i) = 0; (i) < (2); ++(i)) {
    for (int(j) = 0; (j) < (1); ++(j)) {
      if (as[i] == bs[j]) {
        ad = as[i];
        ast.erase(ast.find(as[i]));
        bst.erase(bst.find(bs[j]));
        found = 1;
        break;
      }
    }
    if (found) break;
  }
  assert(found && ast.size() == 1 && bst.size() == 1);
  long long p = *ast.begin();
  long long q = *bst.begin();
  if ((q - p) % ad) Imp();
  long long t = (q - p) / ad;
  if (t + sec <= 200000) {
    for (int(i) = 0; (i) < (t); ++(i)) {
      ans.emplace_back('P');
    }
    if (as[0] > as[1]) ans.emplace_back('R');
    reverse((ans).begin(), (ans).end());
    cout << "SMALL\n";
    cout << ans.size() << endl;
    for (char c : ans) cout << c;
    cout << endl;
    exit(0);
  }
  cout << "BIG\n";
  cout << t + sec << endl;
  exit(0);
}
void Check() {
  int cnt = 0;
  for (int(j) = 0; (j) < (2); ++(j)) {
    bool doubt = 0;
    for (int(i) = 0; (i) < (N); ++(i)) {
      if (as[i] > bs[i]) {
        doubt = 1;
        break;
      }
    }
    cnt += doubt;
    reverse((as).begin(), (as).end());
  }
  if (cnt == 2) {
    Imp();
  }
}
void Gcd() {
  ans.clear();
  vector<long long> ts;
  if (bs[0] > bs[1]) {
    ans.emplace_back('R');
    swap(bs[0], bs[1]);
  }
  long long cnt = 0;
  while (1) {
    if (bs[0] == as[1] || bs[0] == as[0]) {
      break;
    }
    Check();
    long long h = bs[1] / bs[0];
    ts.emplace_back(h);
    cnt += h;
    bs[1] = bs[1] % bs[0];
    swap(bs[0], bs[1]);
  }
  multiset<long long> ast, bst;
  for (int(i) = 0; (i) < (2); ++(i)) {
    ast.insert(as[i]);
    bst.insert(bs[i]);
  }
  bool found = 0;
  long long ad = -1;
  for (int(i) = 0; (i) < (2); ++(i)) {
    for (int(j) = 0; (j) < (1); ++(j)) {
      if (as[i] == bs[j]) {
        ad = as[i];
        ast.erase(ast.find(as[i]));
        bst.erase(bst.find(bs[j]));
        found = 1;
        break;
      }
    }
    if (found) break;
  }
  assert(found && ast.size() == 1 && bst.size() == 1);
  long long p = *ast.begin();
  long long q = *bst.begin();
  if ((q - p) % ad) Imp();
  long long t = (q - p) / ad;
  if (cnt + t + sec <= 200000) {
    for (long long g : ts) {
      for (int(i) = 0; (i) < (g); ++(i)) {
        ans.emplace_back('P');
      }
      ans.emplace_back('R');
    }
    for (int(i) = 0; (i) < (t); ++(i)) {
      ans.emplace_back('P');
    }
    if (as[0] > as[1]) ans.emplace_back('R');
    reverse((ans).begin(), (ans).end());
    cout << "SMALL\n";
    cout << ans.size() << endl;
    for (char c : ans) cout << c;
    cout << endl;
    exit(0);
  }
  cout << "BIG\n";
  cout << cnt + t + sec << endl;
  exit(0);
}
signed main() {
  ios_base::sync_with_stdio(false);
  cout << fixed << setprecision(0);
  cin >> N;
  for (int(i) = 0; (i) < (N); ++(i)) {
    long long a;
    cin >> a;
    as.emplace_back(a);
  }
  for (int(i) = 0; (i) < (N); ++(i)) {
    long long a;
    cin >> a;
    bs.emplace_back(a);
  }
  if (N == 1) {
    if (as[0] == bs[0]) Answer();
    Imp();
  }
  if (N == 2) {
    Gcd();
  }
  Check();
  bool considered = 0;
  auto ras = as;
  reverse((ras).begin(), (ras).end());
  while (1) {
    if (as == bs) {
      Answer();
    }
    if (ras == bs) {
      ans.emplace_back('R');
      Answer();
    }
    if (N == 2 && !considered) {
      bool cond = as[1] == bs[0] || as[0] == bs[0];
      if (cond) {
        Extra();
        considered = 1;
      }
    }
    if (bs[0] > bs[N - 1]) {
      ans.emplace_back('R');
      reverse((bs).begin(), (bs).end());
    }
    ans.emplace_back('P');
    sec++;
    for (int(i) = (N)-1; (i) >= (1); --(i)) {
      bs[i] -= bs[i - 1];
      if (bs[i] < 1) {
        Imp();
      }
    }
    if (bs[0] < 1) Imp();
  }
}