Problem: There is a programming language in which every program is a non-empty sequence of "<" and ">" signs and digits. Let's explain how the interpreter of this programming language works. A program is interpreted using movement of instruction pointer (IP) which consists of two parts.

  * Current character pointer (CP); 
  * Direction pointer (DP) which can point left or right; 



Initially CP points to the leftmost character of the sequence and DP points to the right.

We repeat the following steps until the first moment that CP points to somewhere outside the sequence.

  * If CP is pointing to a digit the interpreter prints that digit then CP moves one step according to the direction of DP. After that the value of the printed digit in the sequence decreases by one. If the printed digit was 0 then it cannot be decreased therefore it's erased from the sequence and the length of the sequence decreases by one. 
  * If CP is pointing to "<" or ">" then the direction of DP changes to "left" or "right" correspondingly. Then CP moves one step according to DP. If the new character that CP is pointing to is "<" or ">" then the previous character will be erased from the sequence. 



If at any moment the CP goes outside of the sequence the execution is terminated.

It's obvious the every program in this language terminates after some steps.

We have a sequence s1, s2, ..., sn of "<", ">" and digits. You should answer q queries. Each query gives you l and r and asks how many of each digit will be printed if we run the sequence sl, sl + 1, ..., sr as an independent program in this language.

Input

The first line of input contains two integers n and q (1 ≤ n, q ≤ 105) — represents the length of the sequence s and the number of queries. 

The second line contains s, a sequence of "<", ">" and digits (0..9) written from left to right. Note, that the characters of s are not separated with spaces. 

The next q lines each contains two integers li and ri (1 ≤ li ≤ ri ≤ n) — the i-th query.

Output

For each query print 10 space separated integers: x0, x1, ..., x9 where xi equals the number of times the interpreter prints i while running the corresponding program. Print answers to the queries in the order they are given in input.

Examples

Input

7 4
1&gt;3&gt;22&lt;
1 3
4 7
7 7
1 7


Output

0 1 0 1 0 0 0 0 0 0
2 2 2 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0
2 3 2 1 0 0 0 0 0 0

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
char outp[3000000];
int osize = 0, q, n;
list<pair<int, char> > ls;
pair<int, int> que[300000], ans[300000];
set<pair<int, int> > cl, cr;
vector<int> fb[300000];
bool vis[300000];
int digsum[3000000][10];
bool digit(char c) { return c >= '0' && c <= '9'; }
int main() {
  ios_base::sync_with_stdio(false);
  cin >> n >> q;
  ls.push_front(make_pair(0, '^'));
  memset(ans, 0, sizeof ans);
  for (int i = 0; i < n; i++) {
    char c;
    cin >> c;
    ls.push_back(make_pair(i + 1, c));
  }
  ls.push_back(make_pair(n + 1, 's'));
  for (int j = 0; j < q; j++) {
    int l, r;
    cin >> l >> r;
    que[j] = make_pair(l, r);
    fb[l].push_back(j);
  }
  memset(vis, 0, sizeof vis);
  list<pair<int, char> >::iterator cur = ls.begin();
  int dx = 1;
  while (1) {
    while (!cl.empty() && (*(--cl.end())).first > cur->first) {
      int num = (--cl.end())->second;
      ans[num].second = osize;
      cl.erase(make_pair(que[num].first, num));
      cr.erase(make_pair(que[num].second, num));
    }
    while (!cr.empty() && (*cr.begin()).first < cur->first) {
      int num = cr.begin()->second;
      ans[num].second = osize;
      cl.erase(make_pair(que[num].first, num));
      cr.erase(make_pair(que[num].second, num));
    }
    if (!vis[cur->first])
      for (int i = 0; i < fb[cur->first].size(); i++) {
        cl.insert(make_pair(que[fb[cur->first][i]].first, fb[cur->first][i]));
        cr.insert(make_pair(que[fb[cur->first][i]].second, fb[cur->first][i]));
        ans[fb[cur->first][i]].first = osize;
      }
    if (cur->second == 's') break;
    vis[cur->first] = true;
    if (cur->second == '>') {
      list<pair<int, char> >::iterator nx = cur;
      nx++;
      if (!digit(nx->second)) ls.erase(cur);
      dx = 1;
      cur = nx;
    } else if (cur->second == '<') {
      list<pair<int, char> >::iterator nx = cur;
      nx--;
      if (!digit(nx->second)) ls.erase(cur);
      dx = -1;
      cur = nx;
    } else if (cur->second == '^') {
      dx = 1;
      cur++;
    } else {
      outp[osize++] = cur->second;
      list<pair<int, char> >::iterator buf = cur;
      if (dx == 1)
        cur++;
      else
        cur--;
      if (buf->second == '0')
        ls.erase(buf);
      else
        buf->second--;
    }
  }
  memset(digsum, 0, sizeof digsum);
  for (int i = 0; i < osize; i++) {
    digsum[i][outp[i] - '0']++;
    memcpy(digsum[i + 1], digsum[i], sizeof digsum[i]);
  }
  for (int i = 0; i < q; i++) {
    for (int j = 0; j < 10; j++) {
      if (ans[i].second == 0)
        cout << 0 << " ";
      else if (ans[i].first == 0)
        cout << digsum[ans[i].second - 1][j] << " ";
      else
        cout << digsum[ans[i].second - 1][j] - digsum[ans[i].first - 1][j]
             << " ";
    }
    cout << "\n";
  }
}