This is what I have so far. Isn't this all that you need? I keep getting the error "Error: Unbound module Std"
let r file = let chan = open_in file in Std.input_list (chan)