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<iostream>
#include<iomanip>
#include<math.h>
#include<algorithm>
#include<string>
#include<vector>
#include<queue>
#include<stack>
#include<set>
#include<map>
#define REP(i, N) for(ll i = 0; i < N; ++i)
#define FOR(i, a, b) for(ll i = a; i < b; ++i)
#define ALL(a) (a).begin(),(a).end()
#define pb push_back
#define INF (long long)1000000000
#define MOD 1000000007
using namespace std;
typedef long long ll;
typedef pair<ll, ll> P;
int dh[4] = {1, 0, -1, 0};
int dw[4] = {0, 1, 0, -1};

string s;
ll roc = 0;
map<char, ll> m1;
map<pair<char, ll>, ll> m2;

ll exp();
bool decass();

ll exp() {
	if(s[roc] >= '0' && s[roc] <= '9') {
		ll roc_buf = roc;
		while(s[roc] >= '0' && s[roc] <= '9') ++roc;
		ll num = stoi(s.substr(roc_buf, roc - roc_buf));
		return num;
	} else {
		char name = s[roc];
		ll size = m1[name];
		++roc;
		++roc;
		ll num = exp();
		++roc;
		if(num == INF * INF) return INF * INF;
		if(num >= size || size < 0) return INF * INF;
		if(m2.count(pair<char, ll>(name, num)) == 0) return INF * INF;
		else return m2[pair<char, ll>(name, num)];
	}
}

bool decass() {
	if(m1.count(s[roc]) == 0) {
		char name = s[roc];
		++roc;
		++roc;
		ll roc_buf = roc;
		while(s[roc] >= '0' && s[roc] <= '9') ++roc;
		ll num = stoi(s.substr(roc_buf, roc - roc_buf));
		m1[name] = num;
		return true;
	} else {
		char name = s[roc];
		ll size = m1[name];
		++roc;
		++roc;
		ll index = exp();
		if(index == INF * INF) return false;
		if(index >= size || index < 0) return false;
		++roc;
		++roc;
		ll num = exp();
		if(num == INF * INF) return false;
		m2[pair<char, ll>(name, index)] = num;
		return true;
	}
}

int main(void) {
	while(true) {
		ll cnt = 0;
		ll res = 0;
		m1.erase(ALL(m1));
		m2.erase(ALL(m2));
		while(true) {
			cin>>s;
			roc = 0;
			if(s == ".") break;
			if(res == 0 && !decass()) res = cnt + 1;
			++cnt;
		}
		if(cnt == 0) break;
		cout<<res<<endl;
	}
}