Polycarp loves geometric progressions very much. Since he was only three years old, he loves only the progressions of length three. He also has a favorite integer k and a sequence a, consisting of n integers.

He wants to know how many subsequences of length three can be selected from a, so that they form a geometric progression with common ratio k.

A subsequence of length three is a combination of three such indexes i₁, i₂, i₃, that 1 ≤ i₁ < i₂ < i₃ ≤ n. That is, a subsequence of length three are such groups of three elements that are not necessarily consecutive in the sequence, but their indexes are strictly increasing.

A geometric progression with common ratio k is a sequence of numbers of the form b·k⁰, b·k¹, ..., b·k^r - 1.

Polycarp is only three years old, so he can not calculate this number himself. Help him to do it.

The first line of the input contains two integers, n and k (1 ≤ n, k ≤ 2·10⁵), showing how many numbers Polycarp's sequence has and his favorite number.

The second line contains n integers a₁, a₂, ..., a_n ( - 10⁹ ≤ a_i ≤ 10⁹) — elements of the sequence.

Output a single number — the number of ways to choose a subsequence of length three, such that it forms a geometric progression with a common ratio k.

In the first sample test the answer is four, as any of the two 1s can be chosen as the first element, the second element can be any of the 2s, and the third element of the subsequence must be equal to 4.

 #include <stdio.h>

 #include <string.h>

 #include <map>

 #include <algorithm>

 using namespace std;

 map <long long,long long> a;

 map <long long,long long> b;

 long long y[];

 int main()

 {

     long long n,k,o;

     long long i,j,x,m;

     long long s;

     while(scanf("%I64d %I64d",&n,&k)!=EOF)

     {

         s=,o=,m=;

         a.clear();

         b.clear();

         if(k==)

         {

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

             {

                 scanf("%I64d",&x);

                 a[x]++;

                 if(a[x]==)

                 {

                     m++;

                     y[m]=x;

                 }

             }

             //prlong longf("*%d %d\n",a[y[1]],m);

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

             {

                 s=s+(a[y[i]]*(a[y[i]]-)/)*(a[y[i]]-)/;

             }

         }

         else

         {

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

             {

                 scanf("%I64d",&x);

                 if(x==)

                     o++;

                 a[x]++;

                 if(x%k== && x/k!=)

                 {

                     s=s+b[x/k];

                     b[x]=a[x/k]+b[x];

                 }

             }

             s=s+o*(o-)/*(o-)/;

         }

         printf("%I64d\n",s);

     }

     return ;

 }