Problem: In one well-known algorithm of finding the k-th order statistics we should divide all elements into groups of five consecutive elements and find the median of each five. A median is called the middle element of a sorted array (it's the third largest element for a group of five). To increase the algorithm's performance speed on a modern video card, you should be able to find a sum of medians in each five of the array.

A sum of medians of a sorted k-element set S = {a1, a2, ..., ak}, where a1 < a2 < a3 < ... < ak, will be understood by as 

<image>

The <image> operator stands for taking the remainder, that is <image> stands for the remainder of dividing x by y.

To organize exercise testing quickly calculating the sum of medians for a changing set was needed.

Input

The first line contains number n (1 ≤ n ≤ 105), the number of operations performed.

Then each of n lines contains the description of one of the three operations: 

  * add x — add the element x to the set; 
  * del x — delete the element x from the set; 
  * sum — find the sum of medians of the set. 



For any add x operation it is true that the element x is not included in the set directly before the operation.

For any del x operation it is true that the element x is included in the set directly before the operation.

All the numbers in the input are positive integers, not exceeding 109.

Output

For each operation sum print on the single line the sum of medians of the current set. If the set is empty, print 0.

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

Examples

Input

6
add 4
add 5
add 1
add 2
add 3
sum


Output

3


Input

14
add 1
add 7
add 2
add 5
sum
add 6
add 8
add 9
add 3
add 4
add 10
sum
del 1
sum


Output

5
11
13

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int MAXN = 2e5;
int n, m;
int seg[MAXN * 8];
long long modSum[5][MAXN * 8];
set<int> ord;
set<int>::iterator it;
unordered_map<int, int> comp;
int discomp[MAXN];
long long sum;
queue<pair<char, int> > fila;
void update(int pos, int ini, int fim, int id, int val);
int main() {
  scanf("%d", &n);
  for (int i = 0; i < n; i++) {
    char type[5];
    int aux = 0;
    scanf(" %s", type);
    if (type[0] != 's') scanf("%d", &aux);
    if (aux != 0) ord.insert(aux);
    fila.push(make_pair(type[0], aux));
  }
  for (it = ord.begin(); it != ord.end(); it++) {
    comp[*it] = ++m;
    discomp[m] = *it;
  }
  for (int i = 0; i < n; i++) {
    char type = fila.front().first;
    int aux = comp[fila.front().second];
    fila.pop();
    if (type == 'a') update(1, 1, m, aux, 1);
    if (type == 'd') update(1, 1, m, aux, -1);
    if (type == 's') printf("%lld\n", modSum[3][1]);
  }
}
void update(int pos, int ini, int fim, int id, int val) {
  if (ini > id || fim < id) return;
  if (ini == fim) {
    seg[pos] += val;
    modSum[1][pos] += val * discomp[ini];
    return;
  }
  int mid = ini + ((fim - ini) >> 1), e = (pos << 1), d = e | 1;
  update(e, ini, mid, id, val);
  update(d, mid + 1, fim, id, val);
  seg[pos] = seg[e] + seg[d];
  for (int i = 5; i < 10; i++)
    modSum[i - 5][pos] = modSum[i - 5][e] + modSum[(i - (seg[e]) % 5) % 5][d];
  return;
}