n,m,x,y = $<.read.split.map(&:to_i)

x -= 1
y -= 1

x = x%(2*m)
y = y%(2*m)

x = x >= m ? m-1-(x-m) : x
y = y >= m ? m-1-(y-m) : y

puts x == y ? "YES" : "NO"