@ -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
)