Problem:
Score : 400 points

Problem Statement

There is a grid with N rows and N columns of squares. Let (i,j) be the square at the i-th row from the top and the j-th column from the left.

These squares have to be painted in one of the C colors from Color 1 to Color C. Initially, (i,j) is painted in Color c_{i,j}.

We say the grid is a good grid when the following condition is met for all i,j,x,y satisfying 1 \leq i,j,x,y \leq N:

If (i+j) \% 3=(x+y) \% 3, the color of (i,j) and the color of (x,y) are the same.

If (i+j) \% 3 \neq (x+y) \% 3, the color of (i,j) and the color of (x,y) are different.

Here, X \% Y represents X modulo Y.

We will repaint zero or more squares so that the grid will be a good grid.

For a square, the wrongness when the color of the square is X before repainting and Y after repainting, is D_{X,Y}.

Find the minimum possible sum of the wrongness of all the squares.

Constraints

1 \leq N \leq 500

3 \leq C \leq 30

1 \leq D_{i,j} \leq 1000 (i \neq j),D_{i,j}=0 (i=j)

1 \leq c_{i,j} \leq C

All values in input are integers.

Input

Input is given from Standard Input in the following format:

N C
D_{1,1} ... D_{1,C}
:
D_{C,1} ... D_{C,C}
c_{1,1} ... c_{1,N}
:
c_{N,1} ... c_{N,N}

Output

If the minimum possible sum of the wrongness of all the squares is x, print x.

Sample Input 1

2 3
0 1 1
1 0 1
1 4 0
1 2
3 3

Sample Output 1

3

Repaint (1,1) to Color 2. The wrongness of (1,1) becomes D_{1,2}=1.

Repaint (1,2) to Color 3. The wrongness of (1,2) becomes D_{2,3}=1.

Repaint (2,2) to Color 1. The wrongness of (2,2) becomes D_{3,1}=1.

In this case, the sum of the wrongness of all the squares is 3.

Note that D_{i,j} \neq D_{j,i} is possible.

Sample Input 2

4 3
0 12 71
81 0 53
14 92 0
1 1 2 1
2 1 1 2
2 2 1 3
1 1 2 2

Sample Output 2

428

Solution in C# (Mono 4.6.2.0) (judge verdict: Accepted)

#pragma warning disable

using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Runtime.Serialization.Formatters.Binary;
using System.Text;
using System.Text.RegularExpressions;
using System.Diagnostics;
using System.Numerics;
using System.Collections;
using System.Timers;

