#include <cstdio>
#include <iostream>
using namespace std;

const int max_n=25, max_k=35, max_s=10050, mod=3210121;

int Fact[max_s], InvFact[max_s], Sum[max_s];

int El[max_n][max_k];
int Mx[max_k];

int i,j,st;
int n,k,s;

void rest( int &a ){
	while( a>mod )
		a-=mod;
	while( a<0 )
		a+=mod;
}
void get_max( int &a, int b ){
	if( a<b )
		a=b;
}

int pow( int a, int p ){
	int r=1;
	while( p ){
		if( p&1 )
			r=(1LL*r*a)%mod;
		a=(1LL*a*a)%mod;
		p>>=1;
	}
	return r;
}

int comb( int n, int k ){
	return (1LL*((1LL*Fact[n]*InvFact[n-k])%mod)*InvFact[k])%mod;
}

int main(){
	freopen("cowfood.in","r",stdin);
	freopen("cowfood.out","w",stdout);
	scanf("%d %d %d", &k, &s, &n );
	for( i=1; i<=n; ++i )
		for( j=1; j<=k; ++j )
			scanf("%d", &El[i][j] );
	Fact[0]=InvFact[0]=1;

	Fact[1]=1;
	for( i=2; i<=s+k; ++i )
		Fact[i]=(1LL*Fact[i-1]*i)%mod;

	InvFact[s+k]=pow(Fact[s+k],mod-2);
	for( i=s+k-1; i>=1; --i )
		InvFact[i]=(1LL*InvFact[i+1]*(i+1))%mod;
	for( i=0; i<=s; ++i ){
		Sum[i]=comb(i+k-1,k-1);
		if( i>0 )
			Sum[i]+=Sum[i-1];
		rest(Sum[i]);
	}
	int sum,rez=0,nr;
	for( st=1; st<(1<<n); ++st ){
		nr=-1;
		for( i=1; i<=k; ++i )
			Mx[i]=0;
		for( i=1; i<=n; ++i )
			if( st&(1<<(i-1)) ){
				nr*=-1;
				for( j=1; j<=k; ++j )
					get_max( Mx[j], El[i][j] );
			}
		sum=0;
		for( j=1; j<=k; ++j )
			sum+=Mx[j];
		if( sum>s )
			;
		else{
			rez+=nr*Sum[s-sum];
			rest(rez);
		}
	}
	rez=Sum[s]-rez-k*s-1;
	rest(rez);
	printf("%d\n",rez);
	return 0;
}