9
1
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-11-07 05:53:37 +01:00

Fixed wrong Assert

This commit is contained in:
Anthony Scemama 2019-02-05 18:31:11 +01:00
parent e7267463c8
commit 5a8a4fb37e

View File

@ -113,7 +113,7 @@ subroutine run_pt2_slave_small(thread,iproc,energy)
call create_selection_buffer(bsize, bsize*2, b) call create_selection_buffer(bsize, bsize*2, b)
buffer_ready = .True. buffer_ready = .True.
else else
ASSERT (N == b%N) ASSERT (b%N == bsize)
endif endif
double precision :: time0, time1 double precision :: time0, time1