amisdcQ_destroy Subroutine

public subroutine amisdcQ_destroy(this, lev)

Arguments

Type IntentOptional AttributesName
class(pf_amisdcQ_t), intent(inout) :: this
class(pf_level_t), intent(inout) :: lev

Contents

Source Code


Source Code

  subroutine amisdcQ_destroy(this, lev)
    class(pf_amisdcQ_t), intent(inout) :: this
    class(pf_level_t), intent(inout) :: lev
    
    deallocate(this%QdiffE)
    deallocate(this%QdiffI)
    deallocate(this%QtilE)
    deallocate(this%QtilI)
  end subroutine amisdcQ_destroy