tem_variable_evaltype_test Program

Uses

This unit test tests the different evaluation types for user defined variables.


Calls

program~~tem_variable_evaltype_test~~CallsGraph program~tem_variable_evaltype_test tem_variable_evaltype_test proc~load_env load_env program~tem_variable_evaltype_test->proc~load_env interface~positionofval~4 positionofval program~tem_variable_evaltype_test->interface~positionofval~4 proc~tem_varsys_init tem_varSys_init program~tem_variable_evaltype_test->proc~tem_varsys_init interface~tem_variable_load tem_variable_load program~tem_variable_evaltype_test->interface~tem_variable_load proc~tem_varsys_append_luavar tem_varSys_append_luaVar program~tem_variable_evaltype_test->proc~tem_varsys_append_luavar proc~fin_env fin_env program~tem_variable_evaltype_test->proc~fin_env proc~open_config_chunk open_config_chunk program~tem_variable_evaltype_test->proc~open_config_chunk interface~tem_logging_init tem_logging_init program~tem_variable_evaltype_test->interface~tem_logging_init proc~close_config close_config program~tem_variable_evaltype_test->proc~close_config proc~tem_create_subtree_of_st_funlist tem_create_subTree_of_st_funList program~tem_variable_evaltype_test->proc~tem_create_subtree_of_st_funlist 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 proc~posofval_label posofval_label interface~positionofval~4->proc~posofval_label interface~init~20 init proc~tem_varsys_init->interface~init~20 proc~tem_variable_load_vector tem_variable_load_vector interface~tem_variable_load->proc~tem_variable_load_vector proc~tem_variable_load_single tem_variable_load_single interface~tem_variable_load->proc~tem_variable_load_single proc~tem_varsys_append_luavar->interface~positionofval~4 proc~tem_varsys_append_opervar tem_varSys_append_operVar proc~tem_varsys_append_luavar->proc~tem_varsys_append_opervar interface~tem_varsys_append_stfun tem_varSys_append_stfun proc~tem_varsys_append_luavar->interface~tem_varsys_append_stfun mpi_finalize mpi_finalize proc~fin_env->mpi_finalize 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 proc~tem_create_subtree_of tem_create_subTree_of proc~tem_create_subtree_of_st_funlist->proc~tem_create_subtree_of proc~tem_horizontalspacer tem_horizontalSpacer proc~tem_create_subtree_of_st_funlist->proc~tem_horizontalspacer

Contents


Variables

TypeAttributesNameInitial
character, parameter:: nl =C_NEW_LINE
character(len=solSpecLen), parameter:: sysConf ='function varfun(x, y, z, t)'//nl//'  return 5'//nl//'end'//nl//'firstelem = {'//nl//'  kind = "canoND",'//nl//'  object = {'//nl//'    origin = {0.25, 0.25, 0.25}'//nl//'  }'//nl//'}'//nl//'variable = {'//nl//'  {'//nl//'    name = "3",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    st_fun = {'//nl//'      { const = {1} },'//nl//'      { const = {2} }'//nl//'    }'//nl//'  },'//nl//'  {'//nl//'    name = "explicitly_3",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    evaltype = "add",'//nl//'    st_fun = {'//nl//'      { const = {1} },'//nl//'      { const = {2} }'//nl//'    }'//nl//'  },'//nl//'  {'//nl//'    name = "just_2",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    evaltype = "first",'//nl//'    st_fun = {'//nl//'      { const = {1} },'//nl//'      { const = {2} }'//nl//'    }'//nl//'  },'//nl//'  {'//nl//'    name = "shaped_3",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    evaltype = "add",'//nl//'    st_fun = {'//nl//'      {'//nl//'        const = {1},'//nl//'        shape = firstelem'//nl//'      },'//nl//'      { const = {2} }'//nl//'    }'//nl//'  },'//nl//'  {'//nl//'    name = "shaped_reverse_3",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    evaltype = "add",'//nl//'    st_fun = {'//nl//'      { const = {2} },'//nl//'      {'//nl//'        const = {1},'//nl//'        shape = firstelem'//nl//'      }'//nl//'    }'//nl//'  },'//nl//'  {'//nl//'    name = "var_5",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    evaltype = "add",'//nl//'    st_fun = {'//nl//'      {'//nl//'        fun = varfun,'//nl//'        shape = firstelem'//nl//'      },'//nl//'      { const = 2 }'//nl//'    }'//nl//'  },'//nl//'  {'//nl//'    name = "var_5_reverse",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    evaltype = "add",'//nl//'    st_fun = {'//nl//'      { const = 2 },'//nl//'      {'//nl//'        fun = varfun,'//nl//'        shape = firstelem'//nl//'      }'//nl//'    }'//nl//'  },'//nl//'  {'//nl//'    name = "first_5",'//nl//'    ncomponents = 1,'//nl//'    vartype = "st_fun",'//nl//'    evaltype = "first",'//nl//'    st_fun = {'//nl//'      {'//nl//'        fun = varfun,'//nl//'        shape = firstelem'//nl//'      },'//nl//'      { const = 2 }'//nl//'    }'//nl//'  }'//nl//'}'//nl
integer :: nComponents
integer :: nDofs
integer :: nElemsToTrack
integer :: pos
type(solver_type), target:: solver
type(tem_varSys_type) :: varSys
type(tem_st_fun_linkedList_type) :: st_funList
type(tem_variable_type), allocatable:: newVar(:)
real(kind=rk), allocatable:: res(:)
integer, allocatable:: vError(:)

Derived Types

type :: solver_type

Components

TypeVisibilityAttributesNameInitial
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