def foo(n):
    if n == - 1  or a[n][ 9  - n] ==  0 :
        return  1 
    h = sum([a[i][ 9  - n] for i in range(n +  1 )])
    w = sum([a[n][j] for j in range( 9  - n,  10 )])
    if h == w:
        if a[n -  1 ][ 10  - n] ==  1 :
            return  1 
        return  0 
    else:
        return foo(n -  1 )


tcs = input()

for tc in range(tcs):
    z = map(int, raw_input().split())
    a = [[ 0 ] *  10  for i in range( 10 )]
    for j in range( 10 ):
        for i in range( 9 ,  9  - z[j], - 1 ):
            a[i][j] =  1 
    if foo( 9 ) ==  0 :
        print 'L'
    else:
        print 'W'

{$APPTYPE CONSOLE}
{$I-,Q-,R-,S-}

label mtk;
var tcs,w,n,n1,n2,i,j,sch: longint;
a: array[ 1 .. 32000 ] of longint;
f: text; c: char;

begin             assign(f,''); reset(f);
readln(f,tcs);
repeat
n:= 0 ;
readln(f,w); for i:= 1  to w do begin read(f,c);
if c='1' then begin a[i]:= 1 ; inc(n); end
else a[i]:= 0 ; end; readln(f);
if n= 1  then begin writeln('yes'); goto mtk; end;
if (n=w)or(n= 0 ) then begin writeln('no'); goto mtk; end;

sch:= 0 ;
i:= 1 ; while a[i]= 0  do inc(i);
while (a[i+ 1 ]= 1 )and(a[i+ 2 ]= 0 ) do
begin
inc(sch); if sch=n- 1  then begin writeln('yes'); goto mtk; end;
a[i]:= 0 ; a[i+ 1 ]:= 0 ; i:=i+ 2 ; a[i]:= 1 ;
end;
n1:= 0 ; while (a[i]= 1 )and(i<=w) do begin inc(n1); inc(i); end;
if i>w then
begin
if n1< 3  then begin writeln('yes'); goto mtk; end
else begin writeln('no'); goto mtk; end;
end;

j:=w; while a[j]= 0  do dec(j);
while (a[j- 1 ]= 1 )and(a[j- 2 ]= 0 ) do
begin
inc(sch); if sch=n- 1  then begin writeln('yes'); goto mtk; end;
a[j]:= 0 ; a[j- 1 ]:= 0 ; j:=j- 2 ; a[j]:= 1 ;
end;
n2:= 0 ; while (a[j]= 1 )and(j>= 1 ) do begin inc(n2); dec(j); end;
if j< 1  then
begin
if n2< 3  then begin writeln('yes'); goto mtk; end
else begin writeln('no'); goto mtk; end;
end;

if j<>i then writeln('no') else
begin
if ((n2 mod  2 = 1 )and(n1 mod  2 = 0 ))or((n1 mod  2 = 1 )and(n2 mod  2 = 0 )) then
writeln('yes') else writeln('no');
end;

mtk:
dec(tcs); until tcs= 0 ;
close(f);
end.