SELF_MappedVector_2D_t Module

  1. SELF_MappedVector_2D_t.f90
  2. SELF_MappedVector_2D_t

Uses


Contents

Derived Types

Subroutines


Derived Types

type, public, extends(Vector2D) :: MappedVector2D_t

Components

TypeVisibilityAttributesNameInitial
integer, public :: M
integer, public :: N
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:):: avgBoundary
character(len=3), public :: backend ="cpu"
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:):: boundary
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:):: boundaryNormal
type(EquationParser), public, allocatable:: eqn(:)
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:):: extBoundary
type(SEMQuad), public, pointer:: geometry=> null()
logical, public :: geometry_associated =.false.
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:):: interior
type(Lagrange), public, pointer:: interp
type(Metadata), public, allocatable:: meta(:)
integer, public :: nElem
integer, public :: nVar

Type-Bound Procedures

procedure, private :: ApplyFlip => ApplyFlip_MappedVector2D_t
procedure, public :: AssociateGeometry => AssociateGeometry_MappedVector2D_t
procedure, public :: AverageSides => AverageSides_Vector2D_t
procedure, public :: BoundaryInterp => BoundaryInterp_Vector2D_t
procedure, public :: DissociateGeometry => DissociateGeometry_MappedVector2D_t
generic, public :: Divergence => Divergence_Vector2D_t
procedure, public :: Free => Free_Vector2D_t
generic, public :: Gradient => Gradient_Vector2D_t
generic, public :: GridInterp => GridInterp_Vector2D_t
procedure, public :: Init => Init_Vector2D_t
procedure, private :: MPIExchangeAsync => MPIExchangeAsync_MappedVector2D_t
generic, public :: MappedDGDivergence => MappedDGDivergence_MappedVector2D_t
procedure, private :: MappedDGDivergence_MappedVector2D_t
generic, public :: MappedDivergence => MappedDivergence_MappedVector2D_t
procedure, private :: MappedDivergence_MappedVector2D_t
procedure, public :: SetDescription => SetDescription_DataObj
generic, public :: SetEquation => SetEquation_DataObj, SetEquation_Vector2D_t
procedure, public :: SetInteriorFromEquation => SetInteriorFromEquation_MappedVector2D_t
procedure, public :: SetName => SetName_DataObj
procedure, public :: SetUnits => SetUnits_DataObj
procedure, public :: SideExchange => SideExchange_MappedVector2D_t
procedure, public :: UpdateDevice => UpdateDevice_Vector2D_t
procedure, public :: UpdateHost => UpdateHost_Vector2D_t
generic, public :: WriteHDF5 => WriteHDF5_MPI_Vector2D_t, WriteHDF5_Vector2D_t

Subroutines

public subroutine ApplyFlip_MappedVector2D_t(this, mesh)

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(inout) :: this
type(Mesh2D), intent(in) :: mesh

public subroutine AssociateGeometry_MappedVector2D_t(this, geometry)

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(inout) :: this
type(SEMQuad), intent(in), target:: geometry

public subroutine DissociateGeometry_MappedVector2D_t(this)

Arguments

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

public subroutine MPIExchangeAsync_MappedVector2D_t(this, mesh)

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(inout) :: this
type(Mesh2D), intent(inout) :: mesh

public subroutine MappedDGDivergence_MappedVector2D_t(this, df)

Computes the divergence of a 2-D vector using the weak form On input, the attribute of the vector is assigned and the attribute is set to the physical directions of the vector. This method will project the vector onto the contravariant basis vectors.

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(in) :: this
real(kind=prec) :: df(1:this%N+1,1:this%N+1,1:this%nelem,1:this%nvar)

public subroutine MappedDivergence_MappedVector2D_t(this, df)

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(in) :: this
real(kind=prec), intent(out) :: df(1:this%N+1,1:this%N+1,1:this%nelem,1:this%nvar)

public subroutine SetInteriorFromEquation_MappedVector2D_t(this, geometry, time)

Sets the this % interior attribute using the eqn attribute, geometry (for physical positions), and provided simulation time.

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(inout) :: this
type(SEMQuad), intent(in) :: geometry
real(kind=prec), intent(in) :: time

public subroutine SideExchange_MappedVector2D_t(this, mesh)

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(inout) :: this
type(Mesh2D), intent(inout) :: mesh