mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-09-01 21:53:40 +02: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
|
return
|
||||||
|
|
||||||
case(0)
|
case(0)
|
||||||
|
! Avoid uninitialized phase
|
||||||
|
phase = 1d0
|
||||||
return
|
return
|
||||||
|
|
||||||
end select
|
end select
|
||||||
|
Loading…
Reference in New Issue
Block a user