$n=<>;
for$i(1..$n){
	<>=~/(.* .*) (.* .*)/;
	push@$1,$2;
	push@$2,$1;
	push@a,$1,$2;
}

sub f {
	$a="@_";
	@$a=grep{!$$a{$_}}@$a;
	if(@$a==1){
		$z=pop@$a;
		$$a{$z}=$$z{$a}=1;
		f($z);
	}
}

f$_ for@a;
print grep(@$_>2,@a)?NO:YES