#include<stdio.h>
long long int h[300005], l;
int comp_h(long long int a, long long int b)
{
	if (h[a] < h[b])
		return 1;
	else
		return -1;
}
void swap_h(long long int a, long long int b)
{
	long long int f = h[a];
	h[a] = h[b];
	h[b] = f;
	return;
}
void push(long long int ne)
{
	h[l] = ne;
	long long int p = l;
	l++;
	for (; p > 0; p = (p - 1) / 2)
		if (comp_h((p - 1) / 2, p) > 0)
			swap_h((p - 1) / 2, p);
	return;
}
long long int pop()
{
	l--;
	swap_h(0, l);
	int p = 0;
	for (;;)
	{
		if (2 * p + 2 < l)
		{
			if (comp_h(2 * p + 1, 2 * p + 2) > 0)
			{
				if (comp_h(p, 2 * p + 2) > 0)
					swap_h(p, 2 * p + 2);
				p = 2 * p + 2;
			}
			else
			{
				if (comp_h(p, 2 * p + 1) > 0)
					swap_h(p, 2 * p + 1);
				p = 2 * p + 1;
			}
		}
		else if (2 * p + 1 < l)
		{
			if (comp_h(p, 2 * p + 1) > 0)
				swap_h(p, 2 * p + 1);
			p = 2 * p + 1;
		}
		else
			break;
	}
	return h[l];
}
char s[502][502];
long long int c[502][502];
int main()
{
	long long int n, k;
	scanf("%lld %lld", &n, &k);
	n *= 2;
	long long int i, j;
	for (i = 0; i < n; i++)
		scanf("%s", s[i]);
	for (i = 0; i < n; i++)
		for (j = 0; j < n; j++)
			scanf("%lld", &c[i][j]);
	l = 0;
	for (i = 0; i < n; i++)
		for (j = 0; j < n; j++)
			push(c[i][j]);
	long long int cnt = 0;
	for (i = 0; i < n; i++)
		for (j = 0; j < n; j++)
			if (s[i][j] == '#')
				cnt++;
	long long int ans = 0, v;
	for (i = 0; i < cnt; i++)
		ans += pop();
	if (cnt % 2 == 0)
	{
		l = 0;
		for (i = 0; i < n; i++)
			for (j = 0; j < n / 2; j++)
				push(c[i][j] + c[i][n - j - 1]);
		v = k;
		for (i = 0; i < cnt / 2; i++)
			v += pop();
		if (ans < v)
			ans = v;
	}
	printf("%lld\n", ans);
	return 0;
}