#include<cstdio>
#include<cstring>
#include<vector>
#include<queue>
#include<algorithm>
#include<cmath>
#include<climits>
#include<string>
#include<set>
#include<map>
#include<iostream>
using namespace std;
#define rep(i,n) for(int i=0;i<((int)(n));i++)
#define reg(i,a,b) for(int i=((int)(a));i<=((int)(b));i++)
#define irep(i,n) for(int i=((int)(n))-1;i>=0;i--)
#define ireg(i,a,b) for(int i=((int)(b));i>=((int)(a));i--)
typedef long long int lli;
typedef pair<int,int> mp;
#define fir first
#define sec second
#define IINF INT_MAX
#define LINF LLONG_MAX
//#define eprintf(...) fprintf(stderr,__VA_ARGS__)
#define eprintf(...) ;
#define pque(type) priority_queue<type,vector<type>,greater<type> >
#define memst(a,b) memset(a,b,sizeof(a))

#include<cassert>

#define MOD (32768)

typedef string::iterator sta;

struct mat{
	vector<vector<int> > v;
	int h,w;
	mat(int ih,int iw){
		h=ih; w=iw;
		rep(y,h){
			v.push_back(vector<int>(w,0));
		}
	}
	mat operator+(mat a) const{
		eout("adding");
		a.eout("adding");
		
		assert(a.h==h);
		assert(a.w==w);
		mat res(h,w);
		rep(y,h){
			rep(x,w){
				res.v[y][x]=(v[y][x]+a.v[y][x])%MOD;
			}
		}
		return res;
	}
	mat operator-(mat a) const{
		return (*this) + a.scalar(-1);
	}
	mat scalar(int p) const{
		p = ((p % MOD) + MOD)%MOD;
		mat res(h,w); 
		rep(i,v.size()){
			rep(j,v[i].size()){
				res.v[i][j]=(v[i][j]*p)%MOD;
			}
		}
		return res;
	}
	bool isoo() const{
		return (h==1 && w==1);
	}
	mat operator*(mat a) const{
		if(a.isoo())return scalar(a.v[0][0]);
		if(isoo())return a.scalar(v[0][0]);
		assert(w==a.h);
		mat res(h,a.w);
		rep(y,h){
			rep(x,a.w){
				res.v[y][x]=0;
				rep(k,w){
					res.v[y][x]=(res.v[y][x] + (v[y][k]*a.v[k][x]))%MOD;
				}
			}
		}
		return res;
	}
	mat trans(){
		mat res(w,h);
		rep(y,h)rep(x,w){
			res.v[x][y]=v[y][x];
		}
		return res;
	}
	mat getpart(mat p1,mat p2){
		assert(p1.h==1);
		assert(p2.h==1);
		p1.eout("getp1");
		p2.eout("getp2");
		eout("fromthis");
		
		mat res(p1.w,p2.w);
		rep(y,res.h){
			rep(x,res.w){
				res.v[y][x]=v[p1.v[0][y]-1][p2.v[0][x]-1];
			}
		}
		return res;	
	}
	mat(){}
	void out() const{
		rep(y,h){
			rep(x,w){
				printf("%d%c",v[y][x],x+1==w?'\n':' ');
			}
		}
	}
	void eout(const char* s) const{
		/*
		printf("return\n");
		out();
		printf("in %s\n",s);*/
	}
};

mat vars[30];

mat expr(sta& s);
mat term(sta& s);
mat fact(sta& s);
int inum(sta& s);
mat prim(sta& s);
mat lefprim(mat no,sta& s);
mat rawseq(sta& s);
mat raw(sta& s);

mat expr(sta& s){
	eprintf("expr %c\n",*s);
	mat res = term(s);
	for(;;){
		if(*s=='+'){
			s++;
			res = (res + term(s));
		}
		else if(*s=='-'){
			s++;
			res = (res - term(s));
		}
		else break;
	}
	res.eout("expr");
	return res;
}

mat term(sta& s){
	eprintf("term %c\n",*s);
	mat res = fact(s);
	for(;;){
		if(*s!='*')break;
		s++;
		res = (res * fact(s));
	}
	res.eout("term");
	return res;
}

mat fact(sta& s){
	eprintf("fact %c\n",*s);
	int p=1;
	for(;;){
		if(*s!='-')break;
		s++;
		p*=-1;
	}
	mat res = prim(s).scalar(p);
	res.eout("fact");
	return res;
}

int inum(sta& s){
	eprintf("inum %c\n",*s);
	int res = *s-'0';
	for(;;){
		s++;
		if(*s<'0' || '9'<*s)break;
		res*=10;
		res=(res+*s-'0')%MOD;
	}
	eprintf("inumres %d %c\n",res,*s);
	return res;
}


mat prim(sta& s){
	eprintf("prim %c\n",*s);
	mat no;
	if(*s=='('){
		s++;
		no = expr(s);
		assert(*s==')');
		s++;
	}
	else if(*s=='['){
		s++;
		no = rawseq(s);
		assert(*s==']');
		s++;
	}
	else if('A'<=*s && *s<='Z'){
		no = vars[*s-'A'];
		s++;
	}
	else{
		no = mat(1,1);
		no.v[0][0] = inum(s);
	}
	
	mat res=lefprim(no,s);
	res.eout("prim");
	return res;
}

mat lefprim(mat no,sta& s){ 
	//left recursion should be eliminated
	for(;;){
		if(*s=='\''){
			s++;
			no = no.trans();
		}
		else if(*s=='('){
			s++;
			mat p1 = expr(s);
			assert(*s==','); s++;
			mat p2 = expr(s);
			assert(*s==')'); s++;
			no = no.getpart(p1,p2);
		}
		else break;
	}
	no.eout("leftprim");
	return no;
}

mat rawseq(sta& s){
	eprintf("rawseq %c\n",*s);
	mat res = raw(s);
	for(;;){
		if(*s!=';')break;
		s++;
		mat b = raw(s);
		assert(res.w==b.w);
		rep(y,b.h)res.v.push_back(b.v[y]);
		res.h+=b.h;
	}
	return res;	
}

mat raw(sta& s){
	eprintf("raw %c\n",*s);
	mat res = expr(s);
	for(;;){
		if(*s!=' ')break;
		s++;
		mat b = expr(s);
		assert(res.h==b.h);
		rep(y,b.h){
			rep(x,b.w){
				res.v[y].push_back(b.v[y][x]);
			}
		}
		res.w+=b.w;
	}
	return res;	
}

/*
1
B=([2]+[1]).

A=[1].
2
A=[1].
B=([2]+[1]).

2
B=[3 -2 1;-9 8 7].
C=([1 2 3;4 5 6]+B)(2,3).
*/

int main(void){
	for(;;){
		int q;
		scanf("%d\n",&q);
		if(q==0)break;
		rep(i,q){
			string ss;
			getline(cin,ss); 
			sta s = ss.begin();
			char v=*s; s++; s++;
			mat m = expr(s);
			assert(*s=='.');
			vars[v-'A'] = m;
			m.out();
		}
		printf("-----\n");
	}
	return 0;
}

Measured memory_bytes: 1640