finalize_setup Subroutine

private subroutine finalize_setup(this)

Dealloates temporary arrays used for initialisation

Type Bound

shared_rhash_t

Arguments

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

Contents

Source Code


Source Code

    subroutine finalize_setup(this)
        class(shared_rhash_t), intent(inout) :: this

        if (iProcIndex_intra == 0) then
            deallocate(this%mult)
        end if
    end subroutine finalize_setup