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;
template <typename T>
T sq(const T& x) {
  return x * x;
}
const int INF = 2147483647;
struct Node {
  vector<int> a;
  long long s[5];
  Node() { update(); }
  int size() const { return a.size(); }
  void insert(int x) {
    a.insert(upper_bound(a.begin(), a.end(), x), x);
    update();
  }
  void erase(int x) {
    a.erase(lower_bound(a.begin(), a.end(), x));
    update();
  }
  void update() {
    memset(s, 0, sizeof s);
    for (size_t i = 0; i < a.size(); ++i) s[i % 5] += a[i];
  }
};
struct Kiwi {
  list<Node> li;
  int size;
  Kiwi() : size(0) {}
  void insert(int x) {
    ++size;
    auto it = li.begin();
    for (; it != li.end(); ++it) {
      auto nx = it;
      ++nx;
      int right_bound = (nx == li.end()) ? INF : nx->a[0];
      if (x <= right_bound) break;
    }
    if (it == li.end()) it = li.insert(it, Node());
    it->insert(x);
    if (sq(it->size()) >= size * 4) {
      int gap = sqrt(size + 0.5);
      Node node;
      node.a.assign(it->a.begin() + gap, it->a.end());
      node.update();
      it->a.erase(it->a.begin() + gap, it->a.end());
      it->update();
      li.insert(++it, node);
    }
  }
  void erase(int x) {
    --size;
    auto it = li.begin();
    while (x > it->a.back()) ++it;
    it->erase(x);
    if (it->size() == 0) {
      li.erase(it);
    } else if (it != li.begin()) {
      auto pv = it;
      --pv;
      if (sq(pv->size() + it->size()) <= size * 1.4) {
        copy(it->a.begin(), it->a.end(), back_inserter(pv->a));
        pv->update();
        li.erase(it);
      }
    }
  }
  long long sum() const {
    long long ret = 0;
    int p = 2;
    for (auto it = li.begin(); it != li.end(); ++it) {
      ret += it->s[p];
      p = ((p - (int)it->a.size()) % 5 + 5) % 5;
    }
    return ret;
  }
};
void york() {
  int m;
  Kiwi b;
  char s[32];
  scanf("%d", &m);
  while (m--) {
    scanf("%s", s);
    if (s[0] == 's') {
      printf("%I64d\n", b.sum());
    } else if (s[0] == 'a') {
      int t;
      scanf("%d", &t);
      b.insert(t);
    } else {
      int t;
      scanf("%d", &t);
      b.erase(t);
    }
  }
}
int main() {
  york();
  return 0;
}