Data Types
type	med_info

Functions/Subroutines
subroutine	open_mesh_med (FILE_NAME, FILE_ID, OPEN_MODE, IERR, MESH_NUMBER)

subroutine	close_mesh_med (FILE_ID, IERR)

subroutine	open_bnd_med (FILE_NAME, FILE_ID, OPEN_MODE, IERR, MESH_NUMBER)

subroutine	close_bnd_med (FILE_ID, IERR, MESH_NUMBER)

subroutine	get_mesh_title_med (FILE_ID, TITLE, IERR)

subroutine	get_mesh_nelem_med (FILE_ID, TYPE_ELEM, NELEM, IERR)

subroutine	get_mesh_npoin_per_element_med (TYPE_ELEM, NDP, IERR)

subroutine	get_mesh_connectivity_med (FILE_ID, TYPE_ELEM, IKLE, NELEM, NDP, IERR)

subroutine	get_mesh_npoin_med (FILE_ID, TYPE_ELEM, NPOIN, IERR)

subroutine	get_mesh_dimension_med (FILE_ID, NDIM, IERR)

subroutine	get_mesh_coord_med (FILE_ID, JDIM, NDIM, NPOIN, COORD_AXE, IERR)

subroutine	get_mesh_l2g_numbering_med (FILE_ID, KNOLG, NPOIN, IERR)

subroutine	get_mesh_nptir_med (FILE_ID, NPTIR, IERR)

subroutine	get_mesh_orig_med (FILE_ID, X_ORIG, Y_ORIG, IERR)

subroutine	get_mesh_nplan_med (FILE_ID, NPLAN, IERR)

subroutine	get_mesh_date_med (FILE_ID, DATE, IERR)

subroutine	get_bnd_ipobo_med (FILE_ID, TYPE_ELEM_BND, NPOIN, IPOBO, IERR)

subroutine	get_bnd_numbering_med (FILE_ID, TYPE_ELEM_BND, NPTFR, NBOR, IERR)

subroutine	get_bnd_nelem_med (FILE_ID, TYPE_ELEM, BND_NELEM, IERR)

subroutine	get_bnd_connectivity_med (FILE_ID, TYPE_ELEM, NELEBD, NDP, BND_IKLE, IERR)

subroutine	get_bnd_grp_value_med (FILE_ID, GRP_NAME, VALUE, IERR)

subroutine	get_bnd_family_med (FILE_ID, TYPE_BND_ELEM, NELEBD, FAMILY, IERR)

subroutine	get_bnd_npoin_med (FILE_ID, TYPE_BND_ELEM, NPTFR, IERR)

subroutine	get_bnd_value_med (FILE_ID, TYPE_BND_ELEM, NELEBD, LIHBOR, LIUBOR, LIVBOR, TRAC, LITBOR, NPTFR, IERR)

subroutine	get_data_nvar_med (FILE_ID, NVAR, IERR)

subroutine	get_data_var_list_med (FILE_ID, NVAR, VAR_LIST, UNIT_LIST, IERR)

subroutine	get_data_ntimestep_med (FILE_ID, NTIMESTEP, IERR)

subroutine	get_data_time_med (FILE_ID, RECORD, TIME, IERR)

subroutine	get_data_value_med (FILE_ID, RECORD, VAR_NAME, RES_VALUE, N, IERR)

subroutine	set_header_med (FILE_ID, TITLE, IERR)

subroutine	set_mesh_med (FILE_ID, NB_DIM_PB, NB_DIM_MESH, TYPE_ELEM, NDP, NPTIR, NELEM, NPOIN, IKLE, KNOLG, COORD, NPLAN, DATE, TIME, X_ORIG, Y_ORIG, IERR)

subroutine	add_data_med (FILE_ID, VAR_NAME, TIME, RECORD, VAR_VALUE, N, IERR)

subroutine	transfer_group_info_common_med (SOURCE_ID, DEST_ID, MNAME_SRC, MNAME_DST, HAS_FAM_ON_POINT, IERR)

subroutine	transfer_group_part_info_med (SOURCE_ID, DEST_ID, TYP_BND_ELEM, IKLE_BND_DEST, NELEBD_DEST, NDP_DEST, NELEBD_SRC, KNOGL_BND, TRANS_POINT, NPOIN_SRC, NPOIN_DEST, KNOLG, IERR)

