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
#include <iostream>
#include <algorithm>
#include <vector>
#include <string>
#include <sstream>

using namespace std;

int wys, szer, kol[2000]['Z'-'A'+1], wier[2000]['Z'-'A'+1];

int kolorKol(int k)
{
    int wyn=-1;
    for (int i=0; i<'Z'-'A'+1; ++i)
        if (kol[k][i])
        {
            if (wyn!=-1)
                return -1;
            wyn=i;
        }
    return wyn==-1 ? 0 : wyn;
}

int kolorWier(int w)
{
    int wyn=-1;
    for (int i=0; i<'Z'-'A'+1; ++i)
        if (wier[w][i])
        {
            if (wyn!=-1)
                return -1;
            wyn=i;
        }
    return wyn==-1 ? 0 : wyn;
}

int main()
{
    ios_base::sync_with_stdio(false);
    std::cin.tie(NULL);

    bool sKol[2000]={}, sWier[2000]={};
    cin>>wys>>szer;
    for (int i=0; i<wys; ++i)
    {
        string s;
        cin>>s;
        for (int j=0; j<szer; ++j)
        {
            int q=s[j]-'A';
            ++kol[j][q];
            ++wier[i][q];
        }
    }

    vector<string> wyn;

    for (int p=0; p<wys+szer; ++p)
    {
        int ka=-1, kr=-1;
        for (int i=0; i<szer; ++i)
        {
            if (sKol[i])
                continue;
            kr=kolorKol(i);
            if (kr!=-1)
            {
                ka=i;
                break;
            }
        }
        if (ka!=-1)
        {
            sKol[ka]=true;
            stringstream s;
            s<<"K "<<(ka+1)<<" "<<(char) ('A'+kr)<<'\n';
            wyn.push_back(s.str());
            for (int i=0; i<wys; ++i)
                --wier[i][kr];
            continue;
        }

        for (int i=0; i<wys; ++i)
        {
            if (sWier[i])
                continue;
            kr=kolorWier(i);
            if (kr==-1)
                continue;
            sWier[i]=true;
            stringstream s;
            s<<"R "<<(i+1)<<" "<<(char) ('A'+kr)<<'\n';
            wyn.push_back(s.str());
            for (int j=0; j<szer; ++j)
                --kol[j][kr];
            break;
        }
    }

    cout<<wyn.size()<<'\n';
    for (int i=wyn.size()-1; 0<=i; --i)
        cout<<wyn[i];
    return 0;
}