ky_deallocate Subroutine

private subroutine ky_deallocate(self)

Deallocate storage space

Type Bound

ky_type

Arguments

Type IntentOptional Attributes Name
class(ky_type), intent(inout) :: self

Contents

Source Code

ky_deallocate

Source Code

  subroutine ky_deallocate(self)
    implicit none
    class(ky_type), intent(inout) :: self
    if(allocated(self%supercells)) deallocate(self%supercells)
  end subroutine ky_deallocate