m_case_tgv Module


Uses


Interfaces

public interface case_tgv_t

  • public function case_tgv_init(backend, mesh, host_allocator) result(flow_case)

    Arguments

    Type IntentOptional Attributes Name
    class(base_backend_t), intent(inout), target :: backend
    type(mesh_t), intent(inout), target :: mesh
    type(allocator_t), intent(inout), target :: host_allocator

    Return Value type(case_tgv_t)


Derived Types

type, public, extends(base_case_t) ::  case_tgv_t

Components

Type Visibility Attributes Name Initial
class(solver_t), public, allocatable :: solver

Constructor

public function case_tgv_init (backend, mesh, host_allocator)

Type-Bound Procedures

procedure, public :: case_init
procedure, public :: set_init
procedure, public :: run
procedure, public :: print_enstrophy
procedure, public :: print_div_max_mean
procedure, public :: boundary_conditions => boundary_conditions_tgv
procedure, public :: initial_conditions => initial_conditions_tgv
procedure, public :: forcings => forcings_tgv
procedure, public :: postprocess => postprocess_tgv

Functions

public function case_tgv_init(backend, mesh, host_allocator) result(flow_case)

Arguments

Type IntentOptional Attributes Name
class(base_backend_t), intent(inout), target :: backend
type(mesh_t), intent(inout), target :: mesh
type(allocator_t), intent(inout), target :: host_allocator

Return Value type(case_tgv_t)

public pure function u_func(coords) result(r)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: coords(3)

Return Value real(kind=dp)

public pure function v_func(coords) result(r)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: coords(3)

Return Value real(kind=dp)


Subroutines

public subroutine initial_conditions_tgv(self)

Arguments

Type IntentOptional Attributes Name
class(case_tgv_t) :: self

public subroutine boundary_conditions_tgv(self)

Arguments

Type IntentOptional Attributes Name
class(case_tgv_t) :: self

public subroutine forcings_tgv(self, du, dv, dw)

Arguments

Type IntentOptional Attributes Name
class(case_tgv_t) :: self
class(field_t), intent(inout) :: du
class(field_t), intent(inout) :: dv
class(field_t), intent(inout) :: dw

public subroutine postprocess_tgv(self, i, t)

Arguments

Type IntentOptional Attributes Name
class(case_tgv_t) :: self
integer, intent(in) :: i
real(kind=dp), intent(in) :: t