rotate_orbitals Subroutine

public subroutine rotate_orbitals(theta, pairs, c)

rotates orbital pairs by given angle theta

Arguments

Type IntentOptional Attributes Name
real(kind=long), intent(in) :: theta(:)
type(indep_mo_pair), intent(in) :: pairs(:)
real(kind=long), intent(out) :: c(:,:)