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