1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
#include <bits/stdc++.h>

using namespace std;
char T[2100][2100];
int zk[2100];
int zw[2100];
int K[2100][300];
int W[2100][300];
char wierz(int i, int n, int m){
    if(zw[i] == 1){
        return '*';
    }
    char ok ='.';
    for(int ii='A'; ii<='Z'; ii++){
        if(W[i][ii]>0 and ok != '.'){
            return '*';
        }
        if(W[i][ii]>0 and ok == '.'){
            ok = char(ii);
        }
    }
    if(ok =='.'){
        return 'A';
    }
    return ok;
}

char kol(int j, int n, int m){
    if(zk[j] == 1){
        return '*';
    }
    char ok ='.';
    for(int ii='A'; ii<='Z'; ii++){
        if(K[j][ii]>0 and ok != '.'){
            return '*';
        }
        if(K[j][ii]>0 and ok == '.'){
            ok = char(ii);
        }
    }
    if(ok =='.'){
        return 'A';
    }
    return ok;
}

void zmazw(int i, int n, int m, char a){
    zw[i] = 1;
    W[i][int(a)]=0;
    for(int j=0; j<m; j++){
        if(T[i][j]!='$'){
            K[j][T[i][j]]--;
            T[i][j]='$';
        }
    }
    return;
}

void zmazk(int j, int n, int m, char a){
    zk[j] =1;
    K[j][int(a)] = 0;
    for(int i=0; i<n; i++){
        if(T[i][j]!='$'){
            W[i][T[i][j]]--;
            T[i][j]='$';
        }
    }
    return;
}
int main(){
    ios_base::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    vector< pair<char, pair<int, char> > > wyn;
    int n, m;
    cin>>n>>m;
    for(int i=0; i< n;i++){
        for(int j=0; j<m; j++){
            cin>>T[i][j];
            K[j][int(T[i][j])]++;
            W[i][int(T[i][j])]++;
        }
    }
    bool stop;
    for(int ii = 0; ii< n+m; ii++){
        stop = false;
        for(int i=0; i<n; i++){
            char spr = wierz(i, n, m);
            if( spr != '*'){
                wyn.push_back({'R', {i+1, spr}});
                zmazw(i, n, m, spr);
                stop = true;
                break;
            }
        }
        if(stop == true){
            continue;
        }
        for(int j=0;j<m;j++){
            char spr = kol(j,n,m);
            if(spr != '*'){
                wyn.push_back({'K', {j+1, spr}});
                zmazk(j, n, m, spr);
                break;
            }
        }
    }
    cout<<wyn.size()<<"\n";
    for(int i =wyn.size()-1; i>=0; i--){
        cout<<wyn[i].first<<" "<<wyn[i].second.first<<" "<<wyn[i].second.second<<"\n";
    }

}