SELF_MappedScalar_2D Module

  1. SELF_MappedScalar_2D.f90
  2. SELF_MappedScalar_2D

Uses

  • module~~self_mappedscalar_2d~2~~UsesGraph module~self_mappedscalar_2d~2 SELF_MappedScalar_2D module~self_gpu~2 SELF_GPU module~self_mappedscalar_2d~2->module~self_gpu~2 module~self_gpuinterfaces SELF_GPUInterfaces module~self_mappedscalar_2d~2->module~self_gpuinterfaces module~self_mappedscalar_2d_t SELF_MappedScalar_2D_t module~self_mappedscalar_2d~2->module~self_mappedscalar_2d_t iso_c_binding iso_c_binding module~self_mappedscalar_2d~2->iso_c_binding module~self_gpu~2->iso_c_binding module~self_gpu_enums~2 SELF_GPU_enums module~self_gpu~2->module~self_gpu_enums~2 module~self_gpuinterfaces->module~self_gpu~2 module~self_gpuinterfaces->iso_c_binding module~self_mappedscalar_2d_t->iso_c_binding module~self_constants SELF_Constants module~self_mappedscalar_2d_t->module~self_constants FEQParse FEQParse module~self_mappedscalar_2d_t->FEQParse module~self_geometry_2d SELF_Geometry_2D module~self_mappedscalar_2d_t->module~self_geometry_2d module~self_domaindecomposition SELF_DomainDecomposition module~self_mappedscalar_2d_t->module~self_domaindecomposition module~self_lagrange~3 SELF_Lagrange module~self_mappedscalar_2d_t->module~self_lagrange~3 module~self_scalar_2d~2 SELF_Scalar_2D module~self_mappedscalar_2d_t->module~self_scalar_2d~2 module~self_tensor_2d SELF_Tensor_2D module~self_mappedscalar_2d_t->module~self_tensor_2d module~self_mesh_2d~2 SELF_Mesh_2D module~self_mappedscalar_2d_t->module~self_mesh_2d~2 module~self_gpu_enums~2->iso_c_binding module~self_constants->iso_c_binding iso_fortran_env iso_fortran_env module~self_constants->iso_fortran_env module~self_geometry_2d->module~self_constants module~self_geometry_2d->module~self_lagrange~3 module~self_geometry_2d->module~self_scalar_2d~2 module~self_geometry_2d->module~self_tensor_2d module~self_geometry_2d->module~self_mesh_2d~2 module~self_supportroutines SELF_SupportRoutines module~self_geometry_2d->module~self_supportroutines module~self_vector_2d~2 SELF_Vector_2D module~self_geometry_2d->module~self_vector_2d~2 module~self_data SELF_Data module~self_geometry_2d->module~self_data module~self_domaindecomposition_t SELF_DomainDecomposition_t module~self_domaindecomposition->module~self_domaindecomposition_t module~self_lagrange~3->iso_c_binding module~self_lagrange~3->module~self_constants module~self_lagrange_t SELF_Lagrange_t module~self_lagrange~3->module~self_lagrange_t module~self_lagrange~3->iso_fortran_env module~self_scalar_2d~2->iso_c_binding module~self_scalar_2d~2->module~self_constants module~self_scalar_2d_t SELF_Scalar_2D_t module~self_scalar_2d~2->module~self_scalar_2d_t module~self_tensor_2d_t SELF_Tensor_2D_t module~self_tensor_2d->module~self_tensor_2d_t module~self_mesh_2d_t SELF_Mesh_2D_t module~self_mesh_2d~2->module~self_mesh_2d_t module~self_lagrange_t->iso_c_binding module~self_lagrange_t->module~self_constants module~self_lagrange_t->iso_fortran_env module~self_lagrange_t->module~self_supportroutines module~self_quadrature SELF_Quadrature module~self_lagrange_t->module~self_quadrature module~self_hdf5 SELF_HDF5 module~self_lagrange_t->module~self_hdf5 HDF5 HDF5 module~self_lagrange_t->HDF5 module~self_scalar_2d_t->iso_c_binding module~self_scalar_2d_t->module~self_constants 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_metadata SELF_Metadata module~self_scalar_2d_t->module~self_metadata module~self_scalar_2d_t->module~self_hdf5 module~self_scalar_2d_t->HDF5 module~self_tensor_2d_t->iso_c_binding module~self_tensor_2d_t->module~self_constants 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_metadata module~self_tensor_2d_t->module~self_hdf5 module~self_tensor_2d_t->HDF5 module~self_mesh_2d_t->iso_c_binding module~self_mesh_2d_t->module~self_constants module~self_mesh_2d_t->module~self_domaindecomposition module~self_mesh_2d_t->module~self_lagrange~3 module~self_mesh_2d_t->module~self_supportroutines module~self_mesh_2d_t->module~self_quadrature module~self_mesh_2d_t->module~self_hdf5 module~self_mesh_2d_t->HDF5 module~self_mesh SELF_Mesh module~self_mesh_2d_t->module~self_mesh module~self_supportroutines->module~self_constants module~self_supportroutines->iso_fortran_env module~self_vector_2d_t SELF_Vector_2D_t module~self_vector_2d~2->module~self_vector_2d_t module~self_data->iso_c_binding module~self_data->module~self_constants module~self_data->FEQParse module~self_data->module~self_lagrange~3 module~self_data->module~self_metadata module~self_data->module~self_hdf5 module~self_data->HDF5 module~self_domaindecomposition_t->iso_c_binding module~self_domaindecomposition_t->module~self_constants module~self_domaindecomposition_t->module~self_lagrange~3 module~self_domaindecomposition_t->module~self_supportroutines mpi mpi module~self_domaindecomposition_t->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_hdf5->module~self_constants module~self_hdf5->iso_fortran_env module~self_hdf5->HDF5 module~self_hdf5->mpi module~self_vector_2d_t->iso_c_binding module~self_vector_2d_t->module~self_constants 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_metadata module~self_vector_2d_t->module~self_hdf5 module~self_vector_2d_t->HDF5 module~self_mesh->iso_c_binding module~self_mesh->module~self_constants module~self_mesh->module~self_domaindecomposition

Contents

Interfaces

Derived Types

Subroutines


Interfaces

interface

  • public subroutine ContravariantWeight_2D_gpu(f, dsdx, jaf, N, nvar, nel) bind(c,name="0")

    Arguments

    TypeIntentOptionalAttributesName
    type(c_ptr), value:: f
    type(c_ptr), value:: dsdx
    type(c_ptr), value:: jaf
    integer(kind=c_int), value:: N
    integer(kind=c_int), value:: nvar
    integer(kind=c_int), value:: nel

interface

  • public subroutine NormalWeight_2D_gpu(fb, nhat, nscale, fbn, N, nvar, nel) bind(c,name="0")

    Arguments

    TypeIntentOptionalAttributesName
    type(c_ptr), value:: fb
    type(c_ptr), value:: nhat
    type(c_ptr), value:: nscale
    type(c_ptr), value:: fbn
    integer(kind=c_int), value:: N
    integer(kind=c_int), value:: nvar
    integer(kind=c_int), value:: nel

Derived Types

type, public, extends(MappedScalar2D_t) :: MappedScalar2D

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.
integer, public :: halo_inflight =0
integer, public :: halo_nactive =0
type(c_ptr), public :: halo_recvbuf_gpu =c_null_ptr
integer, public, allocatable:: halo_reqs(:)
type(c_ptr), public :: halo_sendbuf_gpu =c_null_ptr
logical, public :: halo_static_done =.false.
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:):: interior
type(Lagrange), public, pointer:: interp
type(c_ptr), public :: jas_gpu
type(Metadata), public, allocatable:: meta(:)
real(kind=prec), public, allocatable, dimension(:,:,:,:):: mortarBuff
type(c_ptr), public :: mortarBuff_gpu =c_null_ptr
integer, public :: nElem
integer, public :: nVar

Type-Bound Procedures

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_MappedScalar2D
generic, public :: Gradient => Gradient_Scalar2D_t
generic, public :: GridInterp => GridInterp_Scalar2D_t
procedure, public :: Init => Init_MappedScalar2D
procedure, private :: MPIMortarExchangeAsync => MPIMortarExchangeAsync_MappedScalar2D
generic, public :: MappedDGGradient => MappedDGGradient_MappedScalar2D_t, MappedDGGradient_MappedScalar2D
procedure, private :: MappedDGGradient_MappedScalar2D
generic, public :: MappedGradient => MappedGradient_MappedScalar2D_t, MappedGradient_MappedScalar2D
procedure, private :: MappedGradient_MappedScalar2D
procedure, public :: MortarExchange => MortarExchange_MappedScalar2D
procedure, public :: SetDescription => SetDescription_DataObj
generic, public :: SetEquation => SetEquation_DataObj
procedure, public :: SetInteriorFromEquation => SetInteriorFromEquation_MappedScalar2D
procedure, public :: SetName => SetName_DataObj
procedure, public :: SetUnits => SetUnits_DataObj
procedure, public :: SideExchange => SideExchange_MappedScalar2D
procedure, public :: SideExchangeFinish => SideExchangeFinish_MappedScalar2D
procedure, public :: SideExchangeStart => SideExchangeStart_MappedScalar2D
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 Free_MappedScalar2D(this)

Arguments

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

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

Arguments

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

public subroutine MPIMortarExchangeAsync_MappedScalar2D(this, mesh)

GPU-resident analogue of the base-class mortar message posting; messages are posted on device memory (GPU-aware MPI), following MPIExchangeAsync.

Arguments

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

public subroutine MappedDGGradient_MappedScalar2D(this, df)

Arguments

TypeIntentOptionalAttributesName
class(MappedScalar2D), intent(inout) :: this
type(c_ptr), intent(inout) :: df

public subroutine MappedGradient_MappedScalar2D(this, df)

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

Arguments

TypeIntentOptionalAttributesName
class(MappedScalar2D), intent(inout) :: this
type(c_ptr), intent(out) :: df

public subroutine MortarExchange_MappedScalar2D(this, mesh)

GPU implementation of the mortar exchange (see the base class for the algorithm) : traces are staged, reoriented, restricted, and projected in device memory with the SELF_Mortar kernels.

Arguments

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

public subroutine SetInteriorFromEquation_MappedScalar2D(this, geometry, time)

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

Arguments

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

public subroutine SideExchangeFinish_MappedScalar2D(this, mesh)

Complete the aggregated halo exchange started by SideExchangeStart: wait on the persistent requests and unpack the received traces into extBoundary, applying side flips. The host blocks in MPI_Waitall (which also drives MPI progress) while previously launched device kernels continue to execute. No-op if no exchange is in flight.

Arguments

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

public subroutine SideExchangeStart_MappedScalar2D(this, mesh, nactive)

Begin the aggregated halo exchange and launch the local (same-rank) side exchange kernel.

Read more…

Arguments

TypeIntentOptionalAttributesName
class(MappedScalar2D), intent(inout) :: this
type(Mesh2D), intent(inout) :: mesh
integer, intent(in), optional :: nactive

public subroutine SideExchange_MappedScalar2D(this, mesh)

Arguments

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