const mod=1000000007;

typedef struct{
	long long a,b,c;
	char o;
}abc;
abc C[1<<18];

idx[1<<17];
CN;
N,Q,X,Y;
char T;

abc op(char o,abc A,abc B){
	abc R;
	if(o){
		if(A.b>=0){
			if(B.b>=0){
				R.a=A.a;
				R.b=(A.b+A.c*B.a+B.b)%mod;
				R.c=B.c;
			}else{
				R.a=A.a;
				R.b=A.b;
				R.c=A.c*-B.b%mod;
			}
		}else{
			if(B.b>=0){
				R.a=-A.b*B.a%mod;
				R.b=B.b;
				R.c=B.c;
			}else{
				R.b=-(-A.b*-B.b%mod);
			}
		}
	}else{
		if(A.b>=0){
			if(B.b>=0){
				R.a=A.a;
				R.b=(A.b+A.c+B.a+B.b)%mod;
				R.c=B.c;
			}else{
				R.a=A.a;
				R.b=(A.b+A.c)%mod;
				R.c=-B.b;
			}
		}else{
			if(B.b>=0){
				R.a=-A.b;
				R.b=(B.a+B.b)%mod;
				R.c=B.c;
			}else{
				R.a=-A.b;
				R.b=0;
				R.c=-B.b;
			}
		}
	}
	R.o=o;
	return R;
}

d(i){
	if(i<65536){
		d(i*2);
		if(CN<N){
			scanf("%c%*c",&C[i].o);
			C[i].o^='+';
			idx[++CN]=i;
			d(i*2+1);
		}
		C[i]=op(C[i].o,C[i*2],C[i*2+1]);
	}else{
		scanf("%lld%*c",&C[i].b);
		C[i].b*=-1;
		idx[++CN]=i;
	}
}

r(i){
	C[i]=op(C[i].o,C[i*2],C[i*2+1]);
	if(i>1)r(i/2);
}

main(){
	scanf("%d%*c",&N);
	d(1);
	scanf("%d%*c",&Q);
	for(;Q--;){
		scanf("%c%d%d%*c",&T,&X,&Y);
		int x=idx[X],y=idx[Y];
		if(T=='!'){
			abc t=C[x];C[x]=C[y];C[y]=t;
			r(x>>X%2);
			r(y>>Y%2);
		}else{
			abc t=C[x],u=C[y];
			for(;x/2<y/2;x/=2,y/=2){
				if(x%2==0)t=op(C[x/2].o,t,C[x+1]);
				if(y%2==1)u=op(C[y/2].o,C[y-1],u);
			}
			t=op(C[x/2].o,t,u);
			printf("%lld\n",(t.b<0?-t.b:t.a+t.b+t.c)%mod);
		}
	}
}