LCPQ/quantum_package
10
0
Fork 0
mirror of https://github.com/LCPQ/quantum_package synced 2024-12-22 20:35:19 +01:00
Code Issues Releases Wiki Activity

Super fast density matrix

Browse Source
This commit is contained in:
Anthony Scemama 2017-03-13 12:38:22 +01:00
parent 7cb17e0a48
commit b4d6779d8c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -465,7 +465,7 @@ BEGIN_PROVIDER [ double precision, psi_bilinear_matrix_transp_values, (N_det,N_
call iset_order(psi_bilinear_matrix_transp_rows,iorder,N_det)
call iset_order(psi_bilinear_matrix_transp_columns,iorder,N_det)
do l=1,N_states
call dset_order(psi_bilinear_matrix_values(1,l),iorder,N_det)
call dset_order(psi_bilinear_matrix_transp_values(1,l),iorder,N_det)
enddo
deallocate(iorder,to_sort)
END_PROVIDER