AdditionalFree_ESAtmo3D_t Subroutine

public subroutine AdditionalFree_ESAtmo3D_t(this)

Arguments

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

Contents


Source Code

  subroutine AdditionalFree_ESAtmo3D_t(this)
    implicit none
    class(ESAtmo3D_t),intent(inout) :: this

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

  endsubroutine AdditionalFree_ESAtmo3D_t