#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 *******************************
//? Good Subarrays Hashing
//* We need to find subarrays : (P[R] - P[L-1])%k == 0
//* P[R]%k == P[L-1]%k
//* Hence for P[R]%k find P[R]%k in past
//* Eg : [4, 5, 0, -2, -3, 1] , k = 5
//* sum : 0 4 9 9 7 4 5
//* sum%m : 0 4 4 4 2 4 0
//* ct : 1 1 2 3 1 4 2
//* ans : 1 + 2 + 0 + 3 + 1
vector<int> a;
int consistency(int n, int k) {
unordered_map<int,int> mp = {{0, 1}};
int sum = 0;
int ans = 0;
for(int i=0; i<n; i++){
sum += a[i];
int rem = ((sum%k)+k)%k;
if(mp.count(rem)){
ans += mp[rem];
}
mp[rem]++;
}
return ans;
}
int practice(int n, int k){
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+Pj0gMTsKICAgIH0KICAgIHJldHVybiB4Owp9CgoKLy9fICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqIFNUQVJUIEJlbG93ICoqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioKCgoKCgovLz8gR29vZCBTdWJhcnJheXMgSGFzaGluZwoKLy8qIFdlIG5lZWQgdG8gZmluZCBzdWJhcnJheXMgOiAoUFtSXSAtIFBbTC0xXSklayA9PSAwCi8vKiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgUFtSXSVrID09IFBbTC0xXSVrCi8vKiAgICAgSGVuY2UgZm9yIFBbUl0layBmaW5kIFBbUl0layBpbiBwYXN0CgoKLy8qIEVnICAgICA6ICAgIFs0LCAgNSwgIDAsIC0yLCAtMywgIDFdICAgLCBrID0gNQovLyogc3VtICAgIDogIDAgIDQgICA5ICAgOSAgIDcgICA0ICAgNSAgICAgCi8vKiBzdW0lbSAgOiAgMCAgNCAgIDQgICA0ICAgMiAgIDQgICAwICAgICAKLy8qIGN0ICAgICA6ICAxICAxICAgMiAgIDMgICAxICAgNCAgIDIKLy8qIGFucyAgICA6ICAgICAgICAgMSArIDIgKyAwICsgMyArIDEKCgp2ZWN0b3I8aW50PiBhOwppbnQgY29uc2lzdGVuY3koaW50IG4sIGludCBrKSB7CgkKCXVub3JkZXJlZF9tYXA8aW50LGludD4gbXAgPSB7ezAsIDF9fTsKCWludCBzdW0gPSAwOwoJaW50IGFucyA9IDA7Cglmb3IoaW50IGk9MDsgaTxuOyBpKyspewoJICAgIHN1bSArPSBhW2ldOwoJICAgIGludCByZW0gPSAoKHN1bSVrKStrKSVrOwoJICAgIGlmKG1wLmNvdW50KHJlbSkpewoJICAgICAgICBhbnMgKz0gbXBbcmVtXTsKCSAgICB9CgkgICAgbXBbcmVtXSsrOwoJfQoJCglyZXR1cm4gYW5zOwoKfQoKCgoKCgoKCgoKCgoKCgoKCmludCBwcmFjdGljZShpbnQgbiwgaW50IGspewoKCiAgICByZXR1cm4gMDsKfQoKCgoKdm9pZCBzb2x2ZSgpIHsKICAgIAoJaW50IG4sIGs7CgljaW4gPj4gbiA+PiBrOwoJCglhLnJlc2l6ZShuKTsKCWZvcihpbnQgaT0wOyBpPG47IGkrKykgY2luID4+IGFbaV07CgkKICAgIGNvdXQgPDwgY29uc2lzdGVuY3kobiwgaykgPDwgZW5kbDsKCn0KCgoKCgppbnQzMl90IG1haW4oKSB7CiAgICBpb3NfYmFzZTo6c3luY193aXRoX3N0ZGlvKDApOyBjaW4udGllKDApOyBjb3V0LnRpZSgwKTsKCiAgICBpbnQgdCA9IDE7CiAgICAvLyBjaW4gPj4gdDsKICAgIHdoaWxlICh0LS0pIHsKICAgICAgICBzb2x2ZSgpOwogICAgfQoKICAgIHJldHVybiAwOwp9