using namespace std;

#include <cstdio>
#include <cstring>
#include <iostream>

int N, K, A, B, v[1<<19], S[1<<19], re[1<<17];

long long rec( int len )
{
    memset( re, 0, sizeof( re ) );    
    
    long long ret = 0;
    
    if( !len )
        return ret;
    
    re[0]++;
    
//    cout << " first half : " << endl;
    
    for( int i = 1; i < len; i++ )
    {
         ret += (long long)(re[ S[i] ]),
         re[ S[i] ]++;
         
//         cout << i << " : incr by " << re[ S[i] ]-1 << endl;
//         if( S[i] == 0 )
//             ret++;
    }    
    
//    cout << " second half " << endl;
     
    for( int i = len; i <= N; i++ )
    {
         ret += (long long)(re[ S[i] ]),
         re[ S[i] ]++,
         re[ S[i - len] ]--;
         
//         cout << i << " : incr by " << re[ S[i] ]-1 << endl;
//         if( S[i] == 0 )
//            ret++;
    }
    
//    cout << len << " : " << ret << endl;
    
    return ret;
}

int main()
{
    freopen("divk.in", "r", stdin);
    freopen("divk.out", "w", stdout);
    
    int i;
    
    scanf("%d %d %d %d", &N, &K, &A, &B);
    for(i = 1; i <= N; i++)
        scanf("%d", v+i ),
        S[i] = S[i-1] + v[i],
        S[i] %= K;
    
    long long ret = rec( B ) - rec( A - 1 );
    
    cout << ret << endl;
    
    return 0;   
}