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;
const long long iinf = 1e9 + 10;
const long long inf = 1ll << 60;
const long long mod = 1e9 + 7;
void GG() {
  cout << "0\n";
  exit(0);
}
long long mpow(long long a, long long n, long long mo = mod) {
  long long re = 1;
  while (n > 0) {
    if (n & 1) re = re * a % mo;
    a = a * a % mo;
    n >>= 1;
  }
  return re;
}
long long inv(long long b, long long mo = mod) {
  if (b == 1) return b;
  return (mo - mo / b) * inv(mo % b, mo) % mo;
}
const long long maxn = 1e5 + 5;
long long sx[maxn * 4], sy[maxn * 4], second[maxn * 4], tx[maxn * 4],
    ty[maxn * 4];
long long ok[maxn * 4];
void push(long long o, long long l, long long r) {
  if (tx[o]) {
    tx[o] %= mod;
    second[o] += tx[o] * sy[o];
    sx[o] += tx[o] * (long long)(ok[o]);
    if (l != r) tx[o * 2] += tx[o], tx[o * 2 + 1] += tx[o];
    tx[o] = 0;
    second[o] %= mod;
    sx[o] %= mod;
  }
  if (ty[o]) {
    ty[o] %= mod;
    second[o] += ty[o] * sx[o];
    sy[o] += ty[o] * (long long)(ok[o]);
    if (l != r) ty[o * 2] += ty[o], ty[o * 2 + 1] += ty[o];
    ty[o] = 0;
    second[o] %= mod;
    sy[o] %= mod;
  }
}
inline void add(long long &a, long long b, long long c) {
  a = (b + c >= mod ? b + c - mod : b + c);
}
void pull(long long o) {
  add(sx[o], sx[o * 2], sx[o * 2 + 1]);
  add(sy[o], sy[o * 2], sy[o * 2 + 1]);
  add(second[o], second[o * 2], second[o * 2 + 1]);
  add(ok[o], ok[o * 2], ok[o * 2 + 1]);
}
void MO(long long L, long long R, long long xd, long long yd, long long o = 1,
        long long l = 0, long long r = maxn - 1) {
  push(o, l, r);
  if (l > R || r < L) return;
  if (l >= L && r <= R) {
    tx[o] += xd;
    ty[o] += yd;
    push(o, l, r);
    return;
  }
  long long mid = (l + r) / 2;
  MO(L, R, xd, yd, o * 2, l, mid);
  MO(L, R, xd, yd, o * 2 + 1, 1 + mid, r);
  pull(o);
}
void MO0(long long L, long long R, long long xd, long long yd, bool okadd,
         long long o = 1, long long l = 0, long long r = maxn - 1) {
  push(o, l, r);
  if (l > R || r < L) return;
  if (l >= L && r <= R) {
    sx[o] = xd;
    sy[o] = yd;
    second[o] = xd * yd % mod;
    ok[o] = okadd;
    return;
  }
  long long mid = (l + r) / 2;
  MO0(L, R, xd, yd, okadd, o * 2, l, mid);
  MO0(L, R, xd, yd, okadd, o * 2 + 1, 1 + mid, r);
  pull(o);
}
long long a[maxn];
long long lcnt[maxn], rcnt[maxn];
struct BIT {
  long long second[maxn];
  long long QU(long long e) {
    long long re = 0;
    for (++e; e > 0; e -= e & -e) add(re, re, second[e]);
    return re;
  }
  void MO(long long e, long long v) {
    for (++e; e < maxn; e += e & -e) add(second[e], second[e], v);
  }
  void MO(long long l, long long r, long long v) {
    v %= mod;
    if (v < 0) v += mod;
    MO(l, v);
    MO(r + 1, mod - v);
  }
  BIT() { memset(second, 0, sizeof second); }
};
long long segl[maxn], segr[maxn];
long long tp[maxn];
long long on[maxn];
BIT xbit, ybit;
void tog(long long x) {
  xbit.MO(tp[x] + 1, segr[a[x]], on[x] * lcnt[x]);
  ybit.MO(segl[a[x]], tp[x] - 1, on[x] * rcnt[x]);
  if (on[x] == 1) {
    long long xnow = xbit.QU(tp[x]), ynow = ybit.QU(tp[x]);
    MO0(tp[x], tp[x], xnow, ynow, 1);
    ;
    ;
  } else {
    MO0(tp[x], tp[x], 0, 0, 0);
  }
  MO(tp[x] + 1, segr[a[x]], (mod + on[x] * lcnt[x]) % mod, 0);
  MO(segl[a[x]], tp[x] - 1, 0, (mod + on[x] * rcnt[x]) % mod);
  on[x] = -on[x];
}
signed main() {
  ios_base::sync_with_stdio(0);
  cin.tie(0);
  ;
  long long n;
  cin >> n;
  vector<long long> hi;
  for (long long i = 0; i < n; ++i) {
    cin >> a[i];
    hi.push_back(a[i]);
  }
  sort(hi.begin(), hi.end());
  hi.resize(unique(hi.begin(), hi.end()) - hi.begin());
  BIT invbit;
  for (long long i = 0; i < n; ++i) {
    a[i] = lower_bound(hi.begin(), hi.end(), a[i]) - hi.begin();
    lcnt[i] = invbit.QU(a[i]);
    invbit.MO(a[i], 1);
  }
  memset(invbit.second, 0, sizeof invbit.second);
  vector<pair<long long, long long> > rep;
  memset(segl, 0x3f, sizeof segl);
  for (long long i = n - 1; i >= 0; --i) {
    rcnt[i] = invbit.QU(a[i]);
    invbit.MO(a[i], 1);
    rep.push_back({a[i], i});
  }
  sort(rep.begin(), rep.end());
  for (long long i = 0; i < n; ++i) {
    segl[rep[i].first] =
        min(segl[rep[i].first], (__typeof__(segl[rep[i].first]))(i));
    segr[rep[i].first] =
        max(segr[rep[i].first], (__typeof__(segr[rep[i].first]))(i));
    tp[rep[i].second] = i;
    ;
  };
  fill(on, on + maxn, 1);
  for (long long i = 0; i < n; ++i) tog(i);
  ;
  long long q;
  cin >> q;
  while (q--) {
    long long foo, x;
    cin >> foo >> x;
    --x;
    tog(x);
    cout << (mod + second[1] % mod) % mod << '\n';
    ;
  }
}