let load path delimiter header filter = let ic = open_in path in let rec aux acc = try let line = input_line ic let rows = [] let line = read_line ic in let columns = String.split_on_char delimiter line in