#include <iostream>

 #include <cstdio>

 #include <algorithm>

 #include <cstring>

 #include <cmath>

 #include <vector>

 #include <queue>

 #define inf 1000000007

 #define maxn 130

 #define maxm 18

 using namespace std;

 int f[][maxm][];

 int bit[][maxm];

 char s[maxn][maxm];

 int len[maxn];

 int n,m,mxbit,hi;

 int up(int x, int y, int mask)

 {

     int cnt=len[x-], now=;;

     for (int i=y;i<m;i++) cnt-=bit[mask][i];

     for (int i=;i<y;i++) now+=bit[mask][i];

     if (bit[mask][m] && s[x-][cnt-]==s[x][now]) return ;

     return ;

 }

 int lf(int x, int y, int mask)

 {

     int now=;

     for (int i=;i<y;i++) now+=bit[mask][i];

     if (bit[mask][] && s[x][now-]==s[x][now]) return ;

     return ;

 }

 int cal(int y, int mask)

 {

     int now=;

     for (int i=;i<=y;i++) now+=bit[mask][i];

     return now;

 }

 void get_mask()

 {

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

     {

         int now=i;

         for (int j=;j<=m;j++)

         {

             bit[i][j]=now%;

             now/=;

         }

     }

 }

 int main()

 {

     scanf("%d%d",&n,&m);

     mxbit=(<<m)-;

     get_mask();

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

     {

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

         len[i]=strlen(s[i]);

     }

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

         for (int j=;j<=m;j++)

         {

             for (int mask=;mask<=mxbit;mask++)

                 f[i][j][mask]=-inf;

         }

     f[][][]=f[][][]=;

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

     {

         int p=i&;

         for (int j=;j<=m;j++)

             for (int mask=;mask<=mxbit;mask++)

             {

                 int tmp=(mask<<)&mxbit;

                 if (i== && j==) continue;

                 if (j==)

                 {

                     if (cal(m,mask)!=len[i-]) continue;

                     f[p][j][tmp]=max(f[p][j][tmp],f[p^][m][mask]);

                     f[p][j][tmp|]=max(f[p][j][tmp|],f[p^][m][mask]+*up(i,j,mask));

                 }

                 else

                 {

                     if (cal(j-,mask)>len[i]) continue;

                     f[p][j][tmp]=max(f[p][j][tmp],f[p][j-][mask]);

                     if (cal(j-,mask)<len[i])

                         f[p][j][tmp|]=max(f[p][j][tmp|],f[p][j-][mask]+*lf(i,j,mask)+*up(i,j,mask));

                 }

             }

     }

     int ans=;

     for (int mask=;mask<=mxbit;mask++)

         if (cal(m,mask)==len[n])

             ans=max(ans,f[n&][m][mask]);

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

     return ;

 }