allocate_pannels Subroutine

public subroutine allocate_pannels(flag, natyp, ntotd, ipan, npan_tot, npan_eq_at, npan_log_at, ipan_intervall, rpan_intervall)

Subroutine handling the allocation/deallocation of arrays that describe the panels

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: flag
integer, intent(in) :: natyp

number of kinds of atoms in unit cell

integer, intent(in) :: ntotd

IPAND+30

integer, intent(inout), dimension (:), allocatable :: ipan

Number of panels in non-MT-region

integer, intent(inout), dimension (:), allocatable :: npan_tot
integer, intent(inout), dimension (:), allocatable :: npan_eq_at
integer, intent(inout), dimension (:), allocatable :: npan_log_at
integer, intent(inout), dimension (:, :), allocatable :: ipan_intervall
real(kind=dp), intent(inout), dimension (:, :), allocatable :: rpan_intervall