deallocate_neighbors Subroutine

private subroutine deallocate_neighbors(this)

Type Bound

site

Arguments

Type IntentOptional Attributes Name
class(site) :: this

Contents

Source Code

deallocate_neighbors

Source Code

    subroutine deallocate_neighbors(this)
        class(site) :: this

        if (allocated(this%neighbors)) deallocate(this%neighbors)

    end subroutine deallocate_neighbors