N,A,B,C,D = gets.split.map(&:to_i)
S = gets.chomp

# 区間x,yにおける連続するsの最大数
# ただし、x,yは自然数
def f(x,y,s)
  S[x-1,y-x+1]
    .chars
    .slice_when{|a,b|a!=b}
    .to_a
    .select{|v|v[0]==s}
    .map(&:size)
    .max || 0
end

def g
  f(B,D,"#") < 2 && f(A,C,"#") < 2
end

def h
  f(B-1,[N, D+1].min,".") > 2
end

if C < D
  puts g ? "Yes" : "No"
else
  puts g && h ? "Yes" : "No"
end