static class MainClass
{
    public static void Main(string[] args)
    {
        //var data = File.OpenText(@"c:\users\\downloads\02.txt");
        //var sw = new Stopwatch();
        
        //Console.SetIn(data);
        //sw.Start();
        var nc = Console.ReadLine().SplittedStringToInt32List();
        var n = nc[0];
        var c = nc[1];
        // var iwakans = new Dictionary<KeyValuePair<int, int>, int>();
        var iwakansar = new int[c,c];
        var amari1ls = new List<int>();
        var amari0ls = new List<int>();
        var amari2ls = new List<int>();
        var amarilss = new List<int>[3] { amari0ls, amari1ls, amari2ls };
        for (int i = 0; i < c; i++)
        {
            var dc = Console.ReadLine().SplittedStringToInt32List();
            for (int j = 0; j < c; j++)
            {
                // iwakans.Add(new KeyValuePair<int, int>(i, j), dc[j]);
                iwakansar[i, j] = dc[j];
            }
        }

        for (int i = 0; i < n; i++)
        {
            var cn = Console.ReadLine().SplittedStringToInt32List();
            for (int j = 0; j < n; j++)
            {
                amarilss[(i + j) % 3].Add(cn[j]);
            }
        }

        var countsLs = new List<KeyValuePair<int,KeyValuePair<int, int>>>();
        for (int i = 0; i < 3; i++)
        {
            var ls = amarilss[i];
            var sumsLs = new List<KeyValuePair<int,int>>();
            for (int j = 0; j < c; j++)
            {
                var num = 0;
                foreach (var item in ls)
                {
                    //num += iwakans.Where(x => x.Key.Key == item - 1 && x.Key.Value == j).First().Value;
                    num += iwakansar[item - 1, j];
                }
                sumsLs.Add(new KeyValuePair<int, int>(j,num));
            }
            countsLs.AddRange(sumsLs.OrderBy(x => x.Value).Take(3).Select(x => new KeyValuePair<int, KeyValuePair<int, int>>(i,x)).ToList());
        }
        var kkk = new List<int>();
        for (int i = 0; i < 3; i++)
        {
            for (int j = 0; j < 3; j++)
            {
                for (int k = 0; k < 3; k++)
                {
                    var aa = countsLs.Where(x => x.Key == 0).ToArray()[i];
                    var bb = countsLs.Where(x => x.Key == 1).ToArray()[j];
                    var cc = countsLs.Where(x => x.Key == 2).ToArray()[k];
                    if (aa.Value.Key != bb.Value.Key && bb.Value.Key != cc.Value.Key && cc.Value.Key != aa.Value.Key)
                    {
                        kkk.Add(aa.Value.Value + bb.Value.Value + cc.Value.Value);
                    }
                }
            }
        }
        Console.WriteLine(kkk.Min());
        //sw.Stop();
        //Console.WriteLine(sw.ElapsedMilliseconds);
        //Console.ReadLine();
    }

    //public class Edge
    //{
    //    public int From;
    //    public int To;
    //    public int Cost;
    //}

    //public static List<KeyValuePair<int, int>> GetShortestPathes(int s, IEnumerable<Edge> edges, int vertices)
    //{
    //    var ls = new KeyValuePair<int, int>[vertices];

    //    return ls.ToList();
    //}


    #region ライブラリ

    #region 文字列処理

    public static int ToInt32(this string str) => int.Parse(str);
    public static BigInteger ToBigInteger(this string str) => BigInteger.Parse(str);
    public static List<string> SplittedStringToList(this string str) => str.Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries).ToList();
    public static List<int> SplittedStringToInt32List(this string str) => str.Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries).Select(x => int.Parse(x)).ToList();

    public static List<BigInteger> SplittedStringToBigInteger(this string str) => str.Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries).Select(x => BigInteger.Parse(x)).ToList();
    #endregion
    #region DeepClone
    public static T DeepClone<T>(this T src)
    {
        using (var memoryStream = new MemoryStream())
        {
            var binaryFormatter
              = new BinaryFormatter();
            binaryFormatter.Serialize(memoryStream, src);
            memoryStream.Seek(0, SeekOrigin.Begin);
            return (T)binaryFormatter.Deserialize(memoryStream);
        }
    }
    #endregion

    public static int Gcd(int a, int b)
    {
        if (b == 0)
            return a;
        return Gcd(b, a % b);
    }
    public static BigInteger Gcd(BigInteger a, BigInteger b)
    {
        if (b == 0)
            return a;
        return Gcd(b, a % b);
    }


    public static BigInteger Factorial(int n)
    {
        var dp = new BigInteger[n];
        dp[0] = 1;
        for (int i = 1; i < n; i++)
        {
            dp[i] = dp[i - 1] * (i + 1);
        }
        return dp[n - 1];
    }

    public static List<int> PrimeFactorize(int n)
    {
        var bases = n;
        var num = (int)Math.Pow(n, 0.5);
        var ls = new List<int>();
        for (int i = 2; i <= num; i++)
        {
            if (n % i == 0)
            {
                n = n / i;
                ls.Add(i);
                i--;
                continue;
            }
        }
        var nnn = 1;
        foreach (var item in ls)
        {
            nnn = nnn * item;
        }
        if (nnn != bases)
            ls.Add(n);
        return ls;
    }

    #endregion

}