tem_spacetime_fun_test Program

  1. tem_spacetime_fun_test.f90
  2. tem_spacetime_fun_test

Uses

This UTEST is to test variable system. load variables and access state and derive quantities from c pointer methoddata


Calls

program~~tem_spacetime_fun_test~~CallsGraph program~tem_spacetime_fun_test tem_spacetime_fun_test proc~load_env load_env program~tem_spacetime_fun_test->proc~load_env proc~fin_env fin_env program~tem_spacetime_fun_test->proc~fin_env interface~tem_load_spacetime tem_load_spacetime program~tem_spacetime_fun_test->interface~tem_load_spacetime proc~open_config_chunk open_config_chunk program~tem_spacetime_fun_test->proc~open_config_chunk interface~tem_logging_init tem_logging_init program~tem_spacetime_fun_test->interface~tem_logging_init proc~close_config close_config program~tem_spacetime_fun_test->proc~close_config proc~load_env->proc~open_config_chunk proc~load_env->proc~close_config proc~tem_start tem_start proc~load_env->proc~tem_start proc~tem_logging_load_primary tem_logging_load_primary proc~load_env->proc~tem_logging_load_primary proc~tem_load_general tem_load_general proc~load_env->proc~tem_load_general proc~load_tem_bc_prop load_tem_BC_prop proc~load_env->proc~load_tem_bc_prop proc~load_tem load_tem proc~load_env->proc~load_tem mpi_finalize mpi_finalize proc~fin_env->mpi_finalize proc~tem_load_spacetime_single tem_load_spacetime_single interface~tem_load_spacetime->proc~tem_load_spacetime_single proc~tem_load_spacetime_table tem_load_spacetime_table interface~tem_load_spacetime->proc~tem_load_spacetime_table proc~tem_logging_init_primary tem_logging_init_primary interface~tem_logging_init->proc~tem_logging_init_primary proc~tem_logging_init_logger tem_logging_init_logger interface~tem_logging_init->proc~tem_logging_init_logger

Contents

Variables

Derived Types


Variables

TypeAttributesNameInitial
character, parameter:: nl =C_NEW_LINE
character(len=solSpecLen), parameter:: stfun_Conf ='function luafun_vector(x,y,z,t)'//nl//'  return {x,y,z}'//nl//'end'//nl//'function luafun_scalar(x,y,z,t)'//nl//'  return x'//nl//'end'//nl//'shape = {'//nl//'  kind = "canoND",'//nl//'  object = {'//nl//'    origin = { 0.0, 0.5, 0.5 },'//nl//'    vec = { 1.0, 0.0, 0.0 }'//nl//'  }'//nl//'}'//nl//'e1 = {'//nl//'  kind = "canoND",'//nl//'  object = { origin = { 0.25, 0.25, 0.25 } }'//nl//'}'//nl//'e2 = {'//nl//'  kind = "canoND",'//nl//'  object = { origin = { 0.75, 0.25, 0.25 } }'//nl//'}'//nl//'scalar_fun = luafun_scalar'//nl//'scalar_const = 1.0'//nl//'vector_fun = luafun_vector'//nl//'vector_const = { 1.0, 2.0, 3.0 }'//nl//'vector_const_multitab = {'//nl//'  { 1.0, 2.0, 3.0},'//nl//'  { 4.0, 5.0, 6.0}'//nl//'}'//nl//'scalar_fun_shapeall = { fun = luafun_scalar }'//nl//'scalar_const_shapeall = { const = scalar_const }'//nl//'predefined_shapeall = {'//nl//'  predefined = "combined",'//nl//'  temporal = 1.0,'//nl//'  spatial = 1.0'//nl//'}'//nl//'scalar_fun_shape = {'//nl//'  fun = luafun_scalar,'//nl//'  shape = shape'//nl//'}'//nl//'scalar_const_shape = { const = 1.0, shape = shape }'//nl//'vector_fun_shape = {'//nl//'  fun = luafun_vector,'//nl//'  shape = shape'//nl//'}'//nl//'vector_const_shape = {'//nl//'  const = { 1.0, 2.0, 3.0 },'//nl//'  shape = shape'//nl//'}'//nl//'predefined_shape = {'//nl//'  predefined = "combined",'//nl//'  temporal = 1.0,'//nl//'  spatial = scalar_fun,'//nl//'  shape = shape'//nl//'}'//nl//'predefined_vec_shape = {'//nl//'  predefined = "combined",'//nl//'  temporal = 1.0,'//nl//'  spatial = {1.0,2.0,3.0},'//nl//'  shape = shape'//nl//'}'//nl//'predefined_subtable_vec_shape = {'//nl//'  predefined = {'//nl//'    "combined",'//nl//'    temporal = 1.0,'//nl//'    spatial = {1.0,2.0,3.0},'//nl//'    shape = shape'//nl//'  }'//nl//'}'//nl//'st_fun_singleTab = { scalar_fun }'//nl//'st_fun_singleTab_shape = {'//nl//'  fun=scalar_fun,'//nl//'  shape=shape'//nl//'}'//nl//'st_fun_multiTab = { { fun=scalar_fun } }'//nl//'st_fun_const = {'//nl//'  scalar_const,'//nl//'  scalar_const*2,'//nl//'  scalar_const*3'//nl//'}'//nl//'st_fun_vec_const = {'//nl//'  vector_const,'//nl//'  vector_const,'//nl//'  vector_const'//nl//'}'//nl//'st_fun_2_s = {'//nl//'  scalar_fun,'//nl//'  scalar_fun,'//nl//'  predefined_shape'//nl//'}'
type(flu_state) :: conf
type(solver_type), target:: solver
integer :: errorCode
integer :: iTest
integer :: i
logical :: res(23)
type(tem_spacetime_fun_type) :: density
type(tem_spacetime_fun_type) :: velocity
character(len=8) :: fi
character(len=8) :: fl

Derived Types

type :: solver_type

Components

TypeVisibilityAttributesNameInitial
integer, public :: nComps
integer, public :: nDofs
real(kind=rk), public, allocatable:: state(:)
type(treelmesh_type), public :: tree
type(tem_BC_prop_type), public :: boundary
type(tem_general_type), public :: general