LCPQ/EZFIO
10
0
Fork 0
mirror of https://gitlab.com/scemama/EZFIO.git synced 2024-11-19 04:22:25 +01:00
Code Releases Activity

Fixed ocaml format again

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ezfio.ml
View File

@ -430,7 +430,7 @@ let write_array print_fun group name a =
(* Write rank *) (* Write rank *)
Printf.fprintf out_channel "%3d\n" rank; Printf.fprintf out_channel "%3d\n" rank;
(* Write dimensions *) (* Write dimensions *)
Array.iter (Printf.fprintf out_channel " %16d") dimensions; Array.iter (Printf.fprintf out_channel " %20d") dimensions;
Printf.fprintf out_channel "\n"; Printf.fprintf out_channel "\n";
Array.iter (print_fun out_channel) data; Array.iter (print_fun out_channel) data;
close_out out_channel ; close_out out_channel ;