Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- open Core
- let () =
- let lines = In_channel.input_lines In_channel.stdin in
- let hd = List.hd_exn lines in
- let tl = List.tl_exn lines in
- Out_channel.print_endline hd;
- Out_channel.print_endline (String.concat tl)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement