#include <bits/stdc++.h>
using namespace std;
string s;
int cards[26][14];
vector<int> p = {'P'-'A', 'K'-'A', 'H'-'A', 'T'-'A'};
int main () {
ios_base::sync_with_stdio(0); cin.tie(0); cout.tie(0);
for (int i = 0;i < 26; i++) {
for (int j = 0;j < 14; j++) cards[i][j] = 1;
}
cin >> s;
for (int i = 0;i < (int)s.size(); i += 3) {
cards[s[i]-'A'][10*(s[i+1]-'0') + (s[i+2]-'0')]--;
if (cards[s[i]-'A'][10*(s[i+1]-'0') + (s[i+2]-'0')] < 0) {
cout << "GRESKA\n";
return 0;
}
}
for (int i = 0;i < 4; i++) {
int cnt = 0;
for (int j = 1;j <= 13; j++) {
cnt += cards[p[i]][j];
}
cout << cnt << " ";
}
cout << "\n";
return 0;
}
