SELF_Tensor_3D Module


Uses

  • module~~self_tensor_3d~2~~UsesGraph module~self_tensor_3d~2 SELF_Tensor_3D iso_c_binding iso_c_binding module~self_tensor_3d~2->iso_c_binding module~self_gpu SELF_GPU module~self_tensor_3d~2->module~self_gpu module~self_constants SELF_Constants module~self_tensor_3d~2->module~self_constants iso_fortran_env iso_fortran_env module~self_tensor_3d~2->iso_fortran_env module~self_tensor_3d_t SELF_Tensor_3D_t module~self_tensor_3d~2->module~self_tensor_3d_t module~self_gpu->iso_c_binding module~self_gpu_enums~2 SELF_GPU_enums module~self_gpu->module~self_gpu_enums~2 module~self_constants->iso_c_binding module~self_constants->iso_fortran_env module~self_tensor_3d_t->iso_c_binding module~self_tensor_3d_t->module~self_constants module~self_data SELF_Data module~self_tensor_3d_t->module~self_data module~self_lagrange~2 SELF_Lagrange module~self_tensor_3d_t->module~self_lagrange~2 module~self_metadata SELF_Metadata module~self_tensor_3d_t->module~self_metadata module~self_hdf5 SELF_HDF5 module~self_tensor_3d_t->module~self_hdf5 module~self_datapool SELF_DataPool module~self_tensor_3d_t->module~self_datapool HDF5 HDF5 module~self_tensor_3d_t->HDF5 FEQParse FEQParse module~self_tensor_3d_t->FEQParse module~self_gpu_enums~2->iso_c_binding module~self_data->iso_c_binding module~self_data->module~self_constants module~self_data->module~self_lagrange~2 module~self_data->module~self_metadata module~self_data->module~self_hdf5 module~self_data->HDF5 module~self_data->FEQParse module~self_lagrange~2->iso_c_binding module~self_lagrange~2->module~self_gpu module~self_lagrange~2->module~self_constants module~self_lagrange~2->iso_fortran_env module~self_lagrange_t SELF_Lagrange_t module~self_lagrange~2->module~self_lagrange_t 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 mpi mpi module~self_hdf5->mpi module~self_datapool->module~self_constants 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_hdf5 module~self_lagrange_t->HDF5 module~self_supportroutines SELF_SupportRoutines module~self_lagrange_t->module~self_supportroutines module~self_quadrature SELF_Quadrature module~self_lagrange_t->module~self_quadrature module~self_supportroutines->module~self_constants module~self_supportroutines->iso_fortran_env module~self_quadrature->module~self_constants module~self_quadrature->iso_fortran_env

