LCPQ/quantum_package
10
0
Fork 0
mirror of https://github.com/LCPQ/quantum_package synced 2024-12-25 05:43:47 +01:00
Code Issues Releases Wiki Activity

type mismatch

Browse Source
This commit is contained in:
Anthony Scemama 2018-06-27 15:54:59 +02:00
parent 6ba232251c
commit 7246641fce
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
plugins/Full_CI_ZMQ/run_selection_slave.irp.f
View File

@ -1,4 +1,7 @@
subroutine run_selection_slave(thread,iproc,energy) subroutine run_selection_slave(thread,iproc,energy)
implicit none
integer, intent(in) :: thread, iproc
double precision, intent(in) :: energy(N_states_diag)
call run_selection_slave_new(thread,iproc,energy) call run_selection_slave_new(thread,iproc,energy)
end end
@ -7,8 +10,8 @@ subroutine run_selection_slave_new(thread,iproc,energy)
use selection_types use selection_types
implicit none implicit none
double precision, intent(in) :: energy(N_states_diag)
integer, intent(in) :: thread, iproc integer, intent(in) :: thread, iproc
double precision, intent(in) :: energy(N_states_diag)
integer :: rc, i, N integer :: rc, i, N
logical :: buffer_ready logical :: buffer_ready