#include<bits/stdc++.h>
#define M(a,b) memset(a,b,sizeof(a))
#define maxn 200001
#define inf 0x7fffffff
using namespace std; 
inline long long read(){
    char c=getchar();long long num=0;bool b=0;
    for(;c<'0'||c>'9';b=(c=='-'?1:0),c=getchar());
    for(;c>='0'&&c<='9';num=(num<<3)+(num<<1)+(c^'0'),c=getchar());
    return b?-num:num;
}
int a,x,b,c,d;
char str[maxn];
//char s,shi,ge;
bool P[maxn],K[maxn],H[maxn],T[maxn];
int main(){
	cin>>str;
	for(int i=0;i<4;i++){
		char s=str[i*3],shi=str[i*3+1],ge=str[i*3+2];
	//	s=getchar();
	//	shi=getchar();
	//	ge=getchar();
		x=(shi-'0')*10+(ge-'0');
		switch(s){
			case 'P':
				if(!P[x]) P[x]=true;
				else{printf("GRESKA");return 0;}
				a++;
				break;
			case 'K':
				if(!K[x]) K[x]=true;
				else{printf("GRESKA");return 0;}
				b++;
				break;
			case 'H':
				if(!H[x]) H[x]=true;
				else{printf("GRESKA");return 0;}
				c++;
				break;
			case 'T':
				if(!T[x]) T[x]=true;
				else{printf("GRESKA");return 0;}
				d++;
				break;
		}
	}
	printf("%d %d %d %d",13-a,13-b,13-c,13-d);
	return 0;
}

究竟是什么问题