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