Problem: In this problem, we consider a simple programming language that has only declarations of one- dimensional integer arrays and assignment statements. The problem is to find a bug in the given program.

The syntax of this language is given in BNF as follows:

<image>

where <new line> denotes a new line character (LF).

Characters used in a program are alphabetical letters, decimal digits, =, [, ] and new line characters. No other characters appear in a program.

A declaration declares an array and specifies its length. Valid indices of an array of length n are integers between 0 and n - 1, inclusive. Note that the array names are case sensitive, i.e. array a and array A are different arrays. The initial value of each element in the declared array is undefined.

For example, array a of length 10 and array b of length 5 are declared respectively as follows.


a[10]
b[5]


An expression evaluates to a non-negative integer. A <number> is interpreted as a decimal integer. An <array_name> [<expression>] evaluates to the value of the <expression> -th element of the array. An assignment assigns the value denoted by the right hand side to the array element specified by the left hand side.

Examples of assignments are as follows.


a[0]=3
a[1]=0
a[2]=a[a[1]]
a[a[0]]=a[1]


A program is executed from the first line, line by line. You can assume that an array is declared once and only once before any of its element is assigned or referred to.

Given a program, you are requested to find the following bugs.

* An index of an array is invalid.
* An array element that has not been assigned before is referred to in an assignment as an index of array or as the value to be assigned.



You can assume that other bugs, such as syntax errors, do not appear. You can also assume that integers represented by <number>s are between 0 and 231 - 1 (= 2147483647), inclusive.



Input

The input consists of multiple datasets followed by a line which contains only a single '.' (period). Each dataset consists of a program also followed by a line which contains only a single '.' (period). A program does not exceed 1000 lines. Any line does not exceed 80 characters excluding a new line character.

Output

For each program in the input, you should answer the line number of the assignment in which the first bug appears. The line numbers start with 1 for each program. If the program does not have a bug, you should answer zero. The output should not contain extra characters such as spaces.

Example

Input

a[3]
a[0]=a[1]
.
x[1]
x[0]=x[0]
.
a[0]
a[0]=1
.
b[2]
b[0]=2
b[1]=b[b[0]]
b[0]=b[1]
.
g[2]
G[10]
g[0]=0
g[1]=G[0]
.
a[2147483647]
a[0]=1
B[2]
B[a[0]]=2
a[B[a[0]]]=3
a[2147483646]=a[2]
.
.


Output

2
2
2
3
4
0

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
using ll = long long;
#define rep(i, j) for(int i=0; i < (int)(j); i++)
template<class T> istream& operator >> (istream &is , vector<T> &v) { for(T &a : v) is >> a; return is; }

class Solver {
  public:
    vector<string> S;
    map<char, map<ll, ll>> val;
    map<char, ll> len;
    bool out_of_range(char name, ll index) {
        return index >= len.at(name);
    }
    bool undefined(char name, ll index) {
        return not val[name].count(index);
    }
    ll get_number(int &i, string &s) {
        assert(isdigit(s[i]));
        ll res = 0;
        while(isdigit(s[i])) {
            res *= 10;
            res += (s[i++] - '0');
        }
        return res;
    }
    char get_name(int &i, string &s) {
        char name = s[i++];
        assert(('a' <= name and name <= 'z') or ('A' <= name and name <= 'Z'));
        return name;
    }
    tuple<ll, bool> get_expression(int &i, string &s) {
        auto fail = make_tuple(0, false);
        auto success = [](ll v) { return make_tuple(v, true); };
        bool ok;
        
        if(isdigit(s[i])) return success(get_number(i, s));
        char name = get_name(i, s);
        ll index; tie(index, ok) = get_bexpression(i, s);
        if(not ok) return fail;
        if(out_of_range(name, index) or undefined(name, index)) return fail;
        
        return success(val.at(name).at(index));
    }
    tuple<ll, bool> get_bexpression(int &i, string &s) {
        assert(s[i++] == '[');
        auto ret = get_expression(i, s);
        assert(s[i++] == ']');
        return ret;
    }
    
    void declaration(int &i, string &s) {
        char name = get_name(i, s);        
        assert(s[i++] == '[');
        ll num = get_number(i, s);
        assert(s[i++] == ']');
        assert(not len.count(name)); // only once
        len[name] = num;
    }

    bool assignment(int &i, string &s) {
        bool ok;
        
        char name = get_name(i, s);
        ll index; tie(index, ok) = get_bexpression(i, s);
        if(not ok) return false;        
        assert(s[i++] == '=');        
        ll right; tie(right, ok) = get_expression(i, s);
        if(not ok) return false;        

        // check
        if(out_of_range(name, index)) return false;
        val[name][index] = right;
        return true;
    }
    
    bool solve() {
        while(true) {
            string s; cin >> s;
            if(s == ".") break;
            S.push_back(s);
        }
        
        if(S.size() == 0) return false;
        rep(i, S.size()) {
            int pos = 0;
            if(S[i].find("=") == string::npos) declaration(pos, S[i]);
            else {
                bool ok = assignment(pos, S[i]);
                if(not ok) {
                    cout << i + 1 << endl;
                    return true;
                }
            }
            assert(pos == S[i].size());
        }
        cout << 0 << endl;
        return true;
    }
};

int main() {
    cin.tie(0);
    ios::sync_with_stdio(false);
    while(Solver().solve());
    return 0;
}