6 lines
200 B
OCaml
6 lines
200 B
OCaml
let nums_from_string s = List.map int_of_string (Str.split (Str.regexp " +") s)
|
|
let distance1 a b = abs (a - b)
|
|
|
|
let strings_from_file fname =
|
|
In_channel.with_open_text fname In_channel.input_lines
|