#include #define _overload(_1,_2,_3,name,...) name #define _rep(i,n) _range(i,0,n) #define _range(i,a,b) for(int i=int(a);i=int(b);--i) #define rrep(...) _overload(__VA_ARGS__,_rrange,_rrep,)(__VA_ARGS__) #define _all(arg) begin(arg),end(arg) #define uniq(arg) sort(_all(arg)),(arg).erase(unique(_all(arg)),end(arg)) #define getidx(ary,key) lower_bound(_all(ary),key)-begin(ary) #define clr(a,b) memset((a),(b),sizeof(a)) #define bit(n) (1LL<<(n)) #define popcount(n) (__builtin_popcountll(n)) using namespace std; templatebool chmax(T &a, const T &b) { return (abool chmin(T &a, const T &b) { return (bEPS=1e-8 [-10000,10000]->EPS=1e-7 inline int sgn(const R& r){return(r > EPS)-(r < -EPS);} inline R sq(R x){return sqrt(max(x,0.0));} const int dx[8]={1,0,-1,0,1,-1,-1,1}; const int dy[8]={0,1,0,-1,1,1,-1,-1}; // Problem Specific Parameter: const int nmax=100010; string s; vector graph[nmax]; ll ans=0LL,tc=0LL,tw=0LL; tuple dfs(int v,int p){ ll cc=0LL,cw=0LL; if(s[v]=='w') ans+=1LL*tc*(tw-1); for(auto &v2:graph[v]){ if(v2==p) continue; ll ac,aw; tie(ac,aw)=dfs(v2,v); if(s[v]=='w') ans-=1LL*ac*aw; cc+=ac,cw+=aw; } if(s[v]=='w' and p!=-1) ans-=1LL*(tc-cc)*(tw-1-cw); if(s[v]=='c') cc++; if(s[v]=='w') cw++; return tie(cc,cw); } int main(void){ int n; cin >> n >> s; rep(i,n) tc+=(s[i]=='c'),tw+=(s[i]=='w'); rep(i,n-1){ int a,b; cin >> a >> b; graph[a-1].push_back(b-1); graph[b-1].push_back(a-1); } dfs(0,-1); cout << ans << endl; return 0; }