diff --git a/src/ezfio.ml b/src/ezfio.ml
index 3a86226..d3f2bce 100644
--- a/src/ezfio.ml
+++ b/src/ezfio.ml
@@ -276,7 +276,10 @@ let ezfio_array_of_list ~rank ~dim ~data =
       (Ezfio_data data,rest) 
   in    
   let (result,_) = read_nd data rank in
-  { rank=rank ; dim=dim ; data=result }
+  { rank= rank;
+    dim=  dim;
+    data=result;
+  }
 ;;