Guest User

Untitled

a guest
Aug 11th, 2019
92
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. open Core
  2.  
  3. let () =
  4.   let lines = In_channel.input_lines In_channel.stdin in
  5.   let hd = List.hd_exn lines in
  6.   let tl = List.tl_exn lines in
  7.   Out_channel.print_endline hd;
  8.   Out_channel.print_endline (String.concat tl)
RAW Paste Data