GetElemCoord Subroutine

public subroutine GetElemCoord(obj, nod_coord, elem_nod, elem_id)

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

Arguments

Type IntentOptional AttributesName
class(ShapeFunction_), intent(inout) :: obj
real(kind=real64), intent(in) :: nod_coord(:,:)
integer(kind=int32), intent(in) :: elem_nod(:,:)
integer(kind=int32), intent(in) :: elem_id

Contents

None