LCPQ/quantum_package
10
0
Fork 0
mirror of https://github.com/LCPQ/quantum_package synced 2025-01-03 10:05:57 +01:00
Code Issues Releases Wiki Activity

Fixed assert

Browse Source
This commit is contained in:
Anthony Scemama 2017-05-18 14:36:06 +02:00
parent 625decb5ed
commit ea70831a90
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ocaml/TaskServer.ml
View File

@ -49,7 +49,7 @@ let zmq_context =
ZMQ.Context.create ()
let () =
ZMQ.Context.set_io_threads zmq_context 2
ZMQ.Context.set_io_threads zmq_context 8
let bind_socket ~socket_type ~socket ~port =

2
src/Determinants/spindeterminants.irp.f
View File

@ -416,7 +416,7 @@ BEGIN_PROVIDER [ double precision, psi_bilinear_matrix_values, (N_det,N_states)
j = get_index_in_psi_det_beta_unique (psi_det(1,2,k),N_int)
ASSERT (j>0)
ASSERT (j<=N_det_alpha_unique)
ASSERT (j<=N_det_beta_unique)
do l=1,N_states
psi_bilinear_matrix_values(k,l) = psi_coef(k,l)