n,*d=$<.read.split.map &:to_i e=0 n.times{|i|c=0;o=i;(c+=1;d[o],o=p,d[o]-1)while d[o];c>0&&c%2<1&&e+=1} $><<[:No,:Yes][e&1]