Functions/Subroutines
subroutine	set_mesh (FFORMAT, FILE_ID, MESH_DIM, TYPELM, NDP, NPTFR, NPTIR, NELEM, NPOIN, IKLE, IPOBO, KNOLG, X, Y, NPLAN, DATE, TIME, X_ORIG, Y_ORIG, IERR, Z, IN_PLACE)

Function/Subroutine Documentation

◆ set_mesh()

subroutine set_mesh	(	character(len=8), intent(in)	FFORMAT,
		integer, intent(in)	FILE_ID,
		integer, intent(in)	MESH_DIM,
		integer, intent(in)	TYPELM,
		integer, intent(in)	NDP,
		integer, intent(in)	NPTFR,
		integer, intent(in)	NPTIR,
		integer, intent(in)	NELEM,
		integer, intent(in)	NPOIN,
		integer, dimension(nelem*ndp), intent(inout)	IKLE,
		integer, dimension(*), intent(in)	IPOBO,
		integer, dimension(*), intent(in)	KNOLG,
		double precision, dimension(npoin), intent(in)	X,
		double precision, dimension(npoin), intent(in)	Y,
		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,
		double precision, dimension(*), intent(in), optional	Z,
		logical, intent(in), optional	IN_PLACE
	)

Parameters

[in]	fformat	FFORMAT Format of the file
[in]	FILE_ID	File descriptor
[in]	MESH_DIM	Dimension of the mesh
[in]	TYPELM	Type of the mesh elements
[in]	NDP	Number of points per element
[in]	NPTFR	Number of boundary point
[in]	NPTIR	Number of interface point
[in]	NELEM	Number of element in the mesh
[in]	NPOIN	Number of points in the mesh
[in,out]	IKLE	Connectivity array for the main element
[in]	IPOBO	Is a boundary point ? array
[in]	KNOLG	Local to global numbering array
[in]	X	X coordinates of the mesh points
[in]	Y	Y coordinates of the mesh points
[in]	NPLAN	Number of planes
[in]	DATE	Date of the creation of the mesh
[in]	TIME	Time of the creation of the mesh
[in]	X_ORIG	Off set of the x coordinates
[in]	Y_ORIG	Off set of the y coordinates
[out]	IERR	0 if no error during the execution

Definition at line 9 of file set_mesh.f.

Here is the call graph for this function:

Here is the caller graph for this function: