tem_aux_module

Some auxilary routines, providing frequently needed common tasks.

Uses

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

tem_aux_module		w	hvs_ascii_module
		w
		w	hvs_aux_module
		w
		w	hvs_output_module
		w
		w	hvs_vtk_module
		w
		w	hvs_vtk_module
		w
		w	tem_acoustic_pulse_module
		w
		w	tem_adaptation_config_module
		w
		w	tem_balance_module
		w
		w	tem_bc_header_module
		w
		w	tem_bc_module
		w
		w	tem_bc_prop_module
		w
		w	tem_canonicalND_module
		w
		w	tem_color_prop_module
		w
		w	tem_comm_module
		w
		w	tem_compteFaceRules_module
		w
		w	tem_condition_module
		w
		w	tem_construction_module
		w
		w	tem_convergence_module
		w
		w	tem_coupling_module
		w
		w	tem_cube_module
		w
		w	tem_cylinder_module
		w
		w	tem_cylindricalWave_module
		w
		w	tem_cylindricalWave_module
		w
		w	tem_depend_module
		w
		w	tem_derived_module
		w
		w	tem_ellipsoid_module
		w
		w	tem_face_module
		w
		w	tem_general_module
		w
		w	tem_global_module
		w
		w	tem_heaviside_gibbs_fun_module
		w
		w	tem_ic_predefs_module
		w
		w	tem_ini_condition_module
		w
	w	tem_logical_operation_var_module
	w
	w	tem_math_module
	w
	w	tem_matrix_module
	w
	w	tem_meshInfo_module
	w
	w	tem_miescatter_module
	w
	w	tem_miescatter_module
	w
	w	tem_operation_var_module
	w
	w	tem_pmlLayer_module
	w
	w	tem_pointData_module
	w
	w	tem_polygon_material_module
	w
	w	tem_reduction_spatial_module
	w
	w	tem_reduction_transient_module
	w
	w	tem_restart_module
	w
	w	tem_shape_module
	w
	w	tem_spacetime_fun_module
	w
	w	tem_spacetime_var_module
	w
	w	tem_Sparta_module
	w
	w	tem_spatial_module
	w
	w	tem_sphere_module
	w
	w	tem_spongeLayer_module
	w
	w	tem_stencil_module
	w
	w	tem_stl_module
	w
	w	tem_stlb_io_module
	w
	w	tem_subres_prop_module
	w
	w	tem_subTree_module
	w
	w	tem_subTree_type_module
	w
	w	tem_surfaceData_module
	w
	w	tem_temporal_module
	w
	w	tem_timer_module
	w
	w	tem_tracking_module
	w
	w	tem_trackmem_module
	w
	w	tem_transformation_module
	w
	w	tem_triangle_module
	w
	w	tem_variable_module
	w
	w	tem_varSys_module
	w
	w	treelmesh_module
	w

Help

Functions

public function tem_global_vmhwm() result(hwm)

Obtain the memory status from all processes (min, max, avg).

Arguments

None

Return Value real(kind=rk), (3)

public function utc_date_string() result(dat_string)

Function to create a human readable UTC date string.

Arguments

None

Return Value character(len=26)

Subroutines

public subroutine tem_open_distconf(L, fileName, proc)

Read a Lua file on the first process and distribute it to all.

Arguments

Type	Intent		Name
type(flu_State)		::	L
character(len=*),	intent(in)	::	fileName
type(tem_comm_env_type),	intent(in)	::	proc	Process description to use.

public subroutine tem_open_distconf_array(L, fileName, proc)

Open an array of Lua handles.

Arguments

Type	Intent		Name
type(flu_State)		::	L(:)
character(len=*),	intent(in)	::	fileName
type(tem_comm_env_type)		::	proc

public subroutine tem_open(file, unit, newunit, status, position, action, form, access, recl)

Wrapper around Fortran open of files to take care of errors and improve the error message in case the opening goes wrong.

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	file
integer,	intent(in),	optional	::	unit
integer,	intent(out),	optional	::	newunit
character(len=*),	intent(in),	optional	::	status
character(len=*),	intent(in),	optional	::	position
character(len=*),	intent(in),	optional	::	action
character(len=*),	intent(in),	optional	::	form
character(len=*),	intent(in),	optional	::	access
integer,	intent(in),	optional	::	recl

public subroutine tem_abort(errorMsg)

Abort the program with finalization of the environment

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in),	optional		::	errorMsg	An optional error message to print a reason for the abort.

public subroutine tem_unit_close(me)

Check, if a unit is open, and close it

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	me	the restart type to close

public subroutine tem_checkLabel(label, nLabels)

check whether the current label is already given

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	label(:)	holding array of labels with label(n) contains current label
integer,	intent(in)			::	nLabels	Number of schemes already existing in the scheme array (they are being added currently, so we only have to compare against the ones coming before the current one, up to nSchemes-1)

public subroutine tem_print_execInfo()

Print information of the executable

Arguments

None

public subroutine check_mpi_error(iError, event_string)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	iError
character(len=*),	intent(in)			::	event_string

tem_aux_module Module

Contents

Functions

Subroutines

Uses

Used by

Functions

public function tem_global_vmhwm() result(hwm)

Arguments

Return Value real(kind=rk), (3)

public function utc_date_string() result(dat_string)

Arguments

Return Value character(len=26)

Subroutines

public subroutine tem_open_distconf(L, fileName, proc)

Arguments

public subroutine tem_open_distconf_array(L, fileName, proc)

Arguments

public subroutine tem_open(file, unit, newunit, status, position, action, form, access, recl)

Arguments

public subroutine tem_abort(errorMsg)

Arguments

public subroutine tem_unit_close(me)

Arguments

public subroutine tem_checkLabel(label, nLabels)

Arguments

public subroutine tem_print_execInfo()

Arguments

public subroutine check_mpi_error(iError, event_string)

Arguments