//poj1321——dfs回溯
#include<iostream>
#include<cstdio>
#include<cstring>
#include<cstdlib>
#include<algorithm>

using namespace std;

const int maxn=30;
const int INF=(1<<28);

int n,k;
int map[maxn][maxn];
int cnt;

void put(int x,int y)
{
    for(int i=1;i<=n;i++){
        map[i][y]++;
        map[x][i]++;
    }
}

void remov(int x,int y)
{
    for(int i=1;i<=n;i++){
        map[i][y]--;
        map[x][i]--;
    }
}

void search(int cur,int num)
{
    for(int i=1;i<=n;i++){
        if(map[cur][i]) continue;
        bool flag=0;
        if(num==k){
            cnt++;
            flag=1; //边界控制关键处在这里。不能直接return，因为下面要将放置的棋子移除
        }
        put(cur,i);  //放置棋子
        if(!flag){
            for(int j=cur+1;j<=n;j++){
                search(j,num+1);
            }
        }
        remov(cur,i); //移除棋子
    }
}

int main()
{
    while(cin>>n>>k,n!=-1,k!=-1){
        for(int i=1;i<=n;i++){
            for(int j=1;j<=n;j++){
                char ch;cin>>ch;
                if(ch==‘#‘) map[i][j]=0;
                else map[i][j]=1;
            }
        }
        cnt=0;
        for(int i=1;i<=n;i++) search(i,1); //递归枚举
        cout<<cnt<<endl;
    }
    return 0;
}