BZOJ 1022

program bzoj1022;

var    t,n,i,ans,k,j,k1,k2:longint;

    bo:boolean;

begin

    read(t);

    for k:=1 to t do begin

        read(n);

        ans:=0; k2:=0;

        for i:=1 to n do begin

            read(k1);

            if k1>1 then inc(k2);

            ans:=ans xor k1;

        end;

        if ((ans=0) and (k2>0)) or ((ans<>0) and (k2=0)) then writeln('Brother') else writeln('John');

    end;

end.