Used by

  • module~~self_tensor_3d~2~~UsedByGraph module~self_tensor_3d~2 SELF_Tensor_3D module~self_geometry_3d SELF_Geometry_3D module~self_geometry_3d->module~self_tensor_3d~2 module~self_mappedscalar_3d_t SELF_MappedScalar_3D_t module~self_mappedscalar_3d_t->module~self_tensor_3d~2 module~self_mappedscalar_3d_t->module~self_geometry_3d module~self_columnoperators_3d SELF_ColumnOperators_3D module~self_columnoperators_3d->module~self_geometry_3d module~self_columnoperators_3d_t SELF_ColumnOperators_3D_t module~self_columnoperators_3d->module~self_columnoperators_3d_t module~self_mappedscalar_3d~2 SELF_MappedScalar_3D module~self_mappedscalar_3d~2->module~self_mappedscalar_3d_t module~self_ecadvection3d SELF_ECAdvection3D module~self_ecadvection3d->module~self_geometry_3d module~self_ecdgmodel3d_t SELF_ECDGModel3D_t module~self_ecadvection3d->module~self_ecdgmodel3d_t module~self_ecadvection3d_t SELF_ECAdvection3D_t module~self_ecadvection3d->module~self_ecadvection3d_t module~self_mappedtwopointvector_3d_t SELF_MappedTwoPointVector_3D_t module~self_mappedtwopointvector_3d_t->module~self_geometry_3d module~self_dgmodel3d~2 SELF_DGModel3D module~self_dgmodel3d~2->module~self_geometry_3d module~self_dgmodel3d_t SELF_DGModel3D_t module~self_dgmodel3d~2->module~self_dgmodel3d_t module~self_mappedvector_3d_t SELF_MappedVector_3D_t module~self_mappedvector_3d_t->module~self_geometry_3d module~self_points SELF_Points module~self_points->module~self_geometry_3d module~self_points->module~self_mappedscalar_3d~2 module~self_points_t SELF_Points_t module~self_points->module~self_points_t module~self_dgmodel3d_t->module~self_geometry_3d module~self_dgmodel3d_t->module~self_mappedscalar_3d~2 module~self_mappedvector_3d SELF_MappedVector_3D module~self_dgmodel3d_t->module~self_mappedvector_3d module~self_amrcontroller_3d SELF_AMRController_3D module~self_amrcontroller_3d->module~self_geometry_3d module~self_amrcontroller_3d->module~self_dgmodel3d_t module~self_columnoperators_3d_t->module~self_geometry_3d module~self_points_t->module~self_geometry_3d module~self_points_t->module~self_mappedscalar_3d~2 module~self_esatmo3d~2 SELF_ESAtmo3D module~self_esatmo3d~2->module~self_geometry_3d module~self_esatmo3d_t SELF_ESAtmo3D_t module~self_esatmo3d~2->module~self_esatmo3d_t module~self_esatmo3d~2->module~self_ecdgmodel3d_t module~self_mappedscalar_3d SELF_MappedScalar_3D module~self_mappedscalar_3d->module~self_mappedscalar_3d_t module~self_columnoperators_3d~2 SELF_ColumnOperators_3D module~self_columnoperators_3d~2->module~self_columnoperators_3d_t module~self_esatmo3d_t->module~self_mappedscalar_3d~2 module~self_ecdgmodel3d SELF_ECDGModel3D module~self_esatmo3d_t->module~self_ecdgmodel3d module~self_mappedtwopointvector_3d~2 SELF_MappedTwoPointVector_3D module~self_mappedtwopointvector_3d~2->module~self_mappedtwopointvector_3d_t module~self_nulldgmodel3d_t self_NullDGModel3D_t module~self_nulldgmodel3d_t->module~self_dgmodel3d~2 module~self_lineareuler3d_t self_LinearEuler3D_t module~self_lineareuler3d_t->module~self_dgmodel3d~2 module~self_mappedtwopointvector_3d SELF_MappedTwoPointVector_3D module~self_mappedtwopointvector_3d->module~self_mappedtwopointvector_3d_t module~self_advection_diffusion_3d_t self_advection_diffusion_3d_t module~self_advection_diffusion_3d_t->module~self_dgmodel3d~2 module~self_ecdgmodel3d_t->module~self_dgmodel3d~2 module~self_ecdgmodel3d_t->module~self_mappedtwopointvector_3d~2 module~self_mappedvector_3d->module~self_mappedvector_3d_t module~self_mappedvector_3d~2 SELF_MappedVector_3D module~self_mappedvector_3d~2->module~self_mappedvector_3d_t module~self_dgmodel3d SELF_DGModel3D module~self_dgmodel3d->module~self_dgmodel3d_t module~self_points~2 SELF_Points module~self_points~2->module~self_points_t module~self_esatmo3d SELF_ESAtmo3D module~self_esatmo3d->module~self_esatmo3d_t module~self_lineareuler3d~2 self_LinearEuler3D module~self_lineareuler3d~2->module~self_lineareuler3d_t module~self_nulldgmodel3d self_NullDGModel3D module~self_nulldgmodel3d->module~self_nulldgmodel3d_t module~self_lineareuler3d self_LinearEuler3D module~self_lineareuler3d->module~self_lineareuler3d_t module~self_nulldgmodel3d~2 self_NullDGModel3D module~self_nulldgmodel3d~2->module~self_nulldgmodel3d_t module~self_advection_diffusion_3d self_advection_diffusion_3d module~self_advection_diffusion_3d->module~self_advection_diffusion_3d_t module~self_advection_diffusion_3d~2 self_advection_diffusion_3d module~self_advection_diffusion_3d~2->module~self_advection_diffusion_3d_t module~self_ecdgmodel3d->module~self_ecdgmodel3d_t module~self_ecdgmodel3d~2 SELF_ECDGModel3D module~self_ecdgmodel3d~2->module~self_ecdgmodel3d_t module~self_ecadvection3d_t->module~self_ecdgmodel3d module~self_ecadvection3d~2 SELF_ECAdvection3D module~self_ecadvection3d~2->module~self_ecadvection3d_t

