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