1 #include <iostream>
 2 #include <cstdio>
 3 #include <cstring>
 4 #include <cstdlib>
 5 #include <string>
 6 #include <vector>
 7 #include <map>
 8 #include <set>
 9 #include <queue>
10 #include <sstream>
11 #include <algorithm>
12 using namespace std;
13 const int INF = 2e9;
14 const int MOD = 1e9+7;
15 const int MAXN = 100+10;
16 
17 int n;
18 int M[MAXN][MAXN], id[MAXN][MAXN], xlink[MAXN], ylink[MAXN];
19 bool vis[MAXN];
20 
21 bool dfs(int u)
22 {
23     for(int i = 1; i<=n; i++)
24     if(M[u][i] && !vis[i])
25     {
26         vis[i] = true;
27         if(ylink[i]==-1 || dfs(ylink[i]))
28         {
29             ylink[i] = u;
30             xlink[u] = i;
31             return true;
32         }
33     }
34     return false;
35 }
36 
37 int hungary()
38 {
39     int ret = 0;
40     memset(xlink, -1, sizeof(xlink));
41     memset(ylink, -1, sizeof(ylink));
42     for(int i = 1; i<=n; i++)
43     {
44         memset(vis, 0, sizeof(vis));
45         if(dfs(i)) ret++;
46     }
47     return ret;
48 }
49 
50 int main()
51 {
52     while(scanf("%d", &n)!=EOF)
53     {
54         for(int i = 1; i<=n; i++)
55         for(int j = 1; j<=n; j++)
56             scanf("%d", &M[i][j]);
57 
58         int cnt = hungary();
59         if(cnt<n)
60         {
61             printf("-1\n");
62             continue;
63         }
64 
65         int ans = 0, op[MAXN][2];
66         for(int i = 1; i<n; i++)
67         for(int j = i+1; j<=n; j++)
68         {
69             if(xlink[j]==i)
70             {
71                 swap(xlink[j], xlink[i]);
72                 op[++ans][0] = i; op[ans][1] = j;
73                 break;
74             }
75         }
76 
77         printf("%d\n", ans);
78         for(int i = 1; i<=ans; i++)
79             printf("R %d %d\n", op[i][0], op[i][1]);
80     }
81 }