#include <iostream>
#include <vector>
#include <algorithm>
#include <array>
#include <iterator>
#include <string>
#include <cctype>
#include <cstring>
#include <cstdlib>
#include <cassert>
#include <cmath>
#include <ctime>
#include <iomanip>
#include <numeric>
#include <stack>
#include <queue>
#include <map>
#include <unordered_map>
#include <set>
#include <unordered_set>
#include <bitset>
#include <random>
#include <utility>
#include <functional>
using namespace std;
template<class T> struct BinaryIndexedTree
{
	private:
	int N;
	vector<T> node;

	public:

	BinaryIndexedTree() : N(0) {}
	BinaryIndexedTree(int N) : N(N), node(N) {}

	void add(int pos,T x)
	{
		assert(0 <= pos && pos < N);
		pos++;
		while(pos <= N)
		{
			node[pos-1] += x;
			pos += pos & -pos;
		}
	}

	T sum(int l,int r)
	{
		assert(0 <= l && l <= N && r <= N);
		return sum(r) - sum(l);
	}

	T sum(int r)
	{
		T ret = 0;
		while(r > 0)
		{
			ret += node[r-1];
			r -= r & -r;
		}
		return ret;
	}

	T sum() {return sum(N);}
	
};

void Main()
{
	int N,K;
	long long L,U;
	cin >> N >> K >> L >> U;
	vector<long long> A(N);
	for(int i = 0;i < N;i++)
	{
		cin >> A[i];
	}
	sort(A.begin(),A.end());
	vector<long long> S(N + 1);
	for(int i = 0;i < N;i++)
	{
		S[i + 1] = S[i] + A[i] / K;
	}
	long long ans = (long long)1e18;
	int ri = 0;
	BinaryIndexedTree<int> rcnt(K),lcnt(K);
	for(int i = 0;i < N;i++)
	{
		rcnt.add(A[i] % K,1);
	}
	for(int i = 0;i < N;i++)
	{
		while(ri < N && A[ri] <= A[i] + U - L)
		{
			rcnt.add(A[ri] % K,-1);
			ri++;
		}
		long long cur = 0;
		{
			//left
			
			cur += A[i] / K * i - S[i];
			cur += i - lcnt.sum(0,A[i] % K + 1);
		}
		{
			//right

			cur += S[N] - S[ri];
			cur -= (A[i] + U - L) / K * (N - ri);
			cur += N - ri - rcnt.sum(0,(A[i] + U - L) % K + 1);
		}
		lcnt.add(A[i] % K,1);
		ans = min(ans,cur);
	}
	cout << ans << "\n";
}
int main()
{
	ios::sync_with_stdio(false);
	cin.tie(nullptr);
	int tt = 1;
	/* cin >> tt; */
	while(tt--) Main();
}