// ~~ icebear ~~
#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
typedef pair<int, int> ii;
typedef pair<int, ii> iii;
template<class T>
bool minimize(T &a, const T &b) {
if (a > b) return a = b, true;
return false;
}
template<class T>
bool maximize(T &a, const T &b) {
if (a < b) return a = b, true;
return false;
}
#define FOR(i,a,b) for(int i=(a); i<=(b); ++i)
#define FORR(i,a,b) for(int i=(a); i>=(b); --i)
#define REP(i, n) for(int i=0; i<(n); ++i)
#define RED(i, n) for(int i=(n)-1; i>=0; --i)
#define MASK(i) (1LL << (i))
#define BIT(S, i) (((S) >> (i)) & 1)
#define mp make_pair
#define pb push_back
#define fi first
#define se second
#define all(x) x.begin(), x.end()
#define task "gen"
/*END OF TEMPLATE. ICEBEAR AND THE CAT WILL WIN VOI26 */
const int MOD = 1e9 + 7;
const int inf = 1e9 + 27092008;
const ll INF = 1e18 + 27092008;
const int N = 2e5 + 5;
int n, a[N], ans[N];
ll K;
vector<int> compress;
struct BIT {
int ft[N], sum = 0;
vector<ii> history;
void update(int x, int val, bool rem) {
if (rem) history.emplace_back(x, val);
sum += val;
for(; x <= n; x += x & -x) ft[x] += val;
}
int get(int x) {
int ans = 0;
for(; x; x -= x & -x) ans += ft[x];
return ans;
}
void snap_shot() {
history.emplace_back(-1, -1);
}
void roll_back() {
while(!history.empty()) {
ii tmp = history.back(); history.pop_back();
if (tmp.fi == -1) break;
update(tmp.fi, -tmp.se, false);
}
}
} fenL, fenR;
ll inv = 0;
void add(ll &x, ll y) {
x = min(INF, x + y);
}
void DnC(int qryL, int qryR, int ansL, int ansR) {
if (qryL > qryR) return;
int qryM = (qryL + qryR) >> 1, ansM = max(ansL, qryM + 1);
ll tmp = inv;
fenL.snap_shot();
FOR(i, qryL, qryM) {
fenL.update(a[i], +1, true);
add(inv, fenL.sum - fenL.get(a[i]));
add(inv, fenR.get(a[i] - 1));
}
if (inv > K) {
inv = tmp;
ans[qryM] = n + 1;
fenL.roll_back();
DnC(qryL, qryM - 1, ansL, ansR);
return;
}
fenR.snap_shot();
ll bef = inv;
FORR(i, ansR, max(ansL, qryM + 1)) {
fenR.update(a[i], +1, true);
inv += fenR.get(a[i] - 1);
inv += fenL.sum - fenL.get(a[i]);
if (inv > K) {
ansM = i + 1;
break;
}
}
if (ansM == n + 1) {
fenR.roll_back();
fenL.roll_back();
inv = tmp;
DnC(qryL, qryM - 1, ansL, ansR);
return;
}
ans[qryM] = ansM;
inv = bef;
fenR.roll_back();
DnC(qryM + 1, qryR, ansM, ansR);
// if (qryL == 1 && qryR == 5) {
// cout << tmp << ' ' << ansM << '\n';
// FOR(i, 1, n) assert(fenR.ft[i] == 0);
// }
inv = tmp;
fenL.roll_back();
fenR.snap_shot();
FORR(i, ansR, ansM + 1) {
inv += fenL.sum - fenL.get(a[i]);
inv += fenR.get(a[i] - 1);
fenR.update(a[i], +1, true);
}
DnC(qryL, qryM - 1, ansL, ansM);
fenR.roll_back();
}
void init(void) {
cin >> n >> K;
FOR(i, 1, n) cin >> a[i], compress.pb(a[i]);
sort(all(compress));
FOR(i, 1, n) a[i] = upper_bound(all(compress), a[i]) - compress.begin();
}
void process(void) {
FOR(i, 1, n) ans[i] = n + 1;
DnC(1, n, 1, n);
ll res = 0;
FOR(i, 1, n) res += n + 1 - ans[i];
cout << res;
}
int main() {
ios_base::sync_with_stdio(0);
cin.tie(0); cout.tie(0);
if (fopen(task".inp", "r")) {
freopen(task".inp", "r", stdin);
freopen(task".out", "w", stdout);
}
int tc = 1;
// cin >> tc;
while(tc--) {
init();
process();
}
return 0;
}
Ly8gfn4gaWNlYmVhciB+fgojaW5jbHVkZSA8Yml0cy9zdGRjKysuaD4KdXNpbmcgbmFtZXNwYWNlIHN0ZDsKCnR5cGVkZWYgbG9uZyBsb25nIGxsOwp0eXBlZGVmIHBhaXI8aW50LCBpbnQ+IGlpOwp0eXBlZGVmIHBhaXI8aW50LCBpaT4gaWlpOwoKdGVtcGxhdGU8Y2xhc3MgVD4KICAgIGJvb2wgbWluaW1pemUoVCAmYSwgY29uc3QgVCAmYikgewogICAgICAgIGlmIChhID4gYikgcmV0dXJuIGEgPSBiLCB0cnVlOwogICAgICAgIHJldHVybiBmYWxzZTsKICAgIH0KCnRlbXBsYXRlPGNsYXNzIFQ+CiAgICBib29sIG1heGltaXplKFQgJmEsIGNvbnN0IFQgJmIpIHsKICAgICAgICBpZiAoYSA8IGIpIHJldHVybiBhID0gYiwgdHJ1ZTsKICAgICAgICByZXR1cm4gZmFsc2U7CiAgICB9CgojZGVmaW5lIEZPUihpLGEsYikgZm9yKGludCBpPShhKTsgaTw9KGIpOyArK2kpCiNkZWZpbmUgRk9SUihpLGEsYikgZm9yKGludCBpPShhKTsgaT49KGIpOyAtLWkpCiNkZWZpbmUgUkVQKGksIG4pIGZvcihpbnQgaT0wOyBpPChuKTsgKytpKQojZGVmaW5lIFJFRChpLCBuKSBmb3IoaW50IGk9KG4pLTE7IGk+PTA7IC0taSkKI2RlZmluZSBNQVNLKGkpICgxTEwgPDwgKGkpKQojZGVmaW5lIEJJVChTLCBpKSAoKChTKSA+PiAoaSkpICYgMSkKI2RlZmluZSBtcCBtYWtlX3BhaXIKI2RlZmluZSBwYiBwdXNoX2JhY2sKI2RlZmluZSBmaSBmaXJzdAojZGVmaW5lIHNlIHNlY29uZAojZGVmaW5lIGFsbCh4KSB4LmJlZ2luKCksIHguZW5kKCkKI2RlZmluZSB0YXNrICJnZW4iCi8qRU5EIE9GIFRFTVBMQVRFLiBJQ0VCRUFSIEFORCBUSEUgQ0FUIFdJTEwgV0lOIFZPSTI2ICovCgpjb25zdCBpbnQgTU9EID0gMWU5ICsgNzsKY29uc3QgaW50IGluZiA9IDFlOSArIDI3MDkyMDA4Owpjb25zdCBsbCBJTkYgPSAxZTE4ICsgMjcwOTIwMDg7CmNvbnN0IGludCBOID0gMmU1ICsgNTsKaW50IG4sIGFbTl0sIGFuc1tOXTsKbGwgSzsKdmVjdG9yPGludD4gY29tcHJlc3M7CgpzdHJ1Y3QgQklUIHsKICAgIGludCBmdFtOXSwgc3VtID0gMDsKICAgIHZlY3RvcjxpaT4gaGlzdG9yeTsKICAgIHZvaWQgdXBkYXRlKGludCB4LCBpbnQgdmFsLCBib29sIHJlbSkgewogICAgICAgIGlmIChyZW0pIGhpc3RvcnkuZW1wbGFjZV9iYWNrKHgsIHZhbCk7CiAgICAgICAgc3VtICs9IHZhbDsKICAgICAgICBmb3IoOyB4IDw9IG47IHggKz0geCAmIC14KSBmdFt4XSArPSB2YWw7CiAgICB9CgogICAgaW50IGdldChpbnQgeCkgewogICAgICAgIGludCBhbnMgPSAwOwogICAgICAgIGZvcig7IHg7IHggLT0geCAmIC14KSBhbnMgKz0gZnRbeF07CiAgICAgICAgcmV0dXJuIGFuczsKICAgIH0KCiAgICB2b2lkIHNuYXBfc2hvdCgpIHsKICAgICAgICBoaXN0b3J5LmVtcGxhY2VfYmFjaygtMSwgLTEpOwogICAgfQoKICAgIHZvaWQgcm9sbF9iYWNrKCkgewogICAgICAgIHdoaWxlKCFoaXN0b3J5LmVtcHR5KCkpIHsKICAgICAgICAgICAgaWkgdG1wID0gaGlzdG9yeS5iYWNrKCk7IGhpc3RvcnkucG9wX2JhY2soKTsKICAgICAgICAgICAgaWYgKHRtcC5maSA9PSAtMSkgYnJlYWs7CiAgICAgICAgICAgIHVwZGF0ZSh0bXAuZmksIC10bXAuc2UsIGZhbHNlKTsKICAgICAgICB9CiAgICB9Cn0gZmVuTCwgZmVuUjsKbGwgaW52ID0gMDsKCnZvaWQgYWRkKGxsICZ4LCBsbCB5KSB7CiAgICB4ID0gbWluKElORiwgeCArIHkpOwp9Cgp2b2lkIERuQyhpbnQgcXJ5TCwgaW50IHFyeVIsIGludCBhbnNMLCBpbnQgYW5zUikgewogICAgaWYgKHFyeUwgPiBxcnlSKSByZXR1cm47CiAgICBpbnQgcXJ5TSA9IChxcnlMICsgcXJ5UikgPj4gMSwgYW5zTSA9IG1heChhbnNMLCBxcnlNICsgMSk7CiAgICBsbCB0bXAgPSBpbnY7CiAgICBmZW5MLnNuYXBfc2hvdCgpOwoKICAgIEZPUihpLCBxcnlMLCBxcnlNKSB7CiAgICAgICAgZmVuTC51cGRhdGUoYVtpXSwgKzEsIHRydWUpOwogICAgICAgIGFkZChpbnYsIGZlbkwuc3VtIC0gZmVuTC5nZXQoYVtpXSkpOwogICAgICAgIGFkZChpbnYsIGZlblIuZ2V0KGFbaV0gLSAxKSk7CiAgICB9CgogICAgaWYgKGludiA+IEspIHsKICAgICAgICBpbnYgPSB0bXA7CiAgICAgICAgYW5zW3FyeU1dID0gbiArIDE7CiAgICAgICAgZmVuTC5yb2xsX2JhY2soKTsKICAgICAgICBEbkMocXJ5TCwgcXJ5TSAtIDEsIGFuc0wsIGFuc1IpOwogICAgICAgIHJldHVybjsKICAgIH0KCiAgICBmZW5SLnNuYXBfc2hvdCgpOwoKICAgIGxsIGJlZiA9IGludjsKICAgIEZPUlIoaSwgYW5zUiwgbWF4KGFuc0wsIHFyeU0gKyAxKSkgewogICAgICAgIGZlblIudXBkYXRlKGFbaV0sICsxLCB0cnVlKTsKICAgICAgICBpbnYgKz0gZmVuUi5nZXQoYVtpXSAtIDEpOwogICAgICAgIGludiArPSBmZW5MLnN1bSAtIGZlbkwuZ2V0KGFbaV0pOwogICAgICAgIGlmIChpbnYgPiBLKSB7CiAgICAgICAgICAgIGFuc00gPSBpICsgMTsKICAgICAgICAgICAgYnJlYWs7CiAgICAgICAgfQogICAgfQoKICAgIGlmIChhbnNNID09IG4gKyAxKSB7CiAgICAgICAgZmVuUi5yb2xsX2JhY2soKTsKICAgICAgICBmZW5MLnJvbGxfYmFjaygpOwogICAgICAgIGludiA9IHRtcDsKICAgICAgICBEbkMocXJ5TCwgcXJ5TSAtIDEsIGFuc0wsIGFuc1IpOwogICAgICAgIHJldHVybjsKICAgIH0KCiAgICBhbnNbcXJ5TV0gPSBhbnNNOwogICAgaW52ID0gYmVmOwoKICAgIGZlblIucm9sbF9iYWNrKCk7CiAgICBEbkMocXJ5TSArIDEsIHFyeVIsIGFuc00sIGFuc1IpOwoKLy8gICAgaWYgKHFyeUwgPT0gMSAmJiBxcnlSID09IDUpIHsKLy8gICAgICAgIGNvdXQgPDwgdG1wIDw8ICcgJyAgPDwgYW5zTSA8PCAnXG4nOwovLyAgICAgICAgRk9SKGksIDEsIG4pIGFzc2VydChmZW5SLmZ0W2ldID09IDApOwovLyAgICB9CiAgICBpbnYgPSB0bXA7CiAgICBmZW5MLnJvbGxfYmFjaygpOwogICAgZmVuUi5zbmFwX3Nob3QoKTsKICAgIEZPUlIoaSwgYW5zUiwgYW5zTSArIDEpIHsKICAgICAgICBpbnYgKz0gZmVuTC5zdW0gLSBmZW5MLmdldChhW2ldKTsKICAgICAgICBpbnYgKz0gZmVuUi5nZXQoYVtpXSAtIDEpOwogICAgICAgIGZlblIudXBkYXRlKGFbaV0sICsxLCB0cnVlKTsKICAgIH0KICAgIERuQyhxcnlMLCBxcnlNIC0gMSwgYW5zTCwgYW5zTSk7CiAgICBmZW5SLnJvbGxfYmFjaygpOwp9Cgp2b2lkIGluaXQodm9pZCkgewogICAgY2luID4+IG4gPj4gSzsKICAgIEZPUihpLCAxLCBuKSBjaW4gPj4gYVtpXSwgY29tcHJlc3MucGIoYVtpXSk7CiAgICBzb3J0KGFsbChjb21wcmVzcykpOwogICAgRk9SKGksIDEsIG4pIGFbaV0gPSB1cHBlcl9ib3VuZChhbGwoY29tcHJlc3MpLCBhW2ldKSAtIGNvbXByZXNzLmJlZ2luKCk7Cn0KCnZvaWQgcHJvY2Vzcyh2b2lkKSB7CiAgICBGT1IoaSwgMSwgbikgYW5zW2ldID0gbiArIDE7CiAgICBEbkMoMSwgbiwgMSwgbik7CiAgICBsbCByZXMgPSAwOwogICAgRk9SKGksIDEsIG4pIHJlcyArPSBuICsgMSAtIGFuc1tpXTsKICAgIGNvdXQgPDwgcmVzOwp9CgppbnQgbWFpbigpIHsKICAgIGlvc19iYXNlOjpzeW5jX3dpdGhfc3RkaW8oMCk7CiAgICBjaW4udGllKDApOyBjb3V0LnRpZSgwKTsKICAgIGlmIChmb3Blbih0YXNrIi5pbnAiLCAiciIpKSB7CiAgICAgICAgZnJlb3Blbih0YXNrIi5pbnAiLCAiciIsIHN0ZGluKTsKICAgICAgICBmcmVvcGVuKHRhc2siLm91dCIsICJ3Iiwgc3Rkb3V0KTsKICAgIH0KICAgIGludCB0YyA9IDE7Ci8vICAgIGNpbiA+PiB0YzsKICAgIHdoaWxlKHRjLS0pIHsKICAgICAgICBpbml0KCk7CiAgICAgICAgcHJvY2VzcygpOwogICAgfQogICAgcmV0dXJuIDA7Cn0K