LCPQ/qp2
9
1
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-11-18 11:23:38 +01:00
Code Releases Activity

Message for S2 eigenvalues

Browse Source
This commit is contained in:
Anthony Scemama 2020-03-17 16:14:55 +01:00
parent d9e2024554
commit 1a1d73cd6c
3 changed files with 22 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
bin/qp_reset
View File

@ -95,6 +95,7 @@ qp set_file $ezfio
if [[ $dets -eq 1 ]] ; then if [[ $dets -eq 1 ]] ; then
rm --force -- ${ezfio}/determinants/n_det rm --force -- ${ezfio}/determinants/n_det
rm --force -- ${ezfio}/determinants/psi_{det,coef}.gz rm --force -- ${ezfio}/determinants/psi_{det,coef}.gz
rm --force -- ${ezfio}/determinants/psi_{det,coef}_qp_edit.gz
fi fi
if [[ $mos -eq 1 ]] ; then if [[ $mos -eq 1 ]] ; then

2
src/davidson/diagonalize_ci.irp.f
View File

@ -163,7 +163,7 @@ END_PROVIDER
print*,'!!!!!!!! WARNING !!!!!!!!!' print*,'!!!!!!!! WARNING !!!!!!!!!'
print*,' Within the ',N_det,'determinants selected' print*,' Within the ',N_det,'determinants selected'
print*,' and the ',N_states_diag,'states requested' print*,' and the ',N_states_diag,'states requested'
print*,' We did not find any state with S^2 values close to ',expected_s2 print*,' We did not find only states with S^2 values close to ',expected_s2
print*,' We will then set the first N_states eigenvectors of the H matrix' print*,' We will then set the first N_states eigenvectors of the H matrix'
print*,' as the CI_eigenvectors' print*,' as the CI_eigenvectors'
print*,' You should consider more states and maybe ask for s2_eig to be .True. or just enlarge the CI space' print*,' You should consider more states and maybe ask for s2_eig to be .True. or just enlarge the CI space'

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

@ -771,7 +771,7 @@ subroutine apply_excitation(det, exc, res, ok, Nint)
case default case default
print *, degree print *, degree
print *, "apply ex" print *, "apply ex"
! print *, 1.d0/0.d0 ! For traceback print *, 1.d0/0.d0 ! For traceback
STOP STOP
end select end select
! END INLINE ! END INLINE