mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-11-14 01:53:49 +01:00
Merge branch 'dev-stable' into dev-stable-tc-scf
This commit is contained in:
commit
3f91ed0bc7
@ -465,8 +465,9 @@ subroutine davidson_diag_hjj_sjj(dets_in,u_in,H_jj,s2_out,energies,dim_in,sze,N_
|
||||
integer :: lwork, info
|
||||
double precision, allocatable :: work(:)
|
||||
|
||||
y = h
|
||||
! y = h_p
|
||||
|
||||
! y = h
|
||||
y = h_p
|
||||
lwork = -1
|
||||
allocate(work(1))
|
||||
call dsygv(1,'V','U',shift2,y,size(y,1), &
|
||||
|
Loading…
Reference in New Issue
Block a user