Fixed ocaml format again

This commit is contained in:
Anthony Scemama 2014-11-14 10:28:28 +01:00
parent 8bd9867178
commit 46adaa470b
1 changed files with 1 additions and 1 deletions

View File

@ -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 " %16d") 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 ;