Problem: Farmer John is hosting a tennis tournament with his n cows. Each cow has a skill level si, and no two cows having the same skill level. Every cow plays every other cow exactly once in the tournament, and each cow beats every cow with skill level lower than its own.

However, Farmer John thinks the tournament will be demoralizing for the weakest cows who lose most or all of their matches, so he wants to flip some of the results. In particular, at k different instances, he will take two integers ai, bi (ai < bi) and flip all the results between cows with skill level between ai and bi inclusive. That is, for any pair x, y <image> he will change the result of the match on the final scoreboard (so if x won the match, the scoreboard will now display that y won the match, and vice versa). It is possible that Farmer John will change the result of a match multiple times. It is not guaranteed that ai and bi are equal to some cow's skill level.

Farmer John wants to determine how balanced he made the tournament results look. In particular, he wants to count the number of triples of cows (p, q, r) for which the final leaderboard shows that cow p beats cow q, cow q beats cow r, and cow r beats cow p. Help him determine this number.

Note that two triples are considered different if they do not contain the same set of cows (i.e. if there is a cow in one triple that is not in the other).

Input

On the first line are two space-separated integers, n and k (3 ≤ n ≤ 105; 0 ≤ k ≤ 105). On the next line are n space-separated distinct integers, s1, s2, ..., sn (1 ≤ si ≤ 109), denoting the skill levels of the cows. On the next k lines are two space separated integers, ai and bi (1 ≤ ai < bi ≤ 109) representing the changes Farmer John made to the scoreboard in the order he makes it.

Output

A single integer, containing the number of triples of cows (p, q, r) for which the final leaderboard shows that cow p beats cow q, cow q beats cow r, and cow r beats cow p.

Please do not use the %lld specifier to read or write 64-bit integers in С++. It is preferred to use the cin, cout streams or the %I64d specifier.

Examples

Input

3 2
1 2 3
1 2
2 3


Output

1


Input

5 3
5 9 4 1 7
1 7
2 8
3 9


Output

3

Note

In the first sample, cow 3 > cow 1, cow 3 > cow 2, and cow 2 > cow 1. However, the results between cows 1 and 2 and cows 2 and 3 are flipped, so now FJ's results show that cow 1 > cow 2, cow 2 > cow 3, and cow 3 > cow 1, so cows 1, 2, and 3 form a balanced triple. 

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
const long long MAXN = 1e5;
long long n, m, tot, ans;
long long a[MAXN | 1], num[MAXN | 1], deg[MAXN | 1], g[MAXN | 1];
struct Range {
  long long l, r;
  Range(long long _l = 0, long long _r = 0) : l(_l), r(_r) {}
} ran[MAXN | 1];
struct Op {
  long long pos, val;
  Op(long long _pos = 0, long long _val = 0) : pos(_pos), val(_val) {}
  friend bool operator<(const Op &lhs, const Op &rhs) {
    return lhs.pos < rhs.pos;
  }
} op[MAXN << 1 | 1];
inline long long read() {
  register long long x = 0, v = 1;
  register char ch = getchar();
  while (!isdigit(ch)) {
    if (ch == '-') v = -1;
    ch = getchar();
  }
  while (isdigit(ch)) {
    x = x * 10 + ch - '0';
    ch = getchar();
  }
  return x * v;
}
namespace SegmentTree {
long long sumv[MAXN << 2 | 1][2], lazy[MAXN << 2 | 1];
void push_up(long long o) {
  sumv[o][0] = sumv[o << 1][0] + sumv[o << 1 | 1][0];
  sumv[o][1] = sumv[o << 1][1] + sumv[o << 1 | 1][1];
}
void push_down(long long o) {
  if (!lazy[o]) return;
  std::swap(sumv[o << 1][0], sumv[o << 1][1]);
  std::swap(sumv[o << 1 | 1][0], sumv[o << 1 | 1][1]);
  lazy[o << 1] ^= 1;
  lazy[o << 1 | 1] ^= 1;
  lazy[o] = 0;
}
void build(long long o, long long l, long long r) {
  lazy[o] = 0;
  if (l == r) {
    sumv[o][0] = 1;
    sumv[o][1] = 0;
    return;
  }
  long long mid = (l + r) >> 1;
  build(o << 1, l, mid);
  build(o << 1 | 1, mid + 1, r);
  push_up(o);
}
void update(long long o, long long l, long long r, long long ql, long long qr) {
  if (ql <= l && r <= qr) {
    std::swap(sumv[o][0], sumv[o][1]);
    lazy[o] ^= 1;
    return;
  }
  long long mid = (l + r) >> 1;
  push_down(o);
  if (ql <= mid) update(o << 1, l, mid, ql, qr);
  if (mid < qr) update(o << 1 | 1, mid + 1, r, ql, qr);
  push_up(o);
}
long long query(long long o, long long l, long long r, long long ql,
                long long qr) {
  if (ql > qr) return 0;
  if (ql <= l && r <= qr) return sumv[o][0];
  long long mid = (l + r) >> 1, res = 0;
  push_down(o);
  if (ql <= mid) res = query(o << 1, l, mid, ql, qr);
  if (mid < qr) res += query(o << 1 | 1, mid + 1, r, ql, qr);
  return res;
}
}  // namespace SegmentTree
using namespace SegmentTree;
signed main() {
  n = read();
  m = read();
  for (long long i = 1; i <= n; ++i) num[++tot] = a[i] = read();
  for (long long i = 1; i <= m; ++i) ran[i].l = read(), ran[i].r = read();
  std::sort(num + 1, num + 1 + tot);
  tot = std::unique(num + 1, num + 1 + tot) - num - 1;
  long long cnt = 0;
  for (long long i = 1; i <= m; ++i) {
    ran[i].l = std::lower_bound(num + 1, num + 1 + tot, ran[i].l) - num;
    ran[i].r = std::upper_bound(num + 1, num + 1 + tot, ran[i].r) - num - 1;
    op[++cnt] = Op(ran[i].l, ran[i].l);
    op[++cnt] = Op(ran[i].r + 1, ran[i].l);
  }
  std::sort(op + 1, op + 1 + cnt);
  build(1, 1, n);
  for (long long i = 1, p = 1; i <= n; ++i) {
    while (p <= cnt && op[p].pos <= i) {
      update(1, 1, n, op[p].val, n);
      ++p;
    }
    deg[i] += i - 1 - query(1, 1, n, 1, i - 1);
  }
  build(1, 1, n);
  cnt = 0;
  for (long long i = 1; i <= m; ++i) {
    op[++cnt] = Op(ran[i].r, ran[i].r);
    op[++cnt] = Op(ran[i].l - 1, ran[i].r);
  }
  std::sort(op + 1, op + 1 + cnt);
  std::reverse(op + 1, op + 1 + cnt);
  for (long long i = n, p = 1; i >= 1; --i) {
    while (p <= cnt && op[p].pos >= i) {
      update(1, 1, n, 1, op[p].val);
      ++p;
    }
    deg[i] += query(1, 1, n, i + 1, n);
  }
  ans = n * (n - 1) * (n - 2) / 6;
  for (long long i = 1; i <= n; ++i)
    if (deg[i] > 1) ans -= deg[i] * (deg[i] - 1) / 2;
  printf("%lld\n", ans);
  return 0;
}