mpi_node_coord_read Subroutine

subroutine mpi_node_coord_read(infile_node, mpi_elem_nod, my_rank, petot, mpi_nod_coord, mpi_nod_coord_id, node_num)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=17),	intent(in)			::	infile_node
integer,	intent(in)			::	mpi_elem_nod(:,:)
integer,	intent(in)			::	my_rank
integer,	intent(in)			::	petot
real(kind=8),	intent(out),		allocatable	::	mpi_nod_coord(:,:)
integer,	intent(out),		allocatable	::	mpi_nod_coord_id(:)
integer,	intent(out)			::	node_num