LCPQ/qmcchem
10
1
Fork 1
mirror of https://gitlab.com/scemama/qmcchem.git synced 2024-06-01 19:05:17 +02:00
Code Releases Activity

Removed merging on same compute node

Browse Source
This commit is contained in:
Anthony Scemama 2020-06-01 23:59:27 +02:00
parent b389056421
commit 89bd9d9c7f
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ocaml/Qmcchem_dataserver.ml
View File

@ -65,7 +65,7 @@ let run ?(daemon=true) ezfio_filename =
(** Maximum size of the blocks file before compressing *) (** Maximum size of the blocks file before compressing *)
let max_file_size = ref ( 64/64 * 1024 ) let max_file_size = ref (1024 * 1024)
in in

2
ocaml/Random_variable.ml
View File

@ -727,7 +727,9 @@ let compress_files () =
|> max_value_per_compute_node |> max_value_per_compute_node
| _ -> | _ ->
of_raw_data ~locked:false ~range:(0.,100.) p of_raw_data ~locked:false ~range:(0.,100.) p
(*
|> merge_per_compute_node_and_block_id |> merge_per_compute_node_and_block_id
*)
in in
List.iter (fun x -> List.iter (fun x ->
output_string block_channel (Block.to_string x); output_string block_channel (Block.to_string x);