Problem: On the 228-th international Uzhlyandian Wars strategic game tournament teams from each country are called. The teams should consist of 5 participants.

The team of Uzhlyandia will consist of soldiers, because there are no gamers.

Masha is a new minister of defense and gaming. The prime duty of the minister is to calculate the efficiency of the Uzhlandian army. The army consists of n soldiers standing in a row, enumerated from 1 to n. For each soldier we know his skill in Uzhlyandian Wars: the i-th soldier's skill is ai.

It was decided that the team will consist of three players and two assistants. The skills of players should be same, and the assistants' skills should not be greater than the players' skill. Moreover, it is important for Masha that one of the assistants should stand in the row to the left of the players, and the other one should stand in the row to the right of the players. Formally, a team is five soldiers with indexes i, j, k, l, p, such that 1 ≤ i < j < k < l < p ≤ n and ai ≤ aj = ak = al ≥ ap. 

The efficiency of the army is the number of different teams Masha can choose. Two teams are considered different if there is such i such that the i-th soldier is a member of one team, but not a member of the other team.

Initially, all players are able to be players. For some reasons, sometimes some soldiers become unable to be players. Sometimes some soldiers, that were unable to be players, become able to be players. At any time any soldier is able to be an assistant. Masha wants to control the efficiency of the army, so she asked you to tell her the number of different possible teams modulo 1000000007 (109 + 7) after each change. 

Input

The first line contains single integer n (1 ≤ n ≤ 105) — the number of soldiers in Uzhlyandia.

The second line contains n integers a1, a2, ..., an (1 ≤ ai ≤ 109) — the soldiers' skills.

The third line contains single integer m (1 ≤ m ≤ 105) — the number of changes.

The next m lines contain the changes, each change is described with two integers t and x (1 ≤ t ≤ 2, 1 ≤ x ≤ n) on a separate line. If t = 1, then the x-th soldier is unable to be a player after this change. If t = 2, then the x-th soldier is able to be a player after this change. 

It is guaranteed that before each query of the first type the soldier is able to be a player, and before each query of the second type the soldier is unable to be a player.

Output

Print m integers — the number of distinct teams after each change.

Print the answers modulo 1000000007 (109 + 7). 

Examples

Input

6
1 1 1 1 1 1
2
1 3
2 3


Output

1
6


Input

8
3 4 4 2 4 5 4 1
3
1 5
2 5
1 2


Output

1
6
2

Note

In the first example, after the first change the only team consists of soldiers [1, 2, 4, 5, 6]. After the second change any five soldiers can form a team.

