LCPQ
/
qp2
mirror of https://github.com/QuantumPackage/qp2.git
9
1
Fork 0
Code Releases Activity

Merge branch 'features_kpts' of github:QuantumPackage/qp2 into features_kpts

This commit is contained in:
Kevin Gasperich 2020-03-26 16:48:56 -05:00
parent 2845b1c8ea 9ddd8f5e7d
commit f17b36c3e4
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -416,6 +416,7 @@ END_PROVIDER
BEGIN_PROVIDER [ double precision, psi_bilinear_matrix_values, (N_det,N_states) ]
use bitmasks
PROVIDE psi_bilinear_matrix_rows
integer :: k,l
do k=1,N_det
do l=1,N_states
psi_bilinear_matrix_values(k,l) = psi_coef(k,l)
@ -429,6 +430,7 @@ END_PROVIDER
BEGIN_PROVIDER [ complex*16, psi_bilinear_matrix_values_complex, (N_det,N_states) ]
use bitmasks
PROVIDE psi_bilinear_matrix_rows
integer :: k,l
do k=1,N_det
do l=1,N_states
psi_bilinear_matrix_values_complex(k,l) = psi_coef_complex(k,l)