delete Subroutine

private subroutine delete(this)

Type Bound

heating_t

Arguments

Type	Intent	Optional	Attributes		Name
class(heating_t),	intent(inout)			::	this