From 622650a28058aa62d5552fcba4177d88396fe167 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Thu, 28 Feb 2019 22:52:20 +0100
Subject: [PATCH] Acceleration

---
 CI/CI.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/CI/CI.ml b/CI/CI.ml
index e85c133..976d085 100644
--- a/CI/CI.ml
+++ b/CI/CI.ml
@@ -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
   )