$N=<>; map{push@$_,$_[--$|]for@_=glob}<>; for$i(@1){ $V[$_]=$V[$_]?-1:$i for@$i } $V[1]=0; for$i(1..$N){ map{ $z|=$V[$i]&&$V[$_]&&$V[$i]!=$_&&$V[$_]!=$i&&($V[$i]<0||$V[$_]<0||$V[$i]!=$V[$_]) }@$i } print$z?YES:NO