Contents


Derived Types

type, public, extends(Tensor3D_t) :: Tensor3D

Components

TypeVisibilityAttributesNameInitial
integer, public :: M
integer, public :: N
integer(kind=c_size_t), public :: alloc_boundary =0
integer(kind=c_size_t), public :: alloc_extBoundary =0
integer(kind=c_size_t), public :: alloc_interior =0
character(len=3), public :: backend ="gpu"
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:,:,:):: boundary
type(c_ptr), public :: boundary_gpu
type(EquationParser), public, allocatable:: eqn(:)
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:,:,:):: extBoundary

High-water-mark backing store for the arrays above (AMR Stage 6b/6c; 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(c_ptr), public :: extBoundary_gpu

Bytes currently allocated for each device buffer, so Resize can reuse them (Stage 6b/6c).

real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:,:,:):: interior
type(c_ptr), public :: interior_gpu
type(Lagrange), public, pointer:: interp
type(Metadata), public, allocatable:: meta(:)
integer, public :: nElem
integer, public :: nVar
real(kind=prec), public, pointer, contiguous:: pool_boundary(:)=> null()
real(kind=prec), public, pointer, contiguous:: pool_extBoundary(:)=> null()
real(kind=prec), public, pointer, contiguous:: pool_interior(:)=> null()

Type-Bound Procedures

procedure, public :: BoundaryInterp => BoundaryInterp_Tensor3D_t
generic, public :: Determinant => Determinant_Tensor3D_t
procedure, public :: Free => Free_Tensor3D
procedure, public :: Init => Init_Tensor3D
procedure, public :: MapArrays => MapArrays_Tensor3D_t
procedure, public :: Resize => Resize_Tensor3D
procedure, public :: SetDescription => SetDescription_DataObj
generic, public :: SetEquation => SetEquation_DataObj
procedure, public :: SetName => SetName_DataObj
procedure, public :: SetUnits => SetUnits_DataObj
procedure, public :: UpdateDevice => UpdateDevice_Tensor3D
procedure, public :: UpdateHost => UpdateHost_Tensor3D

Subroutines

public subroutine EnsureDeviceBuffers_Tensor3D(this)

Grow each device buffer to hold the current logical array, reusing the existing allocation when the bytes already fit (AMR Stage 6b/6c). A device pointer carries no shape, so only byte capacity has to be tracked.

Arguments

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

public subroutine Free_Tensor3D(this)

Arguments

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

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

Arguments

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

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

Rebind to a new element count, reusing host pools and device buffers where they fit. Deliberately does NOT call UpdateDevice: Init uploads freshly zeroed arrays, which is pure waste in the adaptive loop because the arrays are rewritten immediately after.

Arguments

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

public subroutine UpdateDevice_Tensor3D(this)

Arguments

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

public subroutine UpdateHost_Tensor3D(this)

Arguments

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