#include<stdio.h>

#include<iostream>

#include<algorithm>

#include<cstring>

#include<math.h>

#include<string>

#include<map>

#include<queue>

#include<stack>

#include<set>

#define ll long long

#define inf 0x3f3f3f3f

using namespace std;

char a[][];

int l[];///列

int ans;

int n,k;

void dfs(int x,int cnt)

{

    if(cnt==k)///摆k个，方案数+1

    {

        ans++;

        return;

    }

    if(x==n)///行数越界

        return;

    dfs(x+,cnt);///这一行不摆

    for(int j=;j<n;j++)///遍历一行，有位置就摆！

    {

        if( a[x][j]=='#' && l[j]== && cnt<k )///如果有位置摆就摆，没有就不摆。

        {

            l[j]=;

            dfs( x+,cnt+ );///摆完就进入下一行，当前棋子数+1

            l[j]=;///这一列不摆

        }

    }

}

int main()

{

    while( scanf("%d%d",&n,&k) && n!=- && k!=- )

    {

        memset(l,,sizeof(l));

        memset(a,,sizeof(a));

        ans=;

        for(int i=;i<n;i++)

            scanf("%s",a[i]);

        dfs(,);///行 棋子数

        printf("%d\n",ans);

    }

    return ;

}