map++$a[$_],glob<>;print"@a"=~/^1[ 12]*1$/?YES:NO