let () =
  let a, b = Scanf.scanf "%s %s " (fun a b -> a, b) in
  Printf.printf "%s %s\n" b a