ll@w,@n,@a[n],@m,@b[m],x=1d4,c[x];rep(j,m)REP(rd_ll())c[m*rd_ll()-m+j]=x;maxflow<ll,ll>g;g.malloc(3x,1);rep(i,n+m)g.addEdge(i<n?x:i,i<n?i:2x,i<n?a[i]:b[i-n]);rep(k,n*m)g.addEdge(k/m,n+k%m,x-c[k]);wt(g.solve(x,2x)<w?"BANSAKUTSUKITA":"SHIROBAKO");