Problem: There was an epidemic in Monstropolis and all monsters became sick. To recover, all monsters lined up in queue for an appointment to the only doctor in the city.

Soon, monsters became hungry and began to eat each other. 

One monster can eat other monster if its weight is strictly greater than the weight of the monster being eaten, and they stand in the queue next to each other. Monsters eat each other instantly. There are no monsters which are being eaten at the same moment. After the monster A eats the monster B, the weight of the monster A increases by the weight of the eaten monster B. In result of such eating the length of the queue decreases by one, all monsters after the eaten one step forward so that there is no empty places in the queue again. A monster can eat several monsters one after another. Initially there were n monsters in the queue, the i-th of which had weight ai.

For example, if weights are [1, 2, 2, 2, 1, 2] (in order of queue, monsters are numbered from 1 to 6 from left to right) then some of the options are:

  1. the first monster can't eat the second monster because a1 = 1 is not greater than a2 = 2; 
  2. the second monster can't eat the third monster because a2 = 2 is not greater than a3 = 2; 
  3. the second monster can't eat the fifth monster because they are not neighbors; 
  4. the second monster can eat the first monster, the queue will be transformed to [3, 2, 2, 1, 2]. 



After some time, someone said a good joke and all monsters recovered. At that moment there were k (k ≤ n) monsters in the queue, the j-th of which had weight bj. Both sequences (a and b) contain the weights of the monsters in the order from the first to the last.

You are required to provide one of the possible orders of eating monsters which led to the current queue, or to determine that this could not happen. Assume that the doctor didn't make any appointments while monsters were eating each other.

Input

The first line contains single integer n (1 ≤ n ≤ 500) — the number of monsters in the initial queue.

The second line contains n integers a1, a2, ..., an (1 ≤ ai ≤ 106) — the initial weights of the monsters.

The third line contains single integer k (1 ≤ k ≤ n) — the number of monsters in the queue after the joke. 

The fourth line contains k integers b1, b2, ..., bk (1 ≤ bj ≤ 5·108) — the weights of the monsters after the joke. 

Monsters are listed in the order from the beginning of the queue to the end.

Output

In case if no actions could lead to the final queue, print "NO" (without quotes) in the only line. 

Otherwise print "YES" (without quotes) in the first line. In the next n - k lines print actions in the chronological order. In each line print x — the index number of the monster in the current queue which eats and, separated by space, the symbol 'L' if the monster which stays the x-th in the queue eats the monster in front of him, or 'R' if the monster which stays the x-th in the queue eats the monster behind him. After each eating the queue is enumerated again. 

When one monster eats another the queue decreases. If there are several answers, print any of them.

Examples

Input

6
1 2 2 2 1 2
2
5 5


Output

YES
2 L
1 R
4 L
3 L


Input

5
1 2 3 4 5
1
15


Output

YES
5 L
4 L
3 L
2 L


Input

5
1 1 1 3 3
3
2 1 6


Output

NO

Note

In the first example, initially there were n = 6 monsters, their weights are [1, 2, 2, 2, 1, 2] (in order of queue from the first monster to the last monster). The final queue should be [5, 5]. The following sequence of eatings leads to the final queue:

  * the second monster eats the monster to the left (i.e. the first monster), queue becomes [3, 2, 2, 1, 2]; 
  * the first monster (note, it was the second on the previous step) eats the monster to the right (i.e. the second monster), queue becomes [5, 2, 1, 2]; 
  * the fourth monster eats the mosnter to the left (i.e. the third monster), queue becomes [5, 2, 3]; 
  * the finally, the third monster eats the monster to the left (i.e. the second monster), queue becomes [5, 5]. 



Note that for each step the output contains numbers of the monsters in their current order in the queue.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
using LL = long long;
using LD = long double;
using vi = vector<int>;
using vll = vector<LL>;
using pii = pair<int, int>;
using vpii = vector<pair<int, int>>;
inline int sqr(int x) { return x * x; }
inline int cube(int x) { return x * x * x; }
inline LL sqrLL(LL x) { return x * x; }
inline LL cubeLL(LL x) { return x * x * x; }
const LL LLINF = 9223372036854775807LL;
const LL LLINF17 = 100000000000000000LL;
const int INF = 1000000000;
const int INF9 = 1000000000;
LL MOD = 1000000007;
const double eps = 1e-7;
const double PI = acos(-1.0);
template <typename T>
void check(T& a, const T& b) {
  if (a >= b) {
    a %= b;
  }
}
template <typename T>
T gcd(T u, T v) {
  if (u == v) return u;
  if (u == 0) return v;
  if (v == 0) return u;
  if (~u & 1) {
    if (v & 1)
      return gcd(u >> 1, v);
    else
      return gcd(u >> 1, v >> 1) << 1;
  }
  if (~v & 1) return gcd(u, v >> 1);
  if (u > v) return gcd((u - v) >> 1, v);
  return gcd((v - u) >> 1, u);
}
LL mulmod(LL a, LL b, LL m) {
  LL q = (LL)(((LD)a * (LD)b) / (LD)m);
  LL r = a * b - q * m;
  if (r > m) r %= m;
  if (r < 0) r += m;
  return r;
}
template <typename T, typename S>
T expo(T e, S n) {
  T x = 1, p = e;
  while (n) {
    if (n & 1) x = x * p;
    p = p * p;
    n >>= 1;
  }
  return x;
}
template <typename T>
T powerL(T e, T n, T& m) {
  T x = 1, p = e;
  while (n) {
    if (n & 1) x = mulmod(x, p, m);
    p = mulmod(p, p, m);
    n >>= 1;
  }
  return x;
}
const int N = (int)510;
int a[N], k1, b[N], pre[N];
map<int, vi> pos;
int possible[510];
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  int n;
  cin >> n;
  a[0] = (int)1e7;
  a[n + 1] = (int)1e7;
  for (int(i) = (1); (i) <= (n); (i)++)
    cin >> a[i], pre[i] += pre[i - 1] + a[i], pos[a[i]].push_back(i);
  cin >> k1;
  for (int(i) = (1); (i) <= (k1); (i)++) cin >> b[i];
  bool can = 0;
  int n1 = n;
  int last = 1;
  vector<pair<int, char>> ans;
  if (k1 == n) {
    for (int i = 1; i <= n; i++) {
      if (a[i] != b[i])
        cout << "NO"
             << "\n",
            exit(0);
    }
    cout << "YES"
         << "\n";
    return 0;
  }
  int temparr[510];
  int prev = 1;
  for (int i = 1; i <= k1; i++) {
    int found = 0;
    int found_pos = -1;
    for (int j = prev; j <= n; j++) {
      int idx = lower_bound(pre + j, pre + n, b[i] + pre[j - 1]) - pre;
      if (idx <= n && pre[idx] - pre[j - 1] == b[i]) {
        int maxn = -1;
        for (int k = j; k <= idx; k++) {
          maxn = max(maxn, a[k]);
        }
        if (idx == j) {
          found = 1;
        } else
          for (int k = j; k <= idx;) {
            if (maxn == a[k] && k == j && a[k + 1] != maxn) {
              found = 1;
              int prev = k;
              k++;
              while (k <= idx) {
                k++;
                ans.push_back({prev, 'R'});
              }
            } else if (maxn == a[k] && k == idx && a[k - 1] != maxn) {
              found = 1;
              int k2 = k;
              while (k2 > j) {
                ans.push_back({k2, 'L'});
                k2--;
              }
              k++;
            } else if (maxn == a[k] && k != j && a[k - 1] != maxn) {
              found = 1;
              int k2 = k;
              while (k2 > j) {
                ans.push_back({k2, 'L'});
                k2--;
              }
              while (k < idx) {
                ans.push_back({j, 'R'});
                k++;
              }
              k++;
            } else if (maxn == a[k] && k != idx && a[k + 1] != maxn) {
              found = 1;
              int k2 = k;
              k++;
              while (k <= idx) {
                ans.push_back({k2, 'R'});
                k++;
              }
              while (k2 > j) {
                ans.push_back({k2, 'L'});
                k2--;
              }
            } else
              k++;
          }
      }
      if (found) {
        a[j] = b[i];
        memset(temparr, -1, sizeof temparr);
        prev = j + 1;
        for (int k = idx + 1, x = 0; k <= n; x++, k++) {
          temparr[x] = a[k];
        }
        for (int k = j + 1, x = 0; k <= n; x++, k++) {
          a[k] = temparr[x];
        }
        int prevn = n;
        n = 0;
        for (int k = 1; k <= prevn && a[k] != -1; k++) {
          n++;
        }
        memset(pre, 0, sizeof pre);
        for (int k = 1; k <= n; k++) {
          pre[k] += pre[k - 1] + a[k];
        }
        break;
      }
    }
    if (!found) {
      cout << "NO"
           << "\n";
      return 0;
    }
  }
  if (n != k1) {
    cout << "NO"
         << "\n";
    return 0;
  }
  cout << "YES"
       << "\n";
  for (pair<int, char> i : ans) {
    cout << i.first << " " << i.second << "\n";
  }
  return 0;
}