AdditionalFree_ESAtmo2D_t Subroutine

public subroutine AdditionalFree_ESAtmo2D_t(this)

Arguments

TypeIntentOptionalAttributesName
class(ESAtmo2D_t), intent(inout) :: this

Contents


Source Code

  subroutine AdditionalFree_ESAtmo2D_t(this)
    implicit none
    class(ESAtmo2D_t),intent(inout) :: this

    call this%diffFlux%Free()
    call this%diffDiv%Free()

  endsubroutine AdditionalFree_ESAtmo2D_t