In the first example after the first change the only team is soldiers [1, 2, 3, 7, 8]. After the second change the possible teams are: [1, 2, 3, 5, 7], [1, 2, 3, 5, 8], [1, 2, 3, 7, 8], [1, 2, 5, 7, 8], [1, 3, 5, 7, 8], [2, 3, 5, 7, 8]. After the third change the possible teams are: [1, 3, 5, 7, 8], [2, 3, 5, 7, 8].

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
long double safe_sqrt(long double x) { return sqrt(max((long double)0.0, x)); }
long long GI(long long& x) { return scanf("%lld", &x); }
const long long MN = 100111;
const long long MOD = 1e9 + 7;
long long n, a[MN], c[MN], nc;
long long bit[MN], lajcljascjljl[MN], aucouasocjolkjl[MN];
void update(long long u, long long val) {
  for (; u < MN; u += u & -u) bit[u] += val;
}
long long get(long long u) {
  long long res = 0;
  for (; u > 0; u -= u & -u) res += bit[u];
  return res;
}
void RR() {
  for (long long i = (1), _i = (n); i <= _i; ++i) c[i] = a[i];
  sort(c + 1, c + n + 1);
  nc = unique(c + 1, c + n + 1) - c - 1;
  for (long long i = (1), _i = (n); i <= _i; ++i)
    a[i] = lower_bound(c + 1, c + nc + 1, a[i]) - c;
}
struct NodeVal {
  long long f[4][4];
};
NodeVal operator+(const NodeVal& a, const NodeVal& b) {
  NodeVal res;
  for (long long i = 0, _i = (4); i < _i; ++i)
    for (long long j = (i), _j = (3); j <= _j; ++j) {
      res.f[i][j] = 0;
      for (long long k = (i), _k = (j); k <= _k; ++k)
        res.f[i][j] = (res.f[i][j] + a.f[i][k] * b.f[k][j]) % MOD;
    }
  return res;
}
struct Node {
  NodeVal val;
  Node *lajcljascjljl, *aucouasocjolkjl;
  Node() {
    memset(val.f, 0, sizeof val.f);
    lajcljascjljl = aucouasocjolkjl = 0;
  }
};
struct Value {
  vector<long long> index;
  Node* it;
  void init() { it = build(1, ((long long)(index).size()) - 1); }
  Node* build(long long l, long long r) {
    if (l == r) {
      Node* res = new Node();
      for (long long t = 0, _t = (4); t < _t; ++t) res->val.f[t][t] = 1;
      res->val.f[0][1] = lajcljascjljl[index[l]];
      res->val.f[1][2] = 1;
      res->val.f[2][3] = aucouasocjolkjl[index[l]];
      return res;
    }
    long long mid = (l + r) >> 1;
    Node* L = build(l, mid);
    Node* R = build(mid + 1, r);
    Node* res = new Node();
    res->val = L->val + R->val;
    res->lajcljascjljl = L;
    res->aucouasocjolkjl = R;
    return res;
  }
  void update(Node* p, long long l, long long r, long long u, bool enable) {
    if (u < l || r < u) return;
    if (l == r) {
      if (enable) {
        p->val.f[0][1] = lajcljascjljl[index[l]];
        p->val.f[1][2] = 1;
        p->val.f[2][3] = aucouasocjolkjl[index[l]];
      } else {
        p->val.f[0][1] = 0;
        p->val.f[1][2] = 0;
        p->val.f[2][3] = 0;
      }
      return;
    }
    long long mid = (l + r) >> 1;
    update(p->lajcljascjljl, l, mid, u, enable);
    update(p->aucouasocjolkjl, mid + 1, r, u, enable);
    p->val = p->lajcljascjljl->val + p->aucouasocjolkjl->val;
  }
  long long getIndex(long long pos) {
    return lower_bound(index.begin(), index.end(), pos) - index.begin();
  }
  void disable(long long pos) {
    update(it, 1, ((long long)(index).size()) - 1, getIndex(pos), false);
  }
  void enable(long long pos) {
    update(it, 1, ((long long)(index).size()) - 1, getIndex(pos), true);
  }
} all[MN];
int32_t main() {
  ios::sync_with_stdio(0);
  cin.tie(0);
  cout << (fixed) << setprecision(9) << boolalpha;
  while (GI(n) == 1) {
    for (long long i = (1), _i = (n); i <= _i; ++i) GI(a[i]);
    RR();
    memset(bit, 0, sizeof bit);
    for (long long i = (1), _i = (n); i <= _i; ++i) {
      lajcljascjljl[i] = get(a[i]);
      update(a[i], +1);
    }
    memset(bit, 0, sizeof bit);
    for (long long i = (n), _i = (1); i >= _i; --i) {
      aucouasocjolkjl[i] = get(a[i]);
      update(a[i], +1);
    }
    for (long long i = (1), _i = (nc); i <= _i; ++i) {
      all[i].index.clear();
      all[i].index.push_back(0);
      all[i].it = 0;
    }
    for (long long i = (1), _i = (n); i <= _i; ++i) {
      all[a[i]].index.push_back(i);
    }
    long long res = 0;
    for (long long i = (1), _i = (nc); i <= _i; ++i) {
      all[i].init();
      res = (res + all[i].it->val.f[0][3]) % MOD;
    }
    long long q;
    GI(q);
    while (q--) {
      long long typ;
      GI(typ);
      long long index;
      GI(index);
      res = (res - all[a[index]].it->val.f[0][3] + MOD) % MOD;
      if (res < 0) res += MOD;
      if (typ == 1) {
        all[a[index]].disable(index);
      } else {
        all[a[index]].enable(index);
      }
      res = (res + all[a[index]].it->val.f[0][3]) % MOD;
      printf("%lld\n", res);
    }
  }
  return 0;
}