SELF_MappedVector_2D_t Module

  1. SELF_MappedVector_2D_t.f90
  2. SELF_MappedVector_2D_t

Uses

  • module~~self_mappedvector_2d_t~~UsesGraph module~self_mappedvector_2d_t SELF_MappedVector_2D_t module~self_mesh_2d SELF_Mesh_2D module~self_mappedvector_2d_t->module~self_mesh_2d module~self_constants SELF_Constants module~self_mappedvector_2d_t->module~self_constants iso_c_binding iso_c_binding module~self_mappedvector_2d_t->iso_c_binding FEQParse FEQParse module~self_mappedvector_2d_t->FEQParse module~self_geometry_2d SELF_Geometry_2D module~self_mappedvector_2d_t->module~self_geometry_2d module~self_tensor_2d SELF_Tensor_2D module~self_mappedvector_2d_t->module~self_tensor_2d module~self_vector_2d SELF_Vector_2D module~self_mappedvector_2d_t->module~self_vector_2d module~self_lagrange~3 SELF_Lagrange module~self_mappedvector_2d_t->module~self_lagrange~3 module~self_domaindecomposition~2 SELF_DomainDecomposition module~self_mappedvector_2d_t->module~self_domaindecomposition~2 module~self_mesh_2d_t SELF_Mesh_2D_t module~self_mesh_2d->module~self_mesh_2d_t module~self_constants->iso_c_binding iso_fortran_env iso_fortran_env module~self_constants->iso_fortran_env module~self_geometry_2d->module~self_mesh_2d module~self_geometry_2d->module~self_constants module~self_geometry_2d->module~self_tensor_2d module~self_geometry_2d->module~self_vector_2d module~self_geometry_2d->module~self_lagrange~3 module~self_supportroutines SELF_SupportRoutines module~self_geometry_2d->module~self_supportroutines module~self_data SELF_Data module~self_geometry_2d->module~self_data module~self_scalar_2d SELF_Scalar_2D module~self_geometry_2d->module~self_scalar_2d module~self_tensor_2d_t SELF_Tensor_2D_t module~self_tensor_2d->module~self_tensor_2d_t module~self_vector_2d_t SELF_Vector_2D_t module~self_vector_2d->module~self_vector_2d_t module~self_lagrange~3->module~self_constants module~self_lagrange~3->iso_c_binding module~self_lagrange~3->iso_fortran_env module~self_lagrange_t SELF_Lagrange_t module~self_lagrange~3->module~self_lagrange_t module~self_domaindecomposition_t SELF_DomainDecomposition_t module~self_domaindecomposition~2->module~self_domaindecomposition_t module~self_mesh_2d_t->module~self_constants module~self_mesh_2d_t->iso_c_binding module~self_mesh_2d_t->module~self_lagrange~3 module~self_mesh_2d_t->module~self_domaindecomposition~2 module~self_mesh_2d_t->module~self_supportroutines module~self_mesh SELF_Mesh module~self_mesh_2d_t->module~self_mesh module~self_hdf5 SELF_HDF5 module~self_mesh_2d_t->module~self_hdf5 module~self_quadrature SELF_Quadrature module~self_mesh_2d_t->module~self_quadrature HDF5 HDF5 module~self_mesh_2d_t->HDF5 module~self_supportroutines->module~self_constants module~self_supportroutines->iso_fortran_env module~self_data->module~self_constants module~self_data->iso_c_binding module~self_data->FEQParse module~self_data->module~self_lagrange~3 module~self_data->module~self_hdf5 module~self_metadata SELF_Metadata module~self_data->module~self_metadata module~self_data->HDF5 module~self_scalar_2d->module~self_constants module~self_scalar_2d->iso_c_binding module~self_scalar_2d_t SELF_Scalar_2D_t module~self_scalar_2d->module~self_scalar_2d_t module~self_tensor_2d_t->module~self_constants module~self_tensor_2d_t->iso_c_binding module~self_tensor_2d_t->FEQParse module~self_tensor_2d_t->module~self_lagrange~3 module~self_tensor_2d_t->module~self_data module~self_tensor_2d_t->module~self_hdf5 module~self_tensor_2d_t->module~self_metadata module~self_tensor_2d_t->HDF5 module~self_datapool SELF_DataPool module~self_tensor_2d_t->module~self_datapool module~self_vector_2d_t->module~self_constants module~self_vector_2d_t->iso_c_binding module~self_vector_2d_t->FEQParse module~self_vector_2d_t->module~self_lagrange~3 module~self_vector_2d_t->module~self_data module~self_vector_2d_t->module~self_hdf5 module~self_vector_2d_t->module~self_metadata module~self_vector_2d_t->HDF5 module~self_vector_2d_t->module~self_datapool module~self_lagrange_t->module~self_constants module~self_lagrange_t->iso_c_binding module~self_lagrange_t->module~self_supportroutines module~self_lagrange_t->iso_fortran_env module~self_lagrange_t->module~self_hdf5 module~self_lagrange_t->module~self_quadrature module~self_lagrange_t->HDF5 module~self_domaindecomposition_t->module~self_constants module~self_domaindecomposition_t->iso_c_binding module~self_domaindecomposition_t->module~self_lagrange~3 module~self_domaindecomposition_t->module~self_supportroutines mpi mpi module~self_domaindecomposition_t->mpi module~self_mesh->module~self_constants module~self_mesh->iso_c_binding module~self_mesh->module~self_domaindecomposition~2 module~self_hdf5->module~self_constants module~self_hdf5->iso_fortran_env module~self_hdf5->HDF5 module~self_hdf5->mpi module~self_quadrature->module~self_constants module~self_quadrature->iso_fortran_env module~self_metadata->module~self_hdf5 module~self_metadata->HDF5 module~self_scalar_2d_t->module~self_constants module~self_scalar_2d_t->iso_c_binding module~self_scalar_2d_t->FEQParse module~self_scalar_2d_t->module~self_lagrange~3 module~self_scalar_2d_t->module~self_data module~self_scalar_2d_t->module~self_hdf5 module~self_scalar_2d_t->module~self_metadata module~self_scalar_2d_t->HDF5 module~self_scalar_2d_t->module~self_datapool module~self_datapool->module~self_constants

Used by

  • module~~self_mappedvector_2d_t~~UsedByGraph module~self_mappedvector_2d_t SELF_MappedVector_2D_t module~self_mappedvector_2d~2 SELF_MappedVector_2D module~self_mappedvector_2d~2->module~self_mappedvector_2d_t module~self_mappedvector_2d SELF_MappedVector_2D module~self_mappedvector_2d->module~self_mappedvector_2d_t module~self_dgmodel2d_t SELF_DGModel2D_t module~self_dgmodel2d_t->module~self_mappedvector_2d~2 module~self_dgmodel2d~2 SELF_DGModel2D module~self_dgmodel2d~2->module~self_dgmodel2d_t module~self_amrcontroller_2d SELF_AMRController_2D module~self_amrcontroller_2d->module~self_dgmodel2d_t module~self_dgmodel2d SELF_DGModel2D module~self_dgmodel2d->module~self_dgmodel2d_t module~self_ecdgmodel2d_t SELF_ECDGModel2D_t module~self_ecdgmodel2d_t->module~self_dgmodel2d~2 module~self_linearshallowwater2d_t self_LinearShallowWater2D_t module~self_linearshallowwater2d_t->module~self_dgmodel2d~2 module~self_nulldgmodel2d_t self_NullDGModel2D_t module~self_nulldgmodel2d_t->module~self_dgmodel2d~2 module~self_advection_diffusion_2d_t self_advection_diffusion_2d_t module~self_advection_diffusion_2d_t->module~self_dgmodel2d~2 module~self_lineareuler2d_t self_LinearEuler2D_t module~self_lineareuler2d_t->module~self_dgmodel2d~2 module~self_lineareuler2d_pml_t self_LinearEuler2D_PML_t module~self_lineareuler2d_pml_t->module~self_dgmodel2d~2 module~self_lineareuler2d_pml_t->module~self_lineareuler2d_t module~self_lineareuler2d_pml self_LinearEuler2D_PML module~self_lineareuler2d_pml->module~self_lineareuler2d_pml_t module~self_lineareuler2d_pml~2 self_LinearEuler2D_PML module~self_lineareuler2d_pml~2->module~self_lineareuler2d_pml_t module~self_lineareuler2d self_LinearEuler2D module~self_lineareuler2d->module~self_lineareuler2d_t module~self_ecdgmodel2d SELF_ECDGModel2D module~self_ecdgmodel2d->module~self_ecdgmodel2d_t module~self_ecdgmodel2d~2 SELF_ECDGModel2D module~self_ecdgmodel2d~2->module~self_ecdgmodel2d_t module~self_ecadvection2d SELF_ECAdvection2D module~self_ecadvection2d->module~self_ecdgmodel2d_t module~self_ecadvection2d_t SELF_ECAdvection2D_t module~self_ecadvection2d->module~self_ecadvection2d_t module~self_linearshallowwater2d~2 self_LinearShallowWater2D module~self_linearshallowwater2d~2->module~self_linearshallowwater2d_t module~self_esatmo2d SELF_ESAtmo2D module~self_esatmo2d->module~self_ecdgmodel2d_t module~self_esatmo2d_t SELF_ESAtmo2D_t module~self_esatmo2d->module~self_esatmo2d_t module~self_linearshallowwater2d self_LinearShallowWater2D module~self_linearshallowwater2d->module~self_linearshallowwater2d_t module~self_nulldgmodel2d self_NullDGModel2D module~self_nulldgmodel2d->module~self_nulldgmodel2d_t module~self_nulldgmodel2d~2 self_NullDGModel2D module~self_nulldgmodel2d~2->module~self_nulldgmodel2d_t module~self_advection_diffusion_2d self_advection_diffusion_2d module~self_advection_diffusion_2d->module~self_advection_diffusion_2d_t module~self_advection_diffusion_2d~2 self_advection_diffusion_2d module~self_advection_diffusion_2d~2->module~self_advection_diffusion_2d_t module~self_lineareuler2d~2 self_LinearEuler2D module~self_lineareuler2d~2->module~self_lineareuler2d_t module~self_ecadvection2d_t->module~self_ecdgmodel2d module~self_esatmo2d_t->module~self_ecdgmodel2d module~self_ecadvection2d~2 SELF_ECAdvection2D module~self_ecadvection2d~2->module~self_ecadvection2d_t module~self_esatmo2d~2 SELF_ESAtmo2D module~self_esatmo2d~2->module~self_esatmo2d_t

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

