n=gets.to_i;h=gets.split.tally;s=0;p=(0..n).map{s+=(x=h[_1.to_s])?1/x:-n};gets;$<.map{l,r,x,y=_1.split.map &:to_i;puts p[r]>=p[l-1]&&p[y]>=p[x-1]&&(l>y||x>r||p[r<y ?r:y]==p[[l,x].max-1])?'Yes':'No'}