mirror of
https://github.com/QuantumPackage/qp2.git
synced 2025-01-08 04:16:14 +01:00
avoid uninitialized phase in get_excitation
This commit is contained in:
parent
2f937cbca4
commit
e953cf4415
@ -126,6 +126,8 @@ subroutine get_excitation(det1,det2,exc,degree,phase,Nint)
|
||||
return
|
||||
|
||||
case(0)
|
||||
! Avoid uninitialized phase
|
||||
phase = 1d0
|
||||
return
|
||||
|
||||
end select
|
||||
|
Loading…
Reference in New Issue
Block a user