subroutine	transfer_group_info_med (SOURCE_ID, DEST_ID, TYP_ELEM, TYP_BND_ELEM, IKLE_BND, NELEBD, NDP, TRANS_ELEM, TRANS_POINT, IERR)

subroutine	set_bnd_med (FILE_ID, TYPE_BND_ELT, NELEBD, NDP, IKLE_BND, NPTFR, LIHBOR, LIUBOR, LIVBOR, LITBOR, IERR)

subroutine	update_data_mesh_med (FILE_ID, TIME, RECORD, NB_DIM_MESH, NPOIN, COORD, IERR)

subroutine	ifvector_ (STRING, COMP_NUM, ISVECTOR)

subroutine	convert_elem_type (TYPE_ELEM, TYPE_ELEM_MED, IERR)

subroutine	ndp_from_element_type_med (TYPE_ELEM_MED, NDP, IERR)

subroutine	identify_bnd_elmt (FILE_ID, TYPE_BND_ELEM, IERR)

subroutine	seg2point (P1, P2, BND_TYP_P1, BND_TYP_P2, POINT)

subroutine	point2seg (P1, P2, BND_TYP_P1, BND_TYP_P2, SEG)

Variables
integer, parameter	kid =K8

integer, dimension(max_file)	hash = 0

type(med_info), dimension(max_file)	med_obj_tab

integer, parameter	sol_bnd = 2

integer, parameter	offset = 1000

Function/Subroutine Documentation

◆ add_data_med()

subroutine utils_med::add_data_med	(	integer, intent(in)	FILE_ID,
		character(len=32), intent(in)	VAR_NAME,
		double precision, intent(in)	TIME,
		integer, intent(in)	RECORD,
		double precision, dimension(n), intent(in)	VAR_VALUE,
		integer, intent(in)	N,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	VAR_NAME	Name of the data
[out]	TIME	Physical time
[out]	RECORD	Iteration number
[out]	VAR_VALUE	Table of variable values
[out]	N	Number of elements
[in]	IERR	Error tag
[in]	n	[out] FILE_ID Med file descriptor
[out]	VAR_NAME	Name of the data
[out]	TIME	Physical time
[out]	RECORD	Iteration number
[out]	VAR_VALUE	Table of variable values
[out]	N	Number of elements
[in]	IERR	Error tag

Definition at line 3509 of file utils_med.F.

Here is the caller graph for this function:

◆ close_bnd_med()

subroutine utils_med::close_bnd_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	IERR,
		integer, intent(in), optional	MESH_NUMBER
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	IERR	Error tag
[in]	MESH_NUMBER	If present, this is the number of the part of

Definition at line 517 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ close_mesh_med()

subroutine utils_med::close_mesh_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	IERR	Error tag

Definition at line 296 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ convert_elem_type()

subroutine utils_med::convert_elem_type	(	integer, intent(in)	TYPE_ELEM,
		integer, intent(inout)	TYPE_ELEM_MED,
		integer, intent(out)	IERR
	)

Parameters

[in]	type_elem	[out] TYPE_ELEM Element type with slf format
[in]	TYPE_ELEM_MED	Element type with med format
[in]	IERR	Error tag

Definition at line 4584 of file utils_med.F.

Here is the caller graph for this function:

◆ get_bnd_connectivity_med()

subroutine utils_med::get_bnd_connectivity_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_ELEM,
		integer, intent(in)	NELEBD,
		integer, intent(in)	NDP,
		integer, dimension(nelebd*ndp), intent(inout)	BND_IKLE,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM	Type of the element in med format
[out]	NELEBD	Total number of elements
[out]	NDP	Number of nodes per element
[in]	BND_IKLE	Connectivity table of boundary elements
[in]	IERR	Error tag

Definition at line 2087 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_bnd_family_med()

subroutine utils_med::get_bnd_family_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_BND_ELEM,
		integer, intent(in)	NELEBD,
		integer, dimension(nelebd), intent(inout)	FAMILY,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_BND_ELEM	Type of the boundary element
[out]	NELEBD	Total number of boundary elements
[in]	FAMILY	Table of boundary element's family name
[in]	IERR	Error tag
[in]	type_bnd_elem	[out] FILE_ID Med file descriptor
[out]	TYPE_BND_ELEM	Type of the boundary element
[out]	NELEBD	Total number of boundary elements
[in]	FAMILY	Table of boundary element's family name
[in]	IERR	Error tag
[in]	nelebd	[out] FILE_ID Med file descriptor
[out]	TYPE_BND_ELEM	Type of the boundary element
[out]	NELEBD	Total number of boundary elements
[in]	FAMILY	Table of boundary element's family name
[in]	IERR	Error tag

Definition at line 2284 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_bnd_grp_value_med()

subroutine utils_med::get_bnd_grp_value_med	(	integer, intent(in)	FILE_ID,
		character(len=16), intent(in)	GRP_NAME,
		integer, intent(inout)	VALUE,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	GRP_NAME	Name of the family
[in]	VALUE	Value of the boundary conditions
[in]	IERR	Error tag

Definition at line 2203 of file utils_med.F.

◆ get_bnd_ipobo_med()

subroutine utils_med::get_bnd_ipobo_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_ELEM_BND,
		integer, intent(in)	NPOIN,
		integer, dimension(npoin), intent(inout)	IPOBO,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM_BND	Boundary element type in slf format
[out]	NPOIN	Total number of nodes
[in]	IPOBO	Logical table for boundary nodes
[in]	IERR	Error tag
[in]	type_elem_bnd	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM_BND	Boundary element type in slf format
[out]	NPOIN	Total number of nodes
[in]	IPOBO	Logical table for boundary nodes
[in]	IERR	Error tag
[in]	npoin	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM_BND	Boundary element type in slf format
[out]	NPOIN	Total number of nodes
[in]	IPOBO	Logical table for boundary nodes
[in]	IERR	Error tag

Definition at line 1484 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_bnd_nelem_med()

subroutine utils_med::get_bnd_nelem_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_ELEM,
		integer, intent(out)	BND_NELEM,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM	Type of element in slf format
[in]	BND_NELEM	Number of boundary elements
[in]	IERR	Error tag

Definition at line 2014 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_bnd_npoin_med()

subroutine utils_med::get_bnd_npoin_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_BND_ELEM,
		integer, intent(out)	NPTFR,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_BND_ELEM	Type of the boundary element
[in]	NPTFR	Number of boundary nodes
[in]	IERR	Error tag
[in]	type_bnd_elem	[out] FILE_ID Med file descriptor
[out]	TYPE_BND_ELEM	Type of the boundary element
[in]	NPTFR	Number of boundary nodes
[in]	IERR	Error tag

Definition at line 2419 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_bnd_numbering_med()

subroutine utils_med::get_bnd_numbering_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_ELEM_BND,
		integer, intent(in)	NPTFR,
		integer, dimension(nptfr), intent(inout)	NBOR,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM_BND	Boundary element type in slf format
[out]	NPTFR	Total number of boundary nodes
[in]	NBOR	Logical table for boundary nodes
[in]	IERR	Error tag
[in]	nptfr	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM_BND	Boundary element type in slf format
[out]	NPTFR	Total number of boundary nodes
[in]	NBOR	Logical table for boundary nodes
[in]	IERR	Error tag
[in]	type_elem_bnd	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM_BND	Boundary element type in slf format
[out]	NPTFR	Total number of boundary nodes
[in]	NBOR	Logical table for boundary nodes
[in]	IERR	Error tag

Definition at line 1646 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_bnd_value_med()

subroutine utils_med::get_bnd_value_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_BND_ELEM,
		integer, intent(in)	NELEBD,
		integer, dimension(nptfr), intent(inout)	LIHBOR,
		integer, dimension(nptfr), intent(inout)	LIUBOR,
		integer, dimension(nptfr), intent(inout)	LIVBOR,
		logical, intent(in)	TRAC,
		integer, dimension(*), intent(inout)	LITBOR,
		integer, intent(in)	NPTFR,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_BND_ELEM	Type of the boundary element
[out]	NELEBD	Number of boundary elements
[in]	LIHBOR	Type of boundary conditions on depth
[in]	LIUBOR	Type of boundary conditions on u
[in]	LIVBOR	Type of boundary conditions on v
[in]	TRAC	If yes, there are tracers
[in]	LITBOR	Physical boundary conditions for tracers
[out]	NPTFR	Number of boundary nodes
[in]	IERR	Error tag

Definition at line 2563 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_data_ntimestep_med()

subroutine utils_med::get_data_ntimestep_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	NTIMESTEP,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	NTIMESTEP	Number of time step
[in]	IERR	Error tag

Definition at line 2899 of file utils_med.F.

Here is the caller graph for this function:

◆ get_data_nvar_med()

subroutine utils_med::get_data_nvar_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	NVAR,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	NVAR	Number of data
[in]	IERR	Error tag

Definition at line 2775 of file utils_med.F.

Here is the caller graph for this function:

◆ get_data_time_med()

subroutine utils_med::get_data_time_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	RECORD,
		double precision, intent(out)	TIME,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	RECORD	Iteration number
[in]	TIME	Physical time
[in]	IERR	Error tag
[in]	record	[out] FILE_ID Med file descriptor
[out]	RECORD	Iteration number
[in]	TIME	Physical time
[in]	IERR	Error tag

Definition at line 2972 of file utils_med.F.

Here is the caller graph for this function:

◆ get_data_value_med()

subroutine utils_med::get_data_value_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	RECORD,
		character(len=16), intent(in)	VAR_NAME,
		double precision, dimension(n), intent(inout)	RES_VALUE,
		integer, intent(in)	N,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	RECORD	Iteration number
[out]	VAR_NAME	Name of the data
[in]	RES_VALUE	Vector with the value of the variable
[in]	IERR	Error tag
[in]	record	[out] FILE_ID Med file descriptor
[out]	RECORD	Iteration number
[out]	VAR_NAME	Name of the data
[in]	RES_VALUE	Vector with the value of the variable
[in]	IERR	Error tag
[in]	n	[out] FILE_ID Med file descriptor
[out]	RECORD	Iteration number
[out]	VAR_NAME	Name of the data
[in]	RES_VALUE	Vector with the value of the variable
[in]	IERR	Error tag

Definition at line 3048 of file utils_med.F.

Here is the caller graph for this function:

◆ get_data_var_list_med()

subroutine utils_med::get_data_var_list_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	NVAR,
		character(len=16), dimension(:), intent(out)	VAR_LIST,
		character(len=16), dimension(:), intent(out)	UNIT_LIST,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	NVAR	Number of data
[in]	VAR_LIST	List of the data name
[in]	IERR	Error tag

Definition at line 2829 of file utils_med.F.

Here is the caller graph for this function:

◆ get_mesh_connectivity_med()

subroutine utils_med::get_mesh_connectivity_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_ELEM,
		integer, dimension(nelem*ndp), intent(inout)	IKLE,
		integer, intent(in)	NELEM,
		integer, intent(in)	NDP,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM	Type of the element in format slf
[in]	IKLE	Connectivity table
[out]	NELEM	Number of elements
[out]	NDP	Number of nodes per element
[in]	IERR	Error tag

Definition at line 747 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_coord_med()

subroutine utils_med::get_mesh_coord_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	JDIM,
		integer, intent(in)	NDIM,
		integer, intent(in)	NPOIN,
		double precision, dimension(npoin), intent(inout)	COORD_AXE,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	JDIM	Dimension number (x, y or z)
[out]	NDIM	Number of dimension of the mesh
[out]	NPOIN	Total number of nodes
[in]	COORD_AXE	Coordinates of the mesh
[in]	IERR	Error tag
[in]	jdim	[out] FILE_ID Med file descriptor
[out]	JDIM	Dimension number (x, y or z)
[out]	NDIM	Number of dimension of the mesh
[out]	NPOIN	Total number of nodes
[in]	COORD_AXE	Coordinates of the mesh
[in]	IERR	Error tag
[in]	ndim	[out] FILE_ID Med file descriptor
[out]	JDIM	Dimension number (x, y or z)
[out]	NDIM	Number of dimension of the mesh
[out]	NPOIN	Total number of nodes
[in]	COORD_AXE	Coordinates of the mesh
[in]	IERR	Error tag
[in]	npoin	[out] FILE_ID Med file descriptor
[out]	JDIM	Dimension number (x, y or z)
[out]	NDIM	Number of dimension of the mesh
[out]	NPOIN	Total number of nodes
[in]	COORD_AXE	Coordinates of the mesh
[in]	IERR	Error tag

Definition at line 979 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_date_med()

subroutine utils_med::get_mesh_date_med	(	integer, intent(in)	FILE_ID,
		integer, dimension(6), intent(out)	DATE,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	NPLAN	Number of planes
[in]	IERR	Error tag

Definition at line 1382 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_dimension_med()

subroutine utils_med::get_mesh_dimension_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	NDIM,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	NDIM	Number of dimension of the mesh
[in]	IERR	Error tag

Definition at line 887 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_l2g_numbering_med()

subroutine utils_med::get_mesh_l2g_numbering_med	(	integer, intent(in)	FILE_ID,
		integer, dimension(npoin), intent(inout)	KNOLG,
		integer, intent(in)	NPOIN,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	KNOLG	Nodes index table from local to global
[out]	NPOIN	Total number of nodes
[in]	IERR	Error tag

Definition at line 1057 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_nelem_med()

subroutine utils_med::get_mesh_nelem_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_ELEM,
		integer, intent(out)	NELEM,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM	Type of element
[in]	NELEM	Number of elements
[in]	IERR	Error tag

Definition at line 632 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_nplan_med()

subroutine utils_med::get_mesh_nplan_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	NPLAN,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	NPLAN	Number of planes
[in]	IERR	Error tag

Definition at line 1299 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_npoin_med()

subroutine utils_med::get_mesh_npoin_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_ELEM,
		integer, intent(out)	NPOIN,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_ELEM	Element type in slf format
[in]	NPOIN	Total number of nodes
[in]	IERR	Error tag

Definition at line 818 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_npoin_per_element_med()

subroutine utils_med::get_mesh_npoin_per_element_med	(	integer, intent(in)	TYPE_ELEM,
		integer, intent(out)	NDP,
		integer, intent(out)	IERR
	)

Parameters

[in]	type_elem	[out] TYPE_ELEM Type of element
[in]	NDP	Number of nodes per element
[in]	IERR	Error tag

Definition at line 703 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_nptir_med()

subroutine utils_med::get_mesh_nptir_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	NPTIR,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	NPTIR	Number of interface nodes for the sub-domain
[in]	IERR	Error tag

Definition at line 1116 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_orig_med()

subroutine utils_med::get_mesh_orig_med	(	integer, intent(in)	FILE_ID,
		integer, intent(out)	X_ORIG,
		integer, intent(out)	Y_ORIG,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in,out]	X_ORIG	Off set of the x coordinates
[in,out]	Y_ORIG	Off set of the y coordinates
[in]	IERR	Error tag

Definition at line 1206 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_mesh_title_med()

subroutine utils_med::get_mesh_title_med	(	integer, intent(in)	FILE_ID,
		character(len=80), intent(out)	TITLE,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[in]	TITLE	Mesh title or name
[in]	IERR	Error tag

Definition at line 577 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ identify_bnd_elmt()

subroutine utils_med::identify_bnd_elmt	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_BND_ELEM,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	TYPE_BND_ELEM Element type with bief numbering
[in]	FILE_ID	Id of the med file
[in]	IERR	Error tag

Definition at line 4687 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ ifvector_()

subroutine utils_med::ifvector_	(	character(len=32), intent(inout)	STRING,
		integer, intent(inout)	COMP_NUM,
		logical, intent(inout)	ISVECTOR
	)

Parameters

[in,out]	string	[in, out] STRING The name of the variable to test
[out]	COMP_NUM	Direction of vector
[out]	ISVECTOR	True if vector

Definition at line 4503 of file utils_med.F.

◆ ndp_from_element_type_med()

subroutine utils_med::ndp_from_element_type_med	(	integer, intent(in)	TYPE_ELEM_MED,
		integer, intent(inout)	NDP,
		integer, intent(out)	IERR
	)

Parameters

[in]	type_elem_med	TYPE_ELEM_MED Element type with med numbering
[in]	NDP	Number of nodes per element
[in]	IERR	Error tag

Definition at line 4644 of file utils_med.F.

Here is the caller graph for this function:

◆ open_bnd_med()

subroutine utils_med::open_bnd_med	(	character(len=*), intent(in)	FILE_NAME,
		integer, intent(in)	FILE_ID,
		character(len=9), intent(in)	OPEN_MODE,
		integer, intent(out)	IERR,
		integer, intent(in), optional	MESH_NUMBER
	)

Parameters

[in]	file_name	[out] FILE_NAME Name of the boundary file
[out]	FILE_ID	Id of the file
[out]	OPEN_MODE	Opening mode (read/readwrite/write)
[in]	IERR	Error tag
[in]	MESH_NUMBER	If present, this is the number of the part of

Definition at line 386 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ open_mesh_med()

subroutine utils_med::open_mesh_med	(	character(len=*), intent(in)	FILE_NAME,
		integer, intent(out)	FILE_ID,
		character(len=9), intent(in)	OPEN_MODE,
		integer, intent(out)	IERR,
		integer, intent(in), optional	MESH_NUMBER
	)

Parameters

[in]	file_name	[out] FILE_NAME Name of the med file
[out]	FILE_ID	Med file descriptor
[out]	OPEN_MODE	Opening mode (read/readwrite/write)
[in]	IERR	Error tag
[in]	MESH_NUMBER	If present, this is the number of the part of

Definition at line 95 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ point2seg()

subroutine utils_med::point2seg	(	integer, intent(in)	P1,
		integer, intent(in)	P2,
		integer, intent(in)	BND_TYP_P1,
		integer, intent(in)	BND_TYP_P2,
		integer, intent(out)	SEG
	)

Definition at line 4895 of file utils_med.F.

◆ seg2point()

subroutine utils_med::seg2point	(	integer, intent(in)	P1,
		integer, intent(in)	P2,
		integer, intent(in)	BND_TYP_P1,
		integer, intent(in)	BND_TYP_P2,
		integer, intent(out)	POINT
	)

Definition at line 4872 of file utils_med.F.

Here is the caller graph for this function:

◆ set_bnd_med()

subroutine utils_med::set_bnd_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	TYPE_BND_ELT,
		integer, intent(in)	NELEBD,
		integer, intent(in)	NDP,
		integer, dimension(nelebd*ndp), intent(in)	IKLE_BND,
		integer, intent(in)	NPTFR,
		integer, dimension(nptfr), intent(in)	LIHBOR,
		integer, dimension(nptfr), intent(in)	LIUBOR,
		integer, dimension(nptfr), intent(in)	LIVBOR,
		integer, dimension(nptfr), intent(in)	LITBOR,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TYPE_BND_ELT	Type of the boundary element
[out]	NELEBD	Number of boundary element
[out]	NDP	Number of nodes per element
[out]	IKLE	Connectivity table of the boundary elements
[in]	LIHBOR	Type of boundary conditions on depth
[in]	LIUBOR	Type of boundary conditions on u
[in]	LIVBOR	Type of boundary conditions on v
[in]	LITBOR	Physical boundary conditions for tracers
[in]	IERR	Error tag

Definition at line 4210 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ set_header_med()

subroutine utils_med::set_header_med	(	integer, intent(in)	FILE_ID,
		character(len=80), intent(in)	TITLE,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	TITLE	Title of the mesh
[in]	IERR	Error tag

Definition at line 3142 of file utils_med.F.

Here is the caller graph for this function:

◆ set_mesh_med()

subroutine utils_med::set_mesh_med	(	integer, intent(in)	FILE_ID,
		integer, intent(in)	NB_DIM_PB,
		integer, intent(in)	NB_DIM_MESH,
		integer, intent(in)	TYPE_ELEM,
		integer, intent(in)	NDP,
		integer, intent(in)	NPTIR,
		integer, intent(in)	NELEM,
		integer, intent(in)	NPOIN,
		integer, dimension(ndp*nelem), intent(in)	IKLE,
		integer, dimension(*), intent(in)	KNOLG,
		double precision, dimension(nb_dim_mesh*npoin), intent(in)	COORD,
		integer, intent(in)	NPLAN,
		integer, dimension(3), intent(in)	DATE,
		integer, dimension(3), intent(in)	TIME,
		integer, intent(in)	X_ORIG,
		integer, intent(in)	Y_ORIG,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	[out] FILE_ID Med file descriptor
[out]	NB_DIM_PB	Number of dimension of the physical domain
[out]	NB_DIM_MESH	Number of dimension of the mesh
[out]	TYPE_ELEM	Type of the element in slf format
[out]	NDP	Number of points per element
[out]	NPTIR	Number of interface nodes for the sub-domain
[out]	NELEM	Total number of elements
[out]	NPOIN	Total number of nodes
[out]	IKLE	Connectivity table
[out]	KNOLG	Nodes index table from local to global
[out]	COORD	Coordinates of the nodes
[out]	NPLAN	Number of planes
[out]	DATE	Date of the file
[out]	TIME	Time of the file
[out]	X_ORIG	Off set of the x coordinates
[out]	Y_ORIG	Off set of the y coordinates
[in]	IERR	Error tag
[in]	nb_dim_pb	[out] FILE_ID Med file descriptor
[out]	NB_DIM_PB	Number of dimension of the physical domain
[out]	NB_DIM_MESH	Number of dimension of the mesh
[out]	TYPE_ELEM	Type of the element in slf format
[out]	NDP	Number of points per element
[out]	NPTIR	Number of interface nodes for the sub-domain
[out]	NELEM	Total number of elements
[out]	NPOIN	Total number of nodes
[out]	IKLE	Connectivity table
[out]	KNOLG	Nodes index table from local to global
[out]	COORD	Coordinates of the nodes
[out]	NPLAN	Number of planes
[out]	DATE	Date of the file
[out]	TIME	Time of the file
[out]	X_ORIG	Off set of the x coordinates
[out]	Y_ORIG	Off set of the y coordinates
[in]	IERR	Error tag
[in]	nb_dim_mesh	[out] FILE_ID Med file descriptor
[out]	NB_DIM_PB	Number of dimension of the physical domain
[out]	NB_DIM_MESH	Number of dimension of the mesh
[out]	TYPE_ELEM	Type of the element in slf format
[out]	NDP	Number of points per element
[out]	NPTIR	Number of interface nodes for the sub-domain
[out]	NELEM	Total number of elements
[out]	NPOIN	Total number of nodes
[out]	IKLE	Connectivity table
[out]	KNOLG	Nodes index table from local to global
[out]	COORD	Coordinates of the nodes
[out]	NPLAN	Number of planes
[out]	DATE	Date of the file
[out]	TIME	Time of the file
[out]	X_ORIG	Off set of the x coordinates
[out]	Y_ORIG	Off set of the y coordinates
[in]	IERR	Error tag

Definition at line 3201 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ transfer_group_info_common_med()

subroutine utils_med::transfer_group_info_common_med	(	integer, intent(in)	SOURCE_ID,
		integer, intent(in)	DEST_ID,
		character(len=med_name_size), intent(inout)	MNAME_SRC,
		character(len=med_name_size), intent(inout)	MNAME_DST,
		logical, intent(out)	HAS_FAM_ON_POINT,
		integer, intent(out)	IERR
	)

Parameters

[in]	source_id	SOURCE_ID File descriptor of input file
[in]	DEST_ID	File descriptor of output file
[in,out]	MNAME_SRC	Mesh name for input file
[in,out]	MNAME_DST	Mesh name for output file
[in]	HAS_FAM_ON_POINT	Connectivity for output file boundary elements
[out]	IERR	0 if no error during the execution

Definition at line 3593 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ transfer_group_info_med()

subroutine utils_med::transfer_group_info_med	(	integer, intent(in)	SOURCE_ID,
		integer, intent(in)	DEST_ID,
		integer, intent(in)	TYP_ELEM,
		integer, intent(in)	TYP_BND_ELEM,
		integer, dimension(nelebd*ndp), intent(in)	IKLE_BND,
		integer, intent(in)	NELEBD,
		integer, intent(in)	NDP,
		logical, intent(in)	TRANS_ELEM,
		logical, intent(in)	TRANS_POINT,
		integer, intent(out)	IERR
	)

Parameters

[in]	source_id	FFORMAT Format of the file
[in]	SOURCE_ID	File descriptor of input file
[in]	DEST_ID	File descriptor of output file
[in]	TYPE_ELT	Type of the elements
[in]	TYPE_BND_ELT	Type of the boundary elements
[in]	TRANS_ELEM	If true transfering group on typ_elt as well
[in]	TRANS_POINT	If true transfering group on points as well
[out]	IERR	0 if no error during the execution

Definition at line 3969 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ transfer_group_part_info_med()

subroutine utils_med::transfer_group_part_info_med	(	integer, intent(in)	SOURCE_ID,
		integer, intent(in)	DEST_ID,
		integer, intent(in)	TYP_BND_ELEM,
		integer, dimension(nelebd_dest*ndp_dest), intent(in)	IKLE_BND_DEST,
		integer, intent(in)	NELEBD_DEST,
		integer, intent(in)	NDP_DEST,
		integer, intent(in)	NELEBD_SRC,
		integer, dimension(nelebd_src), intent(in)	KNOGL_BND,
		logical, intent(in)	TRANS_POINT,
		integer, intent(in)	NPOIN_SRC,
		integer, intent(in)	NPOIN_DEST,
		integer, dimension(npoin_dest), intent(in)	KNOLG,
		integer, intent(out)	IERR
	)

Parameters

[in]	source_id	SOURCE_ID File descriptor of input file
[in]	DEST_ID	File descriptor of output file
[in]	TYPE_ELEM	Type of the elements
[in]	TYPE_BND_ELEM	Type of the boundary elements
[in]	IKLE_BND_DEST	Connectivity for output file boundary elements
[in]	NELEBD_DEST	Number of boundary elements in output file
[in]	NDP_DEST	Number of node per element in output file
[in]	NELEBD_SRC	Number of noudary elements in the input file
[in]	KNOGL_BND	Local to global numbering for boundary elements
[in]	TRANS_POINT	If true transfering group on points as well
[in]	NPOIN_SRC	Number of points in input file
[in]	NPOIN_DEST	Number if points in output file
[in]	KNOLG	Local to global numbering
[out]	IERR	0 if no error during the execution

Definition at line 3755 of file utils_med.F.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ update_data_mesh_med()

subroutine utils_med::update_data_mesh_med	(	integer, intent(in)	FILE_ID,
		double precision, intent(in)	TIME,
		integer, intent(in)	RECORD,
		integer, intent(in)	NB_DIM_MESH,
		integer, intent(in)	NPOIN,
		double precision, dimension(nb_dim_mesh*npoin), intent(in)	COORD,
		integer, intent(out)	IERR
	)

Parameters

[in]	file_id	FILE_ID Med file descriptor
[in]	TIME	Physical time
[in]	RECORD	Iteration number
[in]	NB_DIM_MESH	Dimension of the mesh
[in]	NPOIN	Number of points in the mesh
[in]	COORD	Coordinates table
[in]	IERR	Error tag

Definition at line 4446 of file utils_med.F.

Here is the caller graph for this function:

Variable Documentation

◆ hash

integer, dimension(max_file) utils_med::hash = 0

Definition at line 79 of file utils_med.F.

◆ kid

integer, parameter utils_med::kid =K8

Definition at line 38 of file utils_med.F.

◆ med_obj_tab

type(med_info), dimension(max_file) utils_med::med_obj_tab

Definition at line 81 of file utils_med.F.

◆ offset

integer, parameter utils_med::offset = 1000

Definition at line 85 of file utils_med.F.

◆ sol_bnd

integer, parameter utils_med::sol_bnd = 2

Definition at line 83 of file utils_med.F.

Data Types

Functions/Subroutines

Variables

Function/Subroutine Documentation

◆ add_data_med()

◆ close_bnd_med()

◆ close_mesh_med()

◆ convert_elem_type()

◆ get_bnd_connectivity_med()

◆ get_bnd_family_med()

◆ get_bnd_grp_value_med()

◆ get_bnd_ipobo_med()

◆ get_bnd_nelem_med()

◆ get_bnd_npoin_med()

◆ get_bnd_numbering_med()

◆ get_bnd_value_med()

◆ get_data_ntimestep_med()

◆ get_data_nvar_med()

◆ get_data_time_med()

◆ get_data_value_med()

◆ get_data_var_list_med()

◆ get_mesh_connectivity_med()

◆ get_mesh_coord_med()

◆ get_mesh_date_med()

◆ get_mesh_dimension_med()

◆ get_mesh_l2g_numbering_med()

◆ get_mesh_nelem_med()

◆ get_mesh_nplan_med()

◆ get_mesh_npoin_med()

◆ get_mesh_npoin_per_element_med()

◆ get_mesh_nptir_med()

◆ get_mesh_orig_med()

◆ get_mesh_title_med()

◆ identify_bnd_elmt()

◆ ifvector_()

◆ ndp_from_element_type_med()

◆ open_bnd_med()

◆ open_mesh_med()

◆ point2seg()

◆ seg2point()

◆ set_bnd_med()

◆ set_header_med()

◆ set_mesh_med()

◆ transfer_group_info_common_med()

◆ transfer_group_info_med()

◆ transfer_group_part_info_med()

◆ update_data_mesh_med()

Variable Documentation

◆ hash

◆ kid

◆ med_obj_tab

◆ offset

◆ sol_bnd