#include <bits/stdc++.h>
using namespace std;
#define int long long int
#define double long double
#define print(a) for(auto x : a) cout << x << " "; cout << endl
const int M = 1000000007;
const int N = 3e5+9;
const int INF = 2e9+1;
const int LINF = 2000000000000000001;
inline int power(int a, int b, int mod=M) {
int x = 1;
a %= mod;
while (b) {
if (b & 1) x = (x * a) % mod;
a = (a * a) % mod;
b >>= 1;
}
return x;
}
//_ ***************************** START Below *******************************
vector<int> a;
int consistency(int n, int k){
sort(begin(a), end(a));
int ans = 0;
int s = 0, e = 0;
while(e<n && s<n-1){
if(s==e) e++;
if(a[e]-a[s] > k){
s++;
}
else if(a[e] - a[s] < k){
e++;
}
else{
int x = a[s];
int ct1 = 0;
while(s<e && a[s] == x){
ct1++;
s++;
}
int y = a[e];
int ct2 = 0;
while(e<n && a[e] == y){
ct2++;
e++;
}
ans += ct1*ct2;
}
}
return ans;
}
int practice(int n){
return 0;
}
void solve() {
int n, k;
cin>> n >> k;
a.resize(n);
for(int i=0; i<n; i++) cin >> a[i];
cout << consistency(n, k) << endl;
}
int32_t main() {
ios_base::sync_with_stdio(0); cin.tie(0); cout.tie(0);
int t = 1;
// cin >> t;
while (t--) {
solve();
}
return 0;
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CiNkZWZpbmUgaW50ICAgICAgICAgICAgICBsb25nIGxvbmcgaW50CiNkZWZpbmUgZG91YmxlICAgICAgICAgICBsb25nIGRvdWJsZQojZGVmaW5lIHByaW50KGEpICAgICAgICAgZm9yKGF1dG8geCA6IGEpIGNvdXQgPDwgeCA8PCAiICI7IGNvdXQgPDwgZW5kbAoKCmNvbnN0IGludCBNID0gMTAwMDAwMDAwNzsKY29uc3QgaW50IE4gPSAzZTUrOTsKY29uc3QgaW50IElORiA9IDJlOSsxOwpjb25zdCBpbnQgTElORiA9IDIwMDAwMDAwMDAwMDAwMDAwMDE7CgppbmxpbmUgaW50IHBvd2VyKGludCBhLCBpbnQgYiwgaW50IG1vZD1NKSB7CiAgICBpbnQgeCA9IDE7CiAgICBhICU9IG1vZDsKICAgIHdoaWxlIChiKSB7CiAgICAgICAgaWYgKGIgJiAxKSB4ID0gKHggKiBhKSAlIG1vZDsgCiAgICAgICAgYSA9IChhICogYSkgJSBtb2Q7CiAgICAgICAgYiA+Pj0gMTsKICAgIH0KICAgIHJldHVybiB4Owp9CgoKLy9fICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqIFNUQVJUIEJlbG93ICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioKCgoKCnZlY3RvcjxpbnQ+IGE7CgoKaW50IGNvbnNpc3RlbmN5KGludCBuLCBpbnQgayl7CgkKCXNvcnQoYmVnaW4oYSksIGVuZChhKSk7CgkKCWludCBhbnMgPSAwOwoJaW50IHMgPSAwLCBlID0gMDsKCQoJd2hpbGUoZTxuICYmIHM8bi0xKXsKCQlpZihzPT1lKSBlKys7CgkJCgkJaWYoYVtlXS1hW3NdID4gayl7CgkJCXMrKzsKCQl9CgkJZWxzZSBpZihhW2VdIC0gYVtzXSA8IGspewoJCQllKys7CgkJfQoJCWVsc2V7CgkJCWludCB4ID0gYVtzXTsKCQkJaW50IGN0MSA9IDA7CgkJCXdoaWxlKHM8ZSAmJiBhW3NdID09IHgpewoJCQkJY3QxKys7CgkJCQlzKys7CgkJCX0KCQkJCgkJCWludCB5ID0gYVtlXTsKCQkJaW50IGN0MiA9IDA7CgkJCXdoaWxlKGU8biAmJiBhW2VdID09IHkpewoJCQkJY3QyKys7CgkJCQllKys7CgkJCX0KCQkJCgkJCWFucyArPSBjdDEqY3QyOwoJCX0KCX0KCXJldHVybiBhbnM7Cn0KCgoKCgoKCgoKCgoKCgoKCgoKCgoKCmludCBwcmFjdGljZShpbnQgbil7CgoKICAgIHJldHVybiAwOwp9CgoKCgoKdm9pZCBzb2x2ZSgpIHsKICAgIAogICAgaW50IG4sIGs7CiAgICBjaW4+PiBuID4+IGs7CiAgICAKICAgIGEucmVzaXplKG4pOwogICAgZm9yKGludCBpPTA7IGk8bjsgaSsrKSBjaW4gPj4gYVtpXTsKICAgIAogICAgY291dCA8PCBjb25zaXN0ZW5jeShuLCBrKSA8PCBlbmRsOwoKCn0KCgoKCgppbnQzMl90IG1haW4oKSB7CiAgICBpb3NfYmFzZTo6c3luY193aXRoX3N0ZGlvKDApOyBjaW4udGllKDApOyBjb3V0LnRpZSgwKTsKCiAgICBpbnQgdCA9IDE7CiAgICAvLyBjaW4gPj4gdDsKICAgIHdoaWxlICh0LS0pIHsKICAgICAgICBzb2x2ZSgpOwogICAgfQoKICAgIHJldHVybiAwOwp9