#include "bits/stdc++.h"
using namespace std;
typedef long long ll;
typedef vector<ll> vi;
typedef pair<ll, ll> pii;
typedef vector<pii> vpii;
#define sz(x) (int)(x).size()
#define all(x) (x).begin(), (x).end()
const ll INF = 1e18;
int N, Q;
vi A;
vi ans;
vi freq;
vi cnts;
set<int> incnt;
ll tmp, pref, suff, n;
struct query
{
int l, r, idx;
};
ll numberOfSubsequences(ll x)
{
return x * (x + 1) / 2;
}
ll totalLengthOfSubsequences(ll x)
{
return x * (x + 1) * (x + 1) / 2 - (2 * x + 1) * (x + 1) * x / 6;
}
void add(int x)
{
if (freq[x] > 0)
{
--cnts[freq[x]];
if (cnts[freq[x]] == 0)
incnt.erase(freq[x]);
}
++freq[x];
++cnts[freq[x]];
if (cnts[freq[x]] == 1)
incnt.insert(freq[x]);
}
void sub(int x)
{
--cnts[freq[x]];
if (cnts[freq[x]] == 0)
incnt.erase(freq[x]);
--freq[x];
if (freq[x])
{
++cnts[freq[x]];
if (cnts[freq[x]] == 1)
incnt.insert(freq[x]);
}
}
void doStuff(ll x, ll y)
{
ll len = x * y;
// if both are in set
tmp -= totalLengthOfSubsequences(len) - x * x * (totalLengthOfSubsequences(y) - y) - y * numberOfSubsequences(x);
// if one is inside the other isn't
tmp -= (n - len) * (len * (len + 1) / 2 - x * y * (y + 1) / 2);
// if both are outside
tmp -= (len - y) * pref * (n - pref - len);
pref += len;
swap(pref, suff);
}
int main()
{
ios::sync_with_stdio(false);
cin.tie(0);
cin >> N >> Q;
A.resize(N);
for (int i = 0; i < N; ++i)
cin >> A[i];
vector<query> Qu(Q);
ans.resize(Q);
for (int i = 0; i < Q; ++i)
cin >> Qu[i].l >> Qu[i].r, Qu[i].idx = i, --Qu[i].l;
int sq = 1;
while (sq * sq < N)
++sq;
auto cmp = [&](const query &a, const query &b)
{ if (a.l / sq == b.l / sq)
return a.r < b.r;
else
return a.l < b.l; };
sort(all(Qu), cmp);
int lx = 0, rx = 0;
freq.assign(*max_element(all(A)) + 1, 0);
cnts.assign(N + 1, 0);
for (query q : Qu)
{
while (rx < q.r)
add(A[rx++]);
while (lx > q.l)
add(A[--lx]);
while (rx > q.r)
sub(A[--rx]);
while (lx < q.l)
sub(A[lx++]);
n = q.r - q.l;
pref = 0, suff = 0;
tmp = totalLengthOfSubsequences(n);
for (ll x : incnt)
{
// ll x = it->first; // how much
ll y = cnts[x]; // how often
if (y & 1)
doStuff(x, 1);
if (y > 1)
{
doStuff(x, y / 2);
doStuff(x, y / 2);
}
}
ans[q.idx] = tmp;
}
for (ll x : ans)
cout << x << "\n";
return 0;
}
