10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-06-19 11:42:18 +02:00

Bug in bitlist order corrected

This commit is contained in:
Anthony Scemama 2014-10-08 13:00:25 +02:00
parent 655c0ad737
commit 66abccfdfb

View File

@ -92,7 +92,7 @@ let to_int64_list l =
in
let l = do_work [] [] 1 l
in
List.map to_int64 l
List.rev_map to_int64 l
;;
(* Create a bit list from a list of MO indices *)