cgto_allocate_arrays Subroutine

private pure subroutine cgto_allocate_arrays(self, nfunc)

Allocate arrays for exponents and coefficients in a CGTO

Type Bound

cgto_type

Arguments

Type IntentOptional Attributes Name
class(cgto_type), intent(inout) :: self
integer, intent(in) :: nfunc

Called by

proc~~cgto_allocate_arrays~~CalledByGraph proc~cgto_allocate_arrays cgto_type%cgto_allocate_arrays proc~copy_atomic_basis copy_atomic_basis proc~copy_atomic_basis->proc~cgto_allocate_arrays proc~fill_element_basis fill_element_basis proc~fill_element_basis->proc~cgto_allocate_arrays proc~build_molecular_basis build_molecular_basis proc~build_molecular_basis->proc~copy_atomic_basis proc~parse_element_basis parse_element_basis proc~build_molecular_basis->proc~parse_element_basis proc~parse_element_basis->proc~fill_element_basis

Source Code

   pure subroutine cgto_allocate_arrays(self, nfunc)
      !! Allocate arrays for exponents and coefficients in a CGTO
      class(cgto_type), intent(inout) :: self
      integer, intent(in) :: nfunc

      self%nfunc = nfunc
      allocate (self%exponents(nfunc))
      allocate (self%coefficients(nfunc))
   end subroutine cgto_allocate_arrays