#include <bits/stdc++.h>
using namespace std;
#define int long long int
#define double long double
const int M = 1000000007;
const int N = 3e5+9;
const int INF = 2e9+1;
const int MAXN = 100000;
const int LINF = 2000000000000000001;
//_ ***************************** START Below *******************************
vector<int> a;
//* Template1 for Atleast k (i.e. >= k )
void consistency1(int n, int k){
int maxi = 0;
for(int i=0; i<n; i++) maxi = max(maxi, a[i]);
int s = 0, e = 0;
int ct = 0;
int ans = 0;
while(e<n){
//* Calculate State
if(a[e] == maxi) ct++;
//* Invalid window => keep expanding
if(ct < k){
e++;
}
else{
//* Valid window => keep shrinking && Computing Result
while(s<=e && ct >= k){
ans += n-e;
if(a[s] == maxi) ct--;
s++;
}
e++;
}
}
cout << ans << endl;
}
void consistency2(int n, int k){
int maxi = 0;
for(int i=0; i<n; i++) maxi = max(maxi, a[i]);
int s = 0, e = 0;
int ct = 0;
int ans = 0;
while(e<n){
//* Calculate State
if(a[e] == maxi) ct++;
//* Valid window => keep shrinking && Computing Result
while(s<=e && ct >= k){
ans += n-e;
if(a[s] == maxi) ct--;
s++;
}
e++;
}
cout << ans << endl;
}
void solve() {
int n, k;
cin >> n >> k;
a.resize(n);
for(int i=0; i<n; i++) cin >> a[i];
consistency1(n, k);
consistency2(n, k);
}
int32_t main() {
ios_base::sync_with_stdio(0); cin.tie(0); cout.tie(0);
int t = 1;
while (t--) {
solve();
}
return 0;
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CiNkZWZpbmUgaW50ICAgICAgICAgICAgICBsb25nIGxvbmcgaW50CiNkZWZpbmUgZG91YmxlICAgICAgICAgICBsb25nIGRvdWJsZQoKCmNvbnN0IGludCBNID0gMTAwMDAwMDAwNzsKY29uc3QgaW50IE4gPSAzZTUrOTsKY29uc3QgaW50IElORiA9IDJlOSsxOwpjb25zdCBpbnQgTUFYTiA9IDEwMDAwMDsKY29uc3QgaW50IExJTkYgPSAyMDAwMDAwMDAwMDAwMDAwMDAxOwoKLy9fICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqIFNUQVJUIEJlbG93ICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioKCgoKdmVjdG9yPGludD4gYTsKCgovLyogVGVtcGxhdGUxIGZvciBBdGxlYXN0IGsgKGkuZS4gPj0gayApCgoKdm9pZCBjb25zaXN0ZW5jeTEoaW50IG4sIGludCBrKXsKCQoJaW50IG1heGkgPSAwOwoJZm9yKGludCBpPTA7IGk8bjsgaSsrKSBtYXhpID0gbWF4KG1heGksIGFbaV0pOwoJCglpbnQgcyA9IDAsIGUgPSAwOwoJaW50IGN0ID0gMDsKCWludCBhbnMgPSAwOwoJCgl3aGlsZShlPG4pewoJICAgIC8vKiBDYWxjdWxhdGUgU3RhdGUKCSAgICBpZihhW2VdID09IG1heGkpIGN0Kys7CgkgICAgCgkgICAgLy8qIEludmFsaWQgd2luZG93ID0+IGtlZXAgZXhwYW5kaW5nCgkgICAgaWYoY3QgPCBrKXsKCSAgICAgICAgZSsrOwoJICAgIH0KCSAgICBlbHNlewoJICAgICAgICAvLyogVmFsaWQgd2luZG93ID0+IGtlZXAgc2hyaW5raW5nICYmIENvbXB1dGluZyBSZXN1bHQKCSAgICAgICAgd2hpbGUoczw9ZSAmJiBjdCA+PSBrKXsKCSAgICAgICAgICAgIGFucyArPSBuLWU7CgkgICAgICAgICAgICBpZihhW3NdID09IG1heGkpIGN0LS07CgkgICAgICAgICAgICBzKys7CgkgICAgICAgIH0KCSAgICAgICAgZSsrOwoJICAgIH0KCX0KCWNvdXQgPDwgYW5zIDw8IGVuZGw7Cn0KCgoKCgoKdm9pZCBjb25zaXN0ZW5jeTIoaW50IG4sIGludCBrKXsKCQoJaW50IG1heGkgPSAwOwoJZm9yKGludCBpPTA7IGk8bjsgaSsrKSBtYXhpID0gbWF4KG1heGksIGFbaV0pOwoJCglpbnQgcyA9IDAsIGUgPSAwOwoJaW50IGN0ID0gMDsKCWludCBhbnMgPSAwOwoJCgl3aGlsZShlPG4pewoJICAgIC8vKiBDYWxjdWxhdGUgU3RhdGUKCSAgICBpZihhW2VdID09IG1heGkpIGN0Kys7CgkgICAgCgkJLy8qIFZhbGlkIHdpbmRvdyA9PiBrZWVwIHNocmlua2luZyAmJiBDb21wdXRpbmcgUmVzdWx0CgkJd2hpbGUoczw9ZSAmJiBjdCA+PSBrKXsKCQkgICAgYW5zICs9IG4tZTsKCQkgICAgaWYoYVtzXSA9PSBtYXhpKSBjdC0tOwoJCSAgICBzKys7CgkJfQoJCWUrKzsKCX0KCWNvdXQgPDwgYW5zIDw8IGVuZGw7Cn0KCgoKdm9pZCBzb2x2ZSgpIHsKCglpbnQgbiwgazsKCWNpbiA+PiBuID4+IGs7CglhLnJlc2l6ZShuKTsKCWZvcihpbnQgaT0wOyBpPG47IGkrKykgY2luID4+IGFbaV07CgoJY29uc2lzdGVuY3kxKG4sIGspOwoJY29uc2lzdGVuY3kyKG4sIGspOwoJCn0KCgoKCgppbnQzMl90IG1haW4oKSB7CiAgICBpb3NfYmFzZTo6c3luY193aXRoX3N0ZGlvKDApOyBjaW4udGllKDApOyBjb3V0LnRpZSgwKTsKCiAgICBpbnQgdCA9IDE7CiAgICB3aGlsZSAodC0tKSB7CiAgICAgICAgc29sdmUoKTsKICAgIH0KCiAgICByZXR1cm4gMDsKfQ==