mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-12-22 12:23:31 +01:00
Fixed typo
This commit is contained in:
parent
4e65d70a52
commit
61a237c444
2
CI/CI.ml
2
CI/CI.ml
@ -91,7 +91,7 @@ let create_matrix_spin f det_space =
|
|||||||
(** Update function when ki and kj are connected *)
|
(** Update function when ki and kj are connected *)
|
||||||
let update i j ki kj =
|
let update i j ki kj =
|
||||||
let x = f ki kj in
|
let x = f ki kj in
|
||||||
if abs_float x < Constants.epsilon then
|
if abs_float x > Constants.epsilon then
|
||||||
result.(i) <- (j, x) :: result.(i) ;
|
result.(i) <- (j, x) :: result.(i) ;
|
||||||
in
|
in
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user