GetElemCoord_n Subroutine

public subroutine GetElemCoord_n(obj, nod_coord_n, elem_nod, elem_id)

print *, obj%ElemCoord_n(j,1:m)

Arguments

Type	Intent	Optional	Attributes		Name
class(ShapeFunction_),	intent(inout)			::	obj
real(kind=real64),	intent(in)			::	nod_coord_n(:,:)
integer(kind=int32),	intent(in)			::	elem_nod(:,:)
integer(kind=int32),	intent(in)			::	elem_id