#include<bits/stdc++.h>
using namespace std;
typedef long long ll;
typedef vector<ll> poly;
const int N=5.2e5+10,mod=998244353,inv3=(mod+1)/3;
inline int Mod(int a){return a<mod?a:a-mod;}
int l;
ll fastpow(ll a,int b)
{
	ll s=1;
	for(;b;b>>=1,a=a*a%mod)
		if(b&1) s=s*a%mod;
	return s;
}
void dif(int *a)
{
	ll x,y,wn;
	for(int i=l>>1;i;i>>=1)
	{
		wn=fastpow(3,(mod-1)/i/2);
		for(int j=0;j<l;j+=(i<<1))
			for(int k=0,w=1;k<i;k++,w=w*wn%mod)
			{
				x=a[j+k],y=a[i+j+k];
				a[j+k]=Mod(x+y);
				a[i+j+k]=(x-y+mod)*w%mod;
			}
	}
}
void dit(int *a)
{
	ll x,y,wn;
	for(int i=1;i<l;i<<=1)
	{
		wn=fastpow(inv3,(mod-1)/i/2);
		for(int j=0;j<l;j+=(i<<1))
			for(int k=0,w=1;k<i;k++,w=w*wn%mod)
			{
				x=a[j+k],y=1ll*a[i+j+k]*w%mod;
				a[j+k]=Mod(x+y),a[i+j+k]=Mod(x-y+mod);
			}
	}
	x=fastpow(l,mod-2);
	for(int i=0;i<l;i++) a[i]=a[i]*x%mod;
}
poly mul(poly a,poly b)
{
	int n=a.size()-1,m=b.size()-1;
	poly c(n+m+1);
	static int A[N],B[N];
	for(l=1;l<=n+m;l<<=1);
	for(int i=0;i<l;i++) A[i]=B[i]=0;
	for(int i=0;i<=n;i++) A[i]=a[i];
	for(int i=0;i<=m;i++) B[i]=b[i];
	dif(A),dif(B);
	for(int i=0;i<l;i++) A[i]=1ll*A[i]*B[i]%mod;
	dit(A);
	for(int i=0;i<=n+m;i++) c[i]=(c[i]+A[i])%mod;
	return c;
}
struct edge{
	int next,to,p;
}e[N<<1];
int first[N],len,n,fa[N];
ll f[N],g[N];
void pls(ll &a,ll b){a=(a+b)%mod;}
void add(int a,int b,int c)
{
	e[++len]=edge{first[a],b,c};
	first[a]=len;
}
char str[N];
poly solve(vector<int> v)
{
	if(v.empty()) return poly{1};
	if((int)v.size()==1) return poly{f[v[0]],g[v[0]]};
	vector<int> t[2];
	for(int i=0;i<(int)v.size();i++) t[i&1].push_back(v[i]);
	return mul(solve(t[0]),solve(t[1]));
}
void dfs(int x,int p)
{
	vector<int> v[2];
	for(int i=first[x],y;i;i=e[i].next)
		if((y=e[i].to)!=fa[x])
		{
			fa[y]=x,dfs(y,e[i].p);
			v[e[i].p].push_back(y);
		}
	poly a=solve(v[0]),b=solve(v[1]);
	int A=a.size(),B=b.size();
	f[x]=g[x]=0;
	for(int i=0;i<A&&i<B;i++) pls(f[x],a[i]*b[i]);
	if(p)
	{
		for(int i=0;i<A&&i+1<B;i++) pls(g[x],a[i]*b[i+1]);
		if(str[x]=='F') pls(g[x],f[x]);
		else for(int i=0;i<A&&i+2<B;i++) pls(g[x],a[i]*b[i+2]);
	}
	else
	{
		for(int i=0;i+1<A&&i<B;i++) pls(g[x],a[i+1]*b[i]);
		if(str[x]=='S') pls(g[x],f[x]);
		else for(int i=0;i+2<A&&i<B;i++) pls(g[x],a[i+2]*b[i]);
	}
	if(str[x]=='F')
	{
		for(int i=0;i+1<A&&i<B;i++) pls(f[x],a[i+1]*b[i]);
	}
	else
	{
		for(int i=0;i<A&&i+1<B;i++) pls(f[x],a[i]*b[i+1]);
	}
}
int main()
{
	scanf("%d",&n);
	scanf("%s",str+1);
	for(int i=1,x,y;i<n;i++)
		scanf("%d%d",&x,&y),add(x,y,1),add(y,x,0);
	dfs(1,0);
	printf("%lld\n",f[1]);
}