Description
Bob经常与Alice一起玩游戏。今天，他们在一棵树上玩游戏。Alice有M1块石子，Bob有M2块石子，游戏一开始，所有石头放在树的节点处，除了树根。Alice先移然后两人轮流移动，每次移动只能选择自己的一个石子，而且只能从当前位置移到父亲节点处，游戏过程中允许一个节点处放多个石子。
谁先把自己所有的石子移到树根处谁就失败了，假设两人都是非常聪明，游戏过程中都使用最优策略，给定石子起始位置，要你计算出谁是赢家。
Input
输入包含多组测试数据。
第一行输入T(T<=10)表示测试数据组数。
接下来每组测试数据第一行输入3个整数N(1<=N<=10000)，M1(1<=M1<=10000)，M2(1<=M2<=10000)，其中N表示树的节点数。
接下来N-1行描述树，每行包含两个整数A和B(0<=A,B<=N-1)表示树中有一条边连接A,B两点，注意0是树根。
接下来一行M1个数，表示Alice的M1个石子的位置。
接下来一行M2个数，表示Bob的M2个石子的位置。
Output
对于每组测试数据，输出赢家的名字。
Sample Input
2
3 1 1
0 1
2 0
1
2
3 2 1
0 1
1 2
2 2
2
Sample Output
Bob
Alice
Hint
【数据说明】
30%的数据满足1<=N<=10,1<=M1,M2<=3
.
.
.
.
.
.
.
分析
看上去像是博弈的题，其实操作次数是一个定值，一定等于每个石子到树根距离之和
因此只需求出A的总距离和，B的总距离和，并把它们比较
如果A>B，则A赢；如果A<=B，则B赢。
.
.
.
.
.
.
程序：
uses math;
var
f:array[0..100001]of longint;
b:array[0..100000]of longint;
a:array[0..10000,0..1000]of boolean;
k,x,y,i,n,m1,m2,t,w,ans,j,z:longint;
begin
readln(z);
for i:=1 to z do
begin
readln(n,m1,m2);
fillchar(a,sizeof(a),false);
for j:=1 to n-1 do
begin
readln(x,y);
a[y,x]:=true;
a[x,y]:=true;
end;
t:=1;
w:=1;
fillchar(f,sizeof(f),127);
f[0]:=0;
b[1]:=0;
while t<=w do
begin
for k:=0 to n do
if (a[b[t],k]=true)and(f[k]=f[10001]) then
begin
inc(w);
b[w]:=k;
f[k]:=min(f[k],f[b[t]]+1);
end;
inc(t);
end;
ans:=0;
for k:=1 to m1 do
begin
read(x);
ans:=ans+f[x];
end;
readln;
for k:=1 to m2 do
begin
read(x);
ans:=ans-f[x];
end;
readln;
if ans>0 then writeln('Alice') else writeln('Bob');
end;
end.