Problem:
Score : 800 points

Problem Statement

There is a tree with N vertices numbered 1 through N.
The i-th edge connects Vertex x_i and y_i.
Each vertex is painted white or black.
The initial color of Vertex i is represented by a letter c_i.
c_i = W represents the vertex is white; c_i = B represents the vertex is black.

A cat will walk along this tree.
More specifically, she performs one of the following in one second repeatedly:

Choose a vertex that is adjacent to the vertex where she is currently, and move to that vertex. Then, invert the color of the destination vertex.

Invert the color of the vertex where she is currently.

The cat's objective is to paint all the vertices black. She may start and end performing actions at any vertex.
At least how many seconds does it takes for the cat to achieve her objective?

Constraints

1 ≤ N ≤ 10^5

1 ≤ x_i,y_i ≤ N (1 ≤ i ≤ N-1)

The given graph is a tree.

c_i = W or c_i = B.

Input

Input is given from Standard Input in the following format:

N
x_1 y_1
x_2 y_2
:
x_{N-1} y_{N-1}
c_1c_2..c_N

Output

Print the minimum number of seconds required to achieve the objective.

Sample Input 1

5
1 2
2 3
2 4
4 5
WBBWW

Sample Output 1

5

The objective can be achieved in five seconds, for example, as follows:

Start at Vertex 1. Change the color of Vertex 1 to black.

Move to Vertex 2, then change the color of Vertex 2 to white.

Change the color of Vertex 2 to black.

Move to Vertex 4, then change the color of Vertex 4 to black.

Move to Vertex 5, then change the color of Vertex 5 to black.

Sample Input 2

6
3 1
4 5
2 6
6 1
3 4
WWBWBB

Sample Output 2

7

Sample Input 3

1
B

Sample Output 3

0

Sample Input 4

20
2 19
5 13
6 4
15 6
12 19
13 19
3 11
8 3
3 20
16 13
7 14
3 17
7 8
10 20
11 9
8 18
8 2
10 1
6 13
WBWBWBBWWWBBWWBBBBBW

Sample Output 4

21

Solution in Rust (1.15.1) (judge verdict: Accepted)

// https://atcoder.jp/contests/arc097/tasks/arc097_d
//
#![allow(unused_imports)]
use std::io::*;
use std::fmt::*;
use std::str::*;
use std::cmp::*;
use std::collections::*;

macro_rules! input {
    (source = $s:expr, $($r:tt)*) => {
        let mut iter = $s.split_whitespace();
        input_inner!{iter, $($r)*}
    };
    ($($r:tt)*) => {
        let s = {
            use std::io::Read;
            let mut s = String::new();
            std::io::stdin().read_to_string(&mut s).unwrap();
            s
        };
        let mut iter = s.split_whitespace();
        input_inner!{iter, $($r)*}
    };
}

macro_rules! input_inner {
    ($iter:expr) => {};
    ($iter:expr, ) => {};

    ($iter:expr, $var:ident : $t:tt $($r:tt)*) => {
        let $var = read_value!($iter, $t);
        input_inner!{$iter $($r)*}
    };
}

macro_rules! read_value {
    ($iter:expr, ( $($t:tt),* )) => {
        ( $(read_value!($iter, $t)),* )
    };

    ($iter:expr, [ $t:tt ; $len:expr ]) => {
        (0..$len).map(|_| read_value!($iter, $t)).collect::<Vec<_>>()
    };

    ($iter:expr, [ next / $t:tt ]) => {
        {
            let len = read_value!($iter, usize);
            (0..len).map(|_| read_value!($iter, $t)).collect::<Vec<_>>()
        }
    };

    ($iter:expr, chars) => {
        read_value!($iter, String).chars().collect::<Vec<char>>()
    };

    ($iter:expr, usize1) => {
        read_value!($iter, usize) - 1
    };

    ($iter:expr, $t:ty) => {
        $iter.next().unwrap().parse::<$t>().expect("Parse error")
    };
}

#[allow(unused_macros)]
macro_rules! dvec {
    ($t:expr ; $len:expr) => {
        vec![$t; $len]
    };

    ($t:expr ; $len:expr, $($rest:expr),*) => {
        vec![dvec!($t; $($rest),*); $len]
    };
}

#[allow(unused_macros)]
macro_rules! ifv {
    ($t:expr, $a:expr, $b: expr) => {
        if $t { $a } else { $b }
    }
}

#[allow(unused_macros)]
macro_rules! fill {
    ($t:expr, $v:expr) => {
        for i in 0..$t.len() {
            $t[i] = $v;
        }
    };
}

#[allow(unused_macros)]
macro_rules! debug {
    ($($a:expr),*) => {
        println!(concat!($(stringify!($a), " = {:?}, "),*), $($a),*);
    }
}

fn diameter(root: usize, graph: &Vec<Vec<usize>>, available: &Vec<bool>, white: &Vec<bool>) -> usize {
    let (tidx, _) = dfs(root, None, graph, available, white);
    let (_, ret) = dfs(tidx, None, graph, available, white);
    ret
}

fn dfs(now: usize, par: Option<usize>, graph: &Vec<Vec<usize>>, available: &Vec<bool>, white: &Vec<bool>) -> (usize, usize) {
    let mut best = (0, 0);
    if white[now] {
        best = (now, 1);
    }

    for &to in &graph[now] {
        if Some(to) == par || !available[to] {
            continue;
        }
        let (res, num) = dfs(to, Some(now), graph, available, white);
        let tnum = num + if white[now] { 1 } else { 0 };
        if best.1 < tnum {
            best = (res, tnum);
        }
    }
    best
}

fn main() {
    input! {
        n: usize,
        edges: [(usize1, usize1); n-1],
        colors: chars
    };
    if n == 1 {
        println!("{}", ifv!(colors[0] == 'B', 0, 1));
        return;
    }

    let mut graph = vec![vec![]; n];
    let mut deg = vec![0; n];
    for (u, v) in edges {
        graph[u].push(v);
        graph[v].push(u);
        deg[u] += 1;
        deg[v] += 1;
    }

    let mut que = VecDeque::new();
    let mut available = vec![true; n];
    for i in 0..n {
        if colors[i] == 'B' && graph[i].len() == 1 {
            available[i] = false;
            que.push_back(i);
        }
    }
    while let Some(v) = que.pop_front() {
        for &to in &graph[v] {
            if available[to] {
                deg[to] -= 1;
                if deg[to] == 1 && colors[to] == 'B' {
                    available[to] = false;
                    que.push_back(to);
                }
            }
        }
    }
    let mut ac = 0;
    for i in 0..n {
        if available[i] {
            ac += 1;
        }
    }
    if ac <= 1 {
        println!("{}", if ac == 0 { 0 } else { 1 });
        return;
    }

    let mut cost = 2*(ac-1);
    let mut root = 0;
    let mut is_white = vec![false; n];
    for i in 0..n {
        if available[i] {
            is_white[i] = (deg[i] % 2 == 0) ^ (colors[i] == 'B');
            if is_white[i] {
                cost += 1;
            }
            root = i;
        }
    }
    // debug!(available, is_white, root);
    // debug!(cost);
    // debug!(diameter(root, &graph, &available, &is_white));

    println!("{}", cost - diameter(root, &graph, &available, &is_white) * 2);
}