#include<bits/stdc++.h>
using namespace std;
const int NR=110;
int n,k,ans[NR],mp[NR][NR],flag[NR],vis[NR];
char str[NR];

void dfs(int x,int tar){
	vis[x]=1;
	if(x!=tar){
		for(int i=1;i<=n;i++)
			if(!flag[i]&&!vis[i]&&mp[x][i])dfs(i,tar);
	}
}
bool check(int x){
	memset(vis,0,sizeof(vis));
	dfs(k,x);
	for(int i=1;i<=n;i++)
		if(!flag[i]&&!vis[i]&&!mp[x][i])return 0;
	return 1;
}

void solve(int Tid){
	cin>>n>>k;k++;
	memset(mp,0,sizeof(mp));
	for(int i=1;i<=n;i++){
		scanf("%s",str+1);
		for(int j=1;j<=n;j++)mp[i][j]=str[j]=='Y';
	}
	memset(flag,0,sizeof(flag));
	printf("Case #%d: ",Tid);
	if(!check(n+1)){
		puts("IMPOSSIBLE");
		return;
	}
	for(int i=1,pre,nxt;i<=n;i++){
		for(int j=1;j<=n;j++)
			if(!flag[j]){
				if(j==k&&i>1&&!mp[j][pre])continue;
				flag[j]=1;
				if(i==1||mp[j][pre])nxt=j;
				else nxt=pre;
				flag[nxt]=0;
				if(!check(nxt)){
					flag[nxt]=1;flag[j]=0;
					continue;
				}
				flag[nxt]=1;pre=nxt;ans[i]=j;
				break;
			}
		if(ans[i]==k){
			for(int j=1,now=i;j<=n;j++)
				if(!flag[j])ans[++now]=j;
			sort(ans+i+1,ans+n+1);
			break;
		}
	}
	for(int i=1;i<=n;i++)printf("%d ",ans[i]-1);
	puts("");
}

int main(){
	int T;cin>>T;
	for(int i=1;i<=T;i++)solve(i);
	return 0;
}