mirror of
https://github.com/LCPQ/quantum_package
synced 2024-12-23 21:03:56 +01:00
removed test for phase_mask_bit
This commit is contained in:
parent
3abccca5e3
commit
4b9b54e19a
@ -436,10 +436,10 @@ subroutine get_double_excitation(det1,det2,exc,phase,Nint)
|
||||
|
||||
enddo
|
||||
phase = phase_dble(iand(nperm,1))
|
||||
call get_double_excitation_ref(det1,det2,exc,refaz,Nint)
|
||||
if(phase /= refaz) then
|
||||
print *, "phase", phase, refaz, n, exc(0,1,1)
|
||||
end if
|
||||
!call get_double_excitation_ref(det1,det2,exc,refaz,Nint)
|
||||
!if(phase == refaz) then
|
||||
! print *, "phase", phase, refaz, n, exc(0,1,1)
|
||||
!end if
|
||||
end
|
||||
|
||||
subroutine get_mono_excitation(det1,det2,exc,phase,Nint)
|
||||
|
Loading…
Reference in New Issue
Block a user