# Pastebin xZFLFzZm
let () =
   Lwt_main.run begin
      let* failure = Lwt.fail Not_found in
      let* line = Lwt_io.(read_line stdin) in
      let* () = Lwt_io.printf "Hello, world!\n" in
      Lwt_io.(write_line stdout line)
   end