n,*d=$<.read.split
n.to_i.times{|i|c=0;(c+=1;d[i],i=p,i.to_i-1)while i=d[i];$*[c]^=c&1<1}
puts$*.any?? :No:'Yes'