import Debug.Trace

main = interact $ \x -> if f x then "Yes" else "No"

--main = interact f 

f :: String -> Bool
f x = and [x!!2 == x!!3 ,x!!4 == x!!5]
--f x = x!!3 == "f"
-- == x!!4
--f x = x!!5 == x!!6]
