<>;map{$a=$_;@{$a=$0}=grep$_ ne$a,@{$0=pop@$a}until$#$a}@a=map{/ (\S* \S*)$/;push@{$`},$1;push@$1,$`;$`,$1}<>;print grep(@$_>2,@a)?NO:YES