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