#include <iostream>
#include <cstdio>
#include <algorithm>
#define inf 0x7f7f7f7f
using namespace std;
int n,s,cow[1000005];
long long ans=0;
inline int read(int &x)
{
	char ch;
	x=0;
	while(!isdigit(ch)) ch=getchar();
	while(isdigit(ch))
	{
		x=x*10+ch-'0';
		ch=getchar();
	}
	return 0;
}
inline int mn()
{
	freopen("costume.in","r",stdin);
	freopen("costume.out","w",stdout);
	scanf("%d%d",&n,&s);
	for(register int i=1;i<=n;++i) read(cow[i]);
	sort(cow+1,cow+1+n);
	register int i=1,j=n;
	for(j=n;j>=1;--j)
	{
		while(i<=n&&cow[j]+cow[i]<=s) {
			++i;
		}
		if(j>=i){
			ans=ans+i-1;
		}
		else if(j<i){
			ans=ans+i-2;
		}
	}
	cout<<ans/2;
}
int ll=mn();
int main(){;}