deleteTestRealArrVal Subroutine

public subroutine deleteTestRealArrVal(self)

Destruct TestRealVal object by deallocating its next object pointer as well as its res and tgt arrays.

Arguments

Type	Intent	Optional	Attributes		Name
type(TestRealArrVal),	intent(inout)			::	self

Contents

Source Code

deleteTestRealArrVal

Source Code

subroutine deleteTestRealArrVal(self) 
    !! Destruct TestRealVal object by deallocating its next object pointer
    !! as well as its res and tgt arrays.

    type(TestRealArrVal), intent(inout) :: self
    deallocate(self%next)
    deallocate(self%res)
    deallocate(self%tgt)
end subroutine deleteTestRealArrVal