finalize_real_1D Subroutine

private pure subroutine finalize_real_1D(this)

@brief Deallocate the resource.

Type Bound

buffer_real_1D_t

Arguments

Type IntentOptional Attributes Name
class(buffer_real_1D_t), intent(inout) :: this

Contents

Source Code

finalize_real_1D

Source Code

    pure subroutine finalize_real_1D (this)
        class(buffer_real_1D_t), intent(inout) :: this

        if (allocated(this%buf)) deallocate(this%buf)
    end subroutine finalize_real_1D