#include<bits/stdc++.h>
#pragma GCC optimize(2)
#pragma GCC optimize(3)
#pragma GCC optimize("Ofast")
#define int long long
using namespace std;
int n,k,a[503][20003],l,c[503][13],ans;
int p[13]={(int)1e9+7,(int)1e9+9,998244353,19260817},e[13],t=4;
char cc[20003];
signed main(){
	scanf("%lld %lld",&n,&k);
	for(int i=1;i<=n;++i){
		scanf("%s",cc);
		l=strlen(cc);
		for(int j=0;j<l;++j){
			a[i][j%k]+=cc[j]-'0';
		}
		for(int j=0;j<k;++j){
			a[i][(j+1)%k]+=a[i][j]/10;
			a[i][j]%=10;
		}
		for(int j=0;j<k;++j){
			a[i][(j+1)%k]+=a[i][j]/10;
			a[i][j]%=10;
		}
	}
	for(int i=0;i<t;++i){
		e[i]=1;
		for(int j=0;j<k;++j){
			e[i]=e[i]*10%p[i];
		}
		--e[i];
		for(int j=1;j<=n;++j){
			c[j][i]=0;
			for(int l=0;l<k;++l){
				c[j][i]=(c[j][i]*10+a[j][l])%p[i];
			}
		}
	}
	for(int i=1;i<=n;++i){
		for(int j=1;j<=i;++j){
			for(int l=1;l<=j;++l){
				bool b=1;
				for(int o=0;o<t;++o){
					if((c[i][o]+c[j][o]+c[l][o])%p[o]!=0){
						b=0;
						break;
					}
				}
				ans+=b;
			}
		}
	}
	for(int i=1;i<=n;++i){
		for(int j=1;j<=i;++j){
			for(int l=1;l<=j;++l){
				bool b=1;
				for(int o=0;o<t;++o){
					if((c[i][o]+c[j][o]+c[l][o])%p[o]!=e[o]){
						b=0;
						break;
					}
				}
				ans+=b;
			}
		}
	}
	for(int i=1;i<=n;++i){
		for(int j=1;j<=i;++j){
			for(int l=1;l<=j;++l){
				bool b=1;
				for(int o=0;o<t;++o){
					if((c[i][o]+c[j][o]+c[l][o])%p[o]!=e[o]*2%p[o]){
						b=0;
						break;
					}
				}
				ans+=b;
			}
		}
	}
	cout<<ans;
}