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;
long long h[100010], dat[100010], s[100010][5];
int n, root, tot, l[100010], r[100010], sum[100010];
bool t;
inline void update(int x) {
  if (!x) return;
  int ss = sum[l[x]] + 1;
  for (int i = 0; i < 5; i++)
    s[x][i] = (long long)(s[l[x]][i] + s[r[x]][(i - ss % 5 + 5) % 5]);
  s[x][ss % 5] += (long long)dat[x];
  sum[x] = ss + sum[r[x]];
  h[x] = max(h[l[x]], h[r[x]]) + 1;
}
inline void zig(int &x) {
  int y = l[x];
  l[x] = r[y];
  r[y] = x;
  update(x);
  update(y);
  x = y;
}
inline void zag(int &x) {
  int y = r[x];
  r[x] = l[y];
  l[y] = x;
  update(x);
  update(y);
  x = y;
}
inline void balance(int &x) {
  if (h[l[x]] > h[r[x]] + 1) {
    if (h[l[l[x]]] < h[l[r[x]]]) zag(l[x]);
    zig(x);
    t = true;
  }
  if (h[r[x]] > h[l[x]] + 1) {
    if (h[r[r[x]]] < h[r[l[x]]]) zig(r[x]);
    zag(x);
    t = true;
  }
}
inline void ins(int &x, long long v) {
  if (!x) {
    dat[x = ++tot] = v;
    l[x] = r[x] = 0;
  } else
    ins(v < dat[x] ? l[x] : r[x], v);
  if (!t) balance(x);
  update(x);
}
inline void del(int &x, long long v) {
  if ((!l[x]) && (!r[x])) {
    dat[x] = 0;
    x = 0;
    return;
  }
  if (dat[x] == v) {
    if (h[l[x]] > h[r[x]]) {
      zig(x);
      del(r[x], v);
    } else {
      zag(x);
      del(l[x], v);
    }
  } else
    del(v < dat[x] ? l[x] : r[x], v);
  update(x);
}
int main() {
  scanf("%d\n", &n);
  memset(l, 0, sizeof(l));
  memset(r, 0, sizeof(r));
  memset(s, 0, sizeof(s));
  memset(h, 0, sizeof(h));
  memset(dat, 0, sizeof(dat));
  memset(sum, 0, sizeof(sum));
  root = 1;
  tot = 0;
  h[0] = -1;
  while (n--) {
    char x[10];
    scanf("%s", &x);
    char y = x[0];
    long long z;
    if (y == 'a') {
      scanf("%I64d", &z);
      t = false;
      ins(root, z);
    } else if (y == 'd') {
      scanf("%I64d", &z);
      del(root, z);
    } else
      printf("%I64d\n", s[root][3]);
  }
  return 0;
}