From 797b62ac176bd838c5eab06798f8b74cc9e73d69 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Wed, 10 Dec 2014 15:28:58 +0100
Subject: [PATCH] Corrects bug #1

---
 src/ezfio.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ezfio.ml b/src/ezfio.ml
index 9e6d901..2c6ea0a 100644
--- a/src/ezfio.ml
+++ b/src/ezfio.ml
@@ -430,7 +430,7 @@ let write_array print_fun group name a =
      (* Write rank *)
      Printf.fprintf out_channel "%3d\n" rank;
      (* Write dimensions *)
-     Array.iter (Printf.fprintf out_channel " %20d") dimensions;
+     Array.iter (Printf.fprintf out_channel "%20d ") dimensions;
      Printf.fprintf out_channel "\n";
      Array.iter (print_fun out_channel) data;
      close_out out_channel ;