Tensor3D Derived Type

  1. SELF_Tensor_3D.f90
  2. SELF_Tensor_3D
  3. Tensor3D

type, public, extends(Tensor3D_t) :: Tensor3D


Contents

Variables

Type-Bound Procedures

Source Code

Tensor3D

Components

TypeVisibilityAttributesNameInitial
integer, public :: M
integer, public :: N
character(len=3), public :: backend ="cpu"
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:,:,:):: boundary
type(EquationParser), public, allocatable:: eqn(:)
real(kind=prec), public, pointer, contiguous, dimension(:,:,:,:,:,:,:):: extBoundary
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, public :: BoundaryInterp => BoundaryInterp_Tensor3D_t

generic, public :: Determinant => Determinant_Tensor3D_t

  • public subroutine Determinant_Tensor3D_t(this, det)

    Arguments

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

procedure, public :: Free => Free_Tensor3D_t

  • public subroutine Free_Tensor3D_t(this)

    Arguments

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

procedure, public :: Init => Init_Tensor3D_t

  • public subroutine Init_Tensor3D_t(this, interp, nVar, nElem)

    Arguments

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

procedure, public :: SetDescription => SetDescription_DataObj

  • public subroutine SetDescription_DataObj(this, ivar, description)

    Set the description of the ivar-th variable

    Arguments

    TypeIntentOptionalAttributesName
    class(SELF_DataObj), intent(inout) :: this
    integer, intent(in) :: ivar
    character, intent(in) :: description

generic, public :: SetEquation => SetEquation_DataObj

  • public subroutine SetEquation_DataObj(this, ivar, eqnChar)

    Sets the equation parser for the ivar-th variable

    Arguments

    TypeIntentOptionalAttributesName
    class(SELF_DataObj), intent(inout) :: this
    integer, intent(in) :: ivar
    character, intent(in) :: eqnChar

procedure, public :: SetName => SetName_DataObj

  • public subroutine SetName_DataObj(this, ivar, name)

    Set the name of the ivar-th variable

    Arguments

    TypeIntentOptionalAttributesName
    class(SELF_DataObj), intent(inout) :: this
    integer, intent(in) :: ivar
    character, intent(in) :: name

procedure, public :: SetUnits => SetUnits_DataObj

  • public subroutine SetUnits_DataObj(this, ivar, units)

    Set the units of the ivar-th variable

    Arguments

    TypeIntentOptionalAttributesName
    class(SELF_DataObj), intent(inout) :: this
    integer, intent(in) :: ivar
    character, intent(in) :: units

procedure, public :: UpdateDevice => UpdateDevice_Tensor3D_t

procedure, public :: UpdateHost => UpdateHost_Tensor3D_t

Source Code

  type,extends(Tensor3D_t),public :: Tensor3D
    character(3) :: backend = "cpu"
  endtype Tensor3D