aim_deconstructor Subroutine

public subroutine aim_deconstructor(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(aim),			pointer	::	this

Contents

Source Code

aim_deconstructor

Source Code

    subroutine aim_deconstructor(this)
        class(aim), pointer :: this

        call this%deallocate_sites()

        nullify (this)

    end subroutine aim_deconstructor