Problem: Unary is a minimalistic Brainfuck dialect in which programs are written using only one token. 

Brainfuck programs use 8 commands: "+", "-", "[", "]", "<", ">", "." and "," (their meaning is not important for the purposes of this problem). Unary programs are created from Brainfuck programs using the following algorithm. First, replace each command with a corresponding binary code, using the following conversion table: 

  * ">"  →  1000, 
  * "<"  →  1001, 
  * "+"  →  1010, 
  * "-"  →  1011, 
  * "."  →  1100, 
  * ","  →  1101, 
  * "["  →  1110, 
  * "]"  →  1111. 



Next, concatenate the resulting binary codes into one binary number in the same order as in the program. Finally, write this number using unary numeral system — this is the Unary program equivalent to the original Brainfuck one.

You are given a Brainfuck program. Your task is to calculate the size of the equivalent Unary program, and print it modulo 1000003 (106 + 3).

Input

The input will consist of a single line p which gives a Brainfuck program. String p will contain between 1 and 100 characters, inclusive. Each character of p will be "+", "-", "[", "]", "<", ">", "." or ",".

Output

Output the size of the equivalent Unary program modulo 1000003 (106 + 3).

Examples

Input

,.


Output

220


Input

++++[&gt;,.&lt;-]


Output

61425

Note

To write a number n in unary numeral system, one simply has to write 1 n times. For example, 5 written in unary system will be 11111.

In the first example replacing Brainfuck commands with binary code will give us 1101 1100. After we concatenate the codes, we'll get 11011100 in binary system, or 220 in decimal. That's exactly the number of tokens in the equivalent Unary program.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
long long fact[10000001] = {0};
long long gcd(long long a, long long b) {
  if (b == 0) return a;
  return gcd(b, a % b);
}
void Find_Factorial(long long max) {
  fact[0] = 1;
  for (long long i = 1; i <= max; i++) fact[i] = (fact[i - 1] * i) % 1000000007;
}
long long binpow(long long a, long long b) {
  long long res = 1;
  while (b > 0) {
    if (b & 1) res = (res * a) % 1000000007;
    b = b >> 1;
    a = (a * a) % 1000000007;
  }
  return res;
}
long long nCr(long long n, long long r) {
  if (r < 0 || r > n) return 0;
  long long val = fact[n];
  val *= (binpow(fact[r], 1000000007 - 2) % 1000000007);
  val %= 1000000007;
  val *= (binpow(fact[n - r], 1000000007 - 2) % 1000000007);
  val %= 1000000007;
  return val;
}
void test_case() {
  string s;
  cin >> s;
  long long M = 1000003;
  unordered_map<char, string> make_pair;
  make_pair['>'] = "1000";
  make_pair['<'] = "1001";
  make_pair['+'] = "1010";
  make_pair['-'] = "1011";
  make_pair['.'] = "1100";
  make_pair[','] = "1101";
  make_pair['['] = "1110";
  make_pair[']'] = "1111";
  long long mul = 1;
  long long n = s.length();
  long long ans = 0;
  for (long long i = n - 1; i >= 0; i--) {
    string temp = make_pair[s[i]];
    for (long long j = 3; j >= 0; j--) {
      ans += ((temp[j] - '0') * mul) % M;
      ans %= M;
      mul *= 2 % M;
      mul %= M;
    }
  }
  cout << ans << endl;
  return;
}
signed main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  cout.tie(NULL);
  long long t;
  t = 1;
  while (t--) test_case();
  return 0;
}