draft to read csv

lib/csv.ml

@@ -0,0 +1,11 @@
+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
+  
+  

lib/files.ml

@@ -1 +0,0 @@
-let load_csv file_path =