tem_spacetime_fun_type Derived Type

type, public :: tem_spacetime_fun_type

Contains space time function definition


Components

Type Visibility Attributes Name Initial
character(len=labelLen), public :: fun_kind

The function kind

Should be either:

  • 'none': Not defined at all
  • 'const': Constant for all (x,y,z,t)
  • 'combined': This returns spatial(x,y,z)*temporal(t)
  • 'lua_fun': Function defined in the Lua script
  • Add predefined functions here
type(tem_shape_type), public, allocatable :: geom(:)

spatial restrictions
type(tem_subTree_type), public :: subTree

subTree build from the shapes
integer, public :: nComps

Number of components
real(kind=rk), public, allocatable :: const(:)

constant value for nComponents
type(tem_spatial_type), public :: spatial

Description of composite spatial fun
type(tem_temporal_type), public :: temporal

Composite temporal fun
type(flu_State), public :: conf

Lua state handle to evaluate space time Lua function
integer, public :: lua_fun_ref = 0

Reference to the Lua function, if the st_fun is a Lua function.
type(tem_polygon_material_type), public :: polygon_material

type for the movement of the polygon
type(tem_miescatter_field_type), public :: mie_fun

Space-time function for Mie-series solution of electrodynamic scattering at dielectric sphere.
type(tem_cylindricalWave_type), public :: cylindricalWave

type for a scalar cylindrical wave.
type(tem_acoustic_pulse_type), public :: acoustic_pulse

Description of an acoustic pulse.
type(tem_aps_coupling_type), public :: aps_coupling

Apesmate coupling description
type(tem_precice_coupling_type), public :: precice_coupling

preCICE coupling description

Source Code

  type tem_spacetime_fun_type
    !> The function kind
    !!
    !! Should be either:
    !!
    !! - 'none': Not defined at all
    !! - 'const': Constant for all (x,y,z,t)
    !! - 'combined': This returns spatial(x,y,z)*temporal(t)
    !! - 'lua_fun': Function defined in the Lua script
    !! - Add predefined functions here
    character(len=labelLen) :: fun_kind

    !> spatial restrictions
    type(tem_shape_type), allocatable :: geom(:)

    !> subTree build from the shapes
    type(tem_subTree_type) :: subTree

    !> Number of components
    integer :: nComps

    !> constant value for nComponents
    real(kind=rk), allocatable :: const(:)

    !> Description of composite spatial fun
    type(tem_spatial_type) :: spatial

    !> Composite temporal fun
    type(tem_temporal_type) :: temporal

    !> Lua state handle to evaluate space time Lua function
    type(flu_State) :: conf

    !> Reference to the Lua function, if the st_fun is a Lua function.
    integer :: lua_fun_ref = 0

    !> type for the movement of the polygon
    type(tem_polygon_material_type) :: polygon_material
    !> Space-time function for Mie-series solution
    !! of electrodynamic scattering at dielectric sphere.
    type(tem_miescatter_field_type) :: mie_fun

    !> type for a scalar cylindrical wave.
    type(tem_cylindricalWave_type) :: cylindricalWave

    !> Description of an acoustic pulse.
    type(tem_acoustic_pulse_type) :: acoustic_pulse

    !> Apesmate coupling description
    type(tem_aps_coupling_type) :: aps_coupling

    !> preCICE coupling description
    type(tem_precice_coupling_type) :: precice_coupling
  end type tem_spacetime_fun_type