let from_file file_name = let channel = open_in file_name in let result = Marshal.from_channel channel in close_in channel; result