let () =
????let int_list = List.map int_of_string (Str.split (Str.regexp " ") (read_line ())) in
????let (a, b, c) = (List.nth int_list 0), (List.nth int_list 1) , (List.nth int_list 2) in
????Printf.printf "%s\n" (if a < b && b < c then "Yes" else "No")