@brief This routine reorders orbitals to maximum overlap.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=dp), | intent(inout), | dimension(nbf,*) | :: | V | ||
real(kind=dp), | intent(in), | dimension(*) | :: | E | ||
real(kind=dp), | intent(in), | dimension(l0,*) | :: | Smo | ||
integer | :: | l0 | ||||
integer | :: | nbf | ||||
integer | :: | lr1 | ||||
integer | :: | lr2 |