basis_set_allocate_elements Subroutine

private pure subroutine basis_set_allocate_elements(self, nelements)

Allocate array of atomic basis elements in a molecular basis set

Type Bound

molecular_basis_type

Arguments

Type IntentOptional Attributes Name
class(molecular_basis_type), intent(inout) :: self
integer, intent(in) :: nelements

Called by

proc~~basis_set_allocate_elements~~CalledByGraph proc~basis_set_allocate_elements molecular_basis_type%basis_set_allocate_elements proc~build_molecular_basis build_molecular_basis proc~build_molecular_basis->proc~basis_set_allocate_elements

Source Code

   pure subroutine basis_set_allocate_elements(self, nelements)
      !! Allocate array of atomic basis elements in a molecular basis set
      class(molecular_basis_type), intent(inout) :: self
      integer, intent(in) :: nelements

      self%nelements = nelements
      allocate (self%elements(nelements))

   end subroutine basis_set_allocate_elements