Problem:
Square Route

スクウェア・ルート

English text is not available in this practice contest.

このたび新しい豪邸を建てることを決めた大富豪の品田氏は，どの街に新邸を建てようかと悩んでいる．実は，品田氏は正方形がとても好きという変わった人物であり，そのため少しでも正方形の多い街に住みたいと思っている．

品田氏は，碁盤目状に道路の整備された街の一覧を手に入れて，それぞれの街について，道路により形作られる正方形の個数を数えることにした．ところが，道と道の間隔は一定とは限らないため，手作業で正方形を数えるのは大変である．そこであなたには，碁盤目状の道路の情報が与えられたときに，正方形の個数を数えるプログラムを書いて欲しい．

Input

入力は複数のデータセットから構成されており，各データセットは以下のような構成になっている．

N M

h1

h2

...

hN

w1

w2

...

wM

1 行目には 2 つの正の整数 N, M (1 ≦ N, M ≦ 1500) が与えられる．続く N 行 h1, h2, ..., hN (1 ≦ hi ≦ 1000）は，道路と道路の南北方向の間隔を表す．ここで hi は北から i 番目の道路と北から i + 1 番目の道路の間隔である．同様に，続く M 行 w1, ..., wM (1 ≦ wi ≦ 1000）は，道路と道路の東西方向の間隔を表す．ここで wi は西から i 番目の道路と西から i + 1 番目の道路の間隔である．道路自体の幅は十分細いため考慮する必要はない．

図 D-1: 最初のデータセット

N = M = 0 は入力の終端を示しており，データセットには含めない．

Output

各データセットに対して，正方形の個数を 1 行に出力しなさい．たとえば，Sample Input の最初のデータセットにおいては，以下のとおり 6 個の正方形を含むので，このデータセットに対する出力は 6 となる．

図 D-2: 最初のデータセットに含まれる正方形

Sample Input

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

Output for the Sample Input

6
2

Solution in C# (judge verdict: Accepted)

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace Contest
{
    class Program
    {
        static int Main(string[] args)
        {
            new Program().Process();

            return 0;
        }

        private CommonInput cin;

        private void Process()
        {
            cin = new CommonInput();

            int N, M;

            int[] hArray, wArray;

            while (true)
            {
                N = cin.GetNextToInt();
                M = cin.GetNextToInt();

                if (N == 0 && M == 0)
                    break;

                hArray = new int[N];
                wArray = new int[M];

                for (int i = 0; i < N; i++)
                    hArray[i] = cin.GetNextToInt();

                for (int i = 0; i < M; i++)
                    wArray[i] = cin.GetNextToInt();

                Console.WriteLine(Calc(hArray, wArray));
            }
        }

        private int Calc(int[] hArray, int[] wArray)
        {
            Dictionary<int, int> dictH = new Dictionary<int, int>();
            Dictionary<int, int> dictW = new Dictionary<int, int>();
            int tmp;
            int count = 0;

            for (int i = 0; i < hArray.Length; i++)
            {
                tmp = hArray[i];
                for (int j = i + 1; j < hArray.Length; j++)
                {
                    if (dictH.ContainsKey(tmp))
                        dictH[tmp]++;
                    else
                        dictH[tmp] = 1;

                    tmp += hArray[j];
                }

                if (dictH.ContainsKey(tmp))
                    dictH[tmp]++;
                else
                    dictH[tmp] = 1;
            }

            for (int i = 0; i < wArray.Length; i++)
            {
                tmp = wArray[i];
                for (int j = i + 1; j < wArray.Length; j++)
                {
                    if (dictW.ContainsKey(tmp))
                        dictW[tmp]++;
                    else
                        dictW[tmp] = 1;

                    tmp += wArray[j];
                }

                if (dictW.ContainsKey(tmp))
                    dictW[tmp]++;
                else
                    dictW[tmp] = 1;
            }

            foreach (var item in dictH)
            {
                if (dictW.ContainsKey(item.Key))
                    count += dictW[item.Key] * item.Value;
            }

            return count;
        }
    }

    public class CommonInput
    {
        public CommonInput()
        {
            this._s = new string[0];
            this._i = 0;
        }

        public string Line { get; set; }
        private string[] _s;
        private int _i;
        private char[] _sep = { ' ' };

        public void GetLine()
        {
            this._i = 0;
            do
            {
                this.Line = Console.ReadLine();
            } while (this.Line == "");

            if (this.Line != null)
                this._s = this.Line.Split(this._sep, StringSplitOptions.RemoveEmptyEntries);
        }

        public string GetNext()
        {
            if (this._i < this._s.Length)
                return this._s[this._i++];

            this.GetLine();

            return this._s[this._i++];
        }

        public int GetNextToInt()
        {
            return int.Parse(this.GetNext());
        }

        public long GetNextToLong()
        {
            return long.Parse(this.GetNext());
        }

        public double GetNextToDouble()
        {
            return double.Parse(this.GetNext());
        }
    }
}