pf_pfasst_destroy Subroutine

public subroutine pf_pfasst_destroy(pf)

Deallocate PFASST object destroy all levels deallocate pfasst pointer arrays

Arguments

Type IntentOptional AttributesName
type(pf_pfasst_t), intent(inout) :: pf

Main pfasst structure


Calls

proc~~pf_pfasst_destroy~~CallsGraph proc~pf_pfasst_destroy pf_pfasst_destroy proc~pf_mpi_destroy pf_mpi_destroy proc~pf_pfasst_destroy->proc~pf_mpi_destroy proc~pf_level_destroy pf_level_destroy proc~pf_pfasst_destroy->proc~pf_level_destroy proc~pf_destroy_sdcmats pf_destroy_sdcmats proc~pf_level_destroy->proc~pf_destroy_sdcmats

Contents

Source Code


Source Code

  subroutine pf_pfasst_destroy(pf)
    type(pf_pfasst_t), intent(inout) :: pf  !!  Main pfasst structure

    integer :: l

    !>  destroy all levels
    do l = 1, pf%nlevels
       call pf_level_destroy(pf%levels(l),pf%nlevels)
    end do
    !>  deallocate pfasst pointer arrays
    call  pf%results%destroy(pf%results)
    deallocate(pf%levels)
    deallocate(pf%hooks)
    deallocate(pf%nhooks)
    deallocate(pf%state)
    call pf_mpi_destroy(pf%comm)

  end subroutine pf_pfasst_destroy