method remove_element file = elements <- List.filter (fun t -> t.Ocvs_types.cvs_file <> file) elements