有这么一种说法：认识6个人，你就认识全世界的人。

Aiden现在有一张关系图，上面记载了N个人之间相互认识的情况。Aiden想知道，他能否只认识6个人就能间接认识这N个人呢？

第一行，两个数N，M，表示有N个人，M对认识关系。

接下来的M行，每行两个数ai，bi，表示ai与bi相互认识。

不保证认识关系不出现重复，保证ai≠bi。

N个人的编号为1...N。

若只认识6个人就能间接认识这N个人，则输出“^_^”。

若不行，则第一行输出“T_T”，第二行输出认识6个人最多能间接认识的人的个数。

输出不包括引号。

6 7

1 2

1 3

2 4

3 5

4 6

5 6

3 2

^_^

对于30%的数据，保证0＜n≤1000。

对于50%的数据，保证0＜n≤5000。

对于100%的数据，保证0＜n≤10000，m≤10*n。

type r=record       num,v:longint;       end;var i,j,k,l:longint;    father:array[1..10000]of longint;    n,m:longint;    x,y:longint;    cost:array[1..10000]of r;    num:array[1..10000]of integer;    used:array[1..10000]of boolean;function find(x:longint):longint;         begin if father[x]=x                  then exit(x);               father[x]:=find(father[x]);               exit(father[x]);         end;procedure union(x,y:longint);          begin father[find(x)]:=find(father[y]);          end;procedure choose;          var i,j,k:longint;              max,maxx:longint;          begin for i:=1 to 6 do                    begin max:=0;                          for j:=1 to n do                              if (cost[j].num>max)and(not used[j])                                 then begin max:=cost[j].num;                                            maxx:=j;                                      end;                          used[maxx]:=true;                          l:=l+max;                    end;          end;begin readln(n,m);      fillchar(father,sizeof(father),0);      for i:=1 to n do          father[i]:=i;      for i:=1 to m do          begin readln(x,y);                if find(x)<>find(y)                   then union(x,y);          end;      fillchar(cost,sizeof(cost),0);      fillchar(num,sizeof(num),0);      fillchar(used,sizeof(used),false);      for i:=1 to n do          inc(num[find(i)]);      k:=0;      for i:=1 to n do          if num[i]<>0             then begin inc(k);                        cost[k].v:=i;                        cost[k].num:=num[i];                  end;      l:=0;      if k<=6         then begin writeln(‘^_^‘);                    halt;              end         else begin choose;                    writeln(‘T_T‘);                    writeln(l);              end;end.