Allocate array of shells in an atomic basis
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(atomic_basis_type), | intent(inout) | :: | self | |||
| integer, | intent(in) | :: | nshells |
pure subroutine allocate_basis_shells(self, nshells) !! Allocate array of shells in an atomic basis class(atomic_basis_type), intent(inout) :: self integer, intent(in) :: nshells self%nshells = nshells allocate (self%shells(nshells)) end subroutine allocate_basis_shells