SELF_MappedScalar_2D_t Module



Contents


Derived Types

type, public, extends(Scalar2D) :: MappedScalar2D_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_MappedScalar2D_t
procedure, public :: AssociateGeometry => AssociateGeometry_MappedScalar2D_t
procedure, public :: AverageSides => AverageSides_Scalar2D_t
procedure, public :: BoundaryInterp => BoundaryInterp_Scalar2D_t
procedure, public :: DissociateGeometry => DissociateGeometry_MappedScalar2D_t
procedure, public :: Free => Free_Scalar2D_t
generic, public :: Gradient => Gradient_Scalar2D_t
generic, public :: GridInterp => GridInterp_Scalar2D_t
procedure, public :: Init => Init_Scalar2D_t
procedure, private :: MPIExchangeAsync => MPIExchangeAsync_MappedScalar2D_t
generic, public :: MappedDGGradient => MappedDGGradient_MappedScalar2D_t
procedure, private :: MappedDGGradient_MappedScalar2D_t
generic, public :: MappedGradient => MappedGradient_MappedScalar2D_t
procedure, private :: MappedGradient_MappedScalar2D_t
procedure, public :: SetDescription => SetDescription_DataObj
generic, public :: SetEquation => SetEquation_DataObj
procedure, public :: SetInteriorFromEquation => SetInteriorFromEquation_MappedScalar2D_t
procedure, public :: SetName => SetName_DataObj
procedure, public :: SetUnits => SetUnits_DataObj
procedure, public :: SideExchange => SideExchange_MappedScalar2D_t
procedure, public :: UpdateDevice => UpdateDevice_Scalar2D_t
procedure, public :: UpdateHost => UpdateHost_Scalar2D_t
generic, public :: WriteHDF5 => WriteHDF5_MPI_Scalar2D_t, WriteHDF5_Scalar2D_t

Subroutines

public subroutine ApplyFlip_MappedScalar2D_t(this, mesh)

Arguments

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

public subroutine AssociateGeometry_MappedScalar2D_t(this, geometry)

Arguments

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

public subroutine DissociateGeometry_MappedScalar2D_t(this)

Arguments

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

public subroutine MPIExchangeAsync_MappedScalar2D_t(this, mesh)

Arguments

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

public subroutine MappedDGGradient_MappedScalar2D_t(this, df)

Arguments

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

public subroutine MappedGradient_MappedScalar2D_t(this, df)

Calculates the gradient of a function using the strong form of the gradient in mapped coordinates.

Arguments

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

public subroutine SetInteriorFromEquation_MappedScalar2D_t(this, geometry, time)

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

Arguments

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

public subroutine SideExchange_MappedScalar2D_t(this, mesh)

Arguments

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