#include<iostream>
#include<cstring>
using namespace std;
int T,n,A;
char s[110][110];
bool a[110][110],Mark[110],mark[110];
void dfs(int now)
{
	mark[now]=1;
	for(int i=1;i<=n;i++)
	{
		if(mark[i]||!a[now][i])
		{
			continue;
		}
		dfs(i);
	}
}
inline bool judge(int now,int x)
{
	now=a[now][x]?now:x,Mark[x]=1;
	memcpy(mark,Mark,sizeof(mark));
	Mark[x]=0;
	if(!mark[A])
	{
		dfs(A);
	}
	else if(now!=A)
	{
		return 0;
	}
	for(int i=1;i<=n;i++)
	{
		if(!mark[i]&&!a[now][i])
		{
			return 0;
		}
	}
	return 1;
}
int main()
{
	ios::sync_with_stdio(false);
	cin.tie(0);
	cin>>T;
	for(int I=1;I<=T;I++)
	{
		cin>>n>>A;
		A++;
		for(int i=1;i<=n;i++)
		{
			cin>>s[i]+1;
			for(int j=1;j<=n;j++)
			{
				a[i][j]=(s[i][j]=='Y');
			}
		}
		memset(Mark,0,sizeof(Mark));
		cout<<"Case #"<<I<<": ";
		if(!judge(0,0))
		{
			cout<<"IMPOSSIBLE"<<endl;
			continue;
		}
		int now=0;
		for(int i=1;i<=n;i++)
		{
			for(int j=1;j<=n;j++)
			{
				if(!Mark[j]&&judge(now,j))
				{
					cout<<j-1<<" ";
					Mark[j]=1,now=a[now][j]?now:j;
					break;
				}
			}
		}
		cout<<endl;
	}
	return 0;
}