Acceleration

This commit is contained in:
Anthony Scemama 2019-02-28 22:52:20 +01:00
parent 61a237c444
commit 622650a280
1 changed files with 1 additions and 1 deletions

View File

@ -170,7 +170,7 @@ let create_matrix_spin f det_space =
) a;
Array.map (fun l ->
List.sort compare l
List.rev l
|> Vector.sparse_of_assoc_list ndet ) result
|> Matrix.sparse_of_vector_array
)