Problem:
Coin Combination Problem

You have 4 bags A, B, C and D each of which includes N coins (there are totally 4N coins). Values of the coins in each bag are ai, bi, ci and di respectively.

Find the number of combinations that result when you choose one coin from each bag (totally 4 coins) in such a way that the total value of the coins is V. You should distinguish the coins in a bag.

Constraints

1 ≤ N ≤ 1000

1 ≤ ai, bi, ci, di ≤ 1016

1 ≤ V ≤ 1016

All input values are given in integers

Input

The input is given in the following format.

N V
a1 a2 ... aN
b1 b2 ... bN
c1 c2 ... cN
d1 d2 ... dN

Output

Print the number of combinations in a line.

Sample Input 1

3 14
3 1 2
4 8 2
1 2 3
7 3 2

Sample Output 1

9

Sample Input 2

5 4
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1

Sample Output 2

625

Solution in C# (judge verdict: Accepted)

using System.Collections.Generic;
using System;

public class hello
{
    public static void Main()
    {
        string[] line = Console.ReadLine().Trim().Split(' ');
        var n = int.Parse(line[0]);
        var t = long.Parse(line[1]);
        line = Console.ReadLine().Trim().Split(' ');
        var w1 = Array.ConvertAll(line, long.Parse);
        line = Console.ReadLine().Trim().Split(' ');
        var w2 = Array.ConvertAll(line, long.Parse);
        line = Console.ReadLine().Trim().Split(' ');
        var w3 = Array.ConvertAll(line, long.Parse);
        line = Console.ReadLine().Trim().Split(' ');
        var w4 = Array.ConvertAll(line, long.Parse);
        var a = getDic(w1, w2, n, t);
        var b = getDic(w3, w4, n, t);
        var ans = getAns(a, b, t);
        Console.WriteLine(ans);
    }
    static long getAns(Dictionary<long, long> a, Dictionary<long, long> b, long t)
    {
        var ans = 0L;
        foreach (var x in a)
        {
            var w = t - x.Key;
            if (b.ContainsKey(w)) ans += x.Value * b[w];
        }
        return ans;
    }
    static Dictionary<long, long> getDic(long[] a, long[] b, int n, long t)
    {
        var d = new Dictionary<long, long>();
        for (int i = 0; i < n; i++)
            for (int j = 0; j < n; j++)
            {
                var w = a[i] + b[j];
                if (w < t)
                {
                    if (d.ContainsKey(w)) d[w]++;
                    else d[w] = 1;
                }
            }
        return d;
    }
}