An array of positive integers a1, a2, ..., an is given. Let us consider its arbitrary subarray al, al + 1..., ar, where 1 ≤ l ≤ r ≤ n. For every positive integer s denote by Ks the number of occurrences of s into the subarray. We call the power of the subarray the sum of products Ks·Ks·s for every positive integer s. The sum contains only finite number of nonzero summands as the number of different values in the array is indeed finite.

You should calculate the power of t given subarrays.

Input

First line contains two integers n and t (1 ≤ n, t ≤ 200000) — the array length and the number of queries correspondingly.

Second line contains n positive integers ai (1 ≤ ai ≤ 106) — the elements of the array.

Next t lines contain two positive integers l, r (1 ≤ l ≤ r ≤ n) each — the indices of the left and the right ends of the corresponding subarray.

Output

Output t lines, the i-th line of the output should contain single positive integer — the power of the i-th query subarray.

Please, do not use %lld specificator to read or write 64-bit integers in C++. It is preferred to use cout stream (also you may use %I64d).

Examples

Input

3 2
1 2 1
1 2
1 3


Output

3
6


Input

8 3
1 1 2 2 1 3 1 1
2 7
1 6
2 7


Output

20
20
20

Note

Consider the following array (see the second sample) and its [2, 7] subarray (elements of the subarray are colored): 

<image> Then K1 = 3, K2 = 2, K3 = 1, so the power is equal to 32·1 + 22·2 + 12·3 = 20.
#include <bits/stdc++.h>
using namespace std;
using ll = long long;
struct query {
  int l, r, block, id;
};
const int N = 200000, Q = 200000;
int n, m, a[N], freq[1000001];
query q[Q];
ll ans[Q];
bool by_block(const query &a, const query &b) {
  if (a.block != b.block) return a.block < b.block;
  return a.r > b.r;
}
int main() {
  scanf("%d %d", &n, &m);
  int bsize = (int)sqrt(n);
  for (int i = 0; i < n; i++) {
    scanf("%d", &a[i]);
  }
  for (int i = 0; i < m; i++) {
    scanf("%d %d", &q[i].l, &q[i].r);
    q[i].l--;
    q[i].block = q[i].l / bsize;
    q[i].id = i;
  }
  sort(q, q + m, by_block);
  int curr_l = 0, curr_r = 0;
  ll curr_ans = 0;
  for (int i = 0; i < m; i++) {
    int l = q[i].l, r = q[i].r;
    while (curr_l < l) {
      curr_ans += (ll)(1 - 2 * freq[a[curr_l]]) * a[curr_l];
      freq[a[curr_l]]--;
      curr_l++;
    }
    while (curr_l > l) {
      curr_ans += (ll)(1 + 2 * freq[a[curr_l - 1]]) * a[curr_l - 1];
      freq[a[curr_l - 1]]++;
      curr_l--;
    }
    while (curr_r < r) {
      curr_ans += (ll)(1 + 2 * freq[a[curr_r]]) * a[curr_r];
      freq[a[curr_r]]++;
      curr_r++;
    }
    while (curr_r > r) {
      curr_ans += (ll)(1 - 2 * freq[a[curr_r - 1]]) * a[curr_r - 1];
      freq[a[curr_r - 1]]--;
      curr_r--;
    }
    ans[q[i].id] = curr_ans;
  }
  for (int i = 0; i < m; i++) {
    printf("%I64d\n", ans[i]);
  }
  return 0;
}