High-water-mark backing store for the arrays above (AMR Stage 6b; see SELF_DataPool). The public members are pointers remapped onto the leading part of these pools at the exact logical shape, so every extent, stride and shape() is unchanged while Resize can reuse the storage across an adaptation epoch. Nothing should index the pools directly.
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(:)
real(kind=prec), public, allocatable, dimension(:,:,:,:,:):: mortarBuff
integer, public :: nElem
integer, public :: nVar
real(kind=prec), public, pointer, contiguous:: pool_avgBoundary(:)=> null()
real(kind=prec), public, pointer, contiguous:: pool_boundary(:)=> null()
real(kind=prec), public, pointer, contiguous:: pool_boundaryNormal(:)=> null()
real(kind=prec), public, pointer, contiguous:: pool_extBoundary(:)=> null()
real(kind=prec), public, pointer, contiguous:: pool_interior(:)=> null()

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
procedure, private :: MPIMortarExchangeAsync => MPIMortarExchangeAsync_MappedVector2D_t
procedure, private :: MPIMortarFluxAsync => MPIMortarFluxAsync_MappedVector2D_t
procedure, public :: MapArrays => MapArrays_Vector2D_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 :: MortarExchange => MortarExchange_MappedVector2D_t
procedure, public :: MortarFluxCollect => MortarFluxCollect_MappedVector2D_t
procedure, public :: Resize => Resize_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 MPIMortarExchangeAsync_MappedVector2D_t(this, mesh)

Vector analogue of the scalar mortar exchange message posting; each physical direction of each variable is exchanged as its own message.

Arguments

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

public subroutine MPIMortarFluxAsync_MappedVector2D_t(this, mesh)

Posts the one-directional messages for MortarFluxCollect : each remote small side sends its boundaryNormal trace to the big side's rank.

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 MortarExchange_MappedVector2D_t(this, mesh)

Fills the extBoundary attribute on all sides participating in a 2:1 nonconforming (mortar) interface; vector analogue of the scalar MortarExchange (see MappedScalar2D_t for the algorithm description).

Arguments

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

public subroutine MortarFluxCollect_MappedVector2D_t(this, mesh)

Replaces the big-side boundaryNormal trace on each mortar interface with the L2 projection of the two small sides' boundaryNormal traces.

Read more…

Arguments

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

public subroutine Resize_MappedVector2D_t(this, interp, nVar, nElem)

Rebind to a new element count, reusing storage where it fits (AMR Stage 6b). See Resize_MappedScalar2D_t for why the mortar staging buffer is invalidated rather than resized.

Arguments

TypeIntentOptionalAttributesName
class(MappedVector2D_t), intent(inout) :: this
type(Lagrange), intent(in), target:: interp
integer, intent(in) :: nVar
integer, intent(in) :: nElem

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