#include using namespace std; //using namespace atcoder; struct fast_ios { fast_ios(){ cin.tie(0); ios::sync_with_stdio(false); cout << fixed << setprecision(20); }; } fast_ios_; #define FOR(i, begin, end) for(int i=(begin);i<(end);i++) #define REP(i, n) FOR(i,0,n) #define IFOR(i, begin, end) for(int i=(end)-1;i>=(begin);i--) #define IREP(i, n) IFOR(i,0,n) #define Sort(v) sort(v.begin(), v.end()) #define Reverse(v) reverse(v.begin(), v.end()) #define all(v) v.begin(),v.end() #define SZ(v) ((int)v.size()) #define Lower_bound(v, x) distance(v.begin(), lower_bound(v.begin(), v.end(), x)) #define Upper_bound(v, x) distance(v.begin(), upper_bound(v.begin(), v.end(), x)) #define chmax(a, b) a = max(a, b) #define chmin(a, b) a = min(a, b) #define bit(n) (1LL<<(n)) #define debug(x) cout << #x << "=" << x << endl; #define vdebug(v) { cout << #v << "=" << endl; REP(i_debug, v.size()){ cout << v[i_debug] << ","; } cout << endl; } #define mdebug(m) { cout << #m << "=" << endl; REP(i_debug, m.size()){ REP(j_debug, m[i_debug].size()){ cout << m[i_debug][j_debug] << ","; } cout << endl;} } #define pb push_back #define fi first #define se second #define int long long #define INF 1000000000000000000 template istream &operator>>(istream &is, vector &v){ for (auto &x : v) is >> x; return is; } template ostream &operator<<(ostream &os, vector &v){ for(int i = 0; i < v.size(); i++) { cout << v[i]; if(i != v.size() - 1) cout << endl; }; return os; } template ostream &operator<<(ostream &os, pair p){ cout << '(' << p.first << ',' << p.second << ')'; return os; } template void Out(T x) { cout << x << endl; } template void chOut(bool f, T1 y, T2 n) { if(f) Out(y); else Out(n); } using vec = vector; using mat = vector; using Pii = pair; using v_bool = vector; using v_Pii = vector; //int dx[4] = {1,0,-1,0}; //int dy[4] = {0,1,0,-1}; //char d[4] = {'D','R','U','L'}; const int mod = 1000000007; //const int mod = 998244353; signed main(){ int N; cin >> N; vec A(N); cin >> A; vec B(N); cin >> B; vec vr; v_Pii ans; REP(i, N + 1){ if(i == N || B[i] <= A[i]){ IREP(j, SZ(vr)){ REP(_, B[vr[j]] - A[vr[j]]) ans.pb(Pii(vr[j], 0)); } vr.resize(0); } if(i < N && B[i] < A[i]){ REP(_, A[i] - B[i]) ans.pb(Pii(i, 1)); } if(A[i] < B[i]){ vr.pb(i); } } Out(SZ(ans)); for(Pii p: ans){ cout << p.fi + 1 << ' ' << (p.se == 0 ? 'R' : 'L') << endl; } return 0; }