hecmw_matrix_contact_lagrange Module Reference

Functions/Subroutines
subroutine, public	hecmw_construct_noderelated_from_hecmat (hecMAT, NPL, NPU, list_nodeRelated)
	This subroutine saves original matrix structure constructed originally by hecMW_matrix. More...
subroutine, public	hecmw_init_noderelated_from_org (np, num_lagrange, is_contact_active, list_nodeRelated_org, list_nodeRelated)
	Get original list of related nodes. More...
subroutine, public	hecmw_ass_noderelated_from_contact_pair (np, nnode, ndLocal, count_lagrange, permission, necessary_to_insert_node, list_nodeRelated_org, list_nodeRelated, countNon0LU_node, countNon0LU_lagrange)
subroutine, public	hecmw_construct_hecmat_from_noderelated (n, np, ndof, nnz, num_lagrange, list_nodeRelated, hecMAT)
	This subroutine constructs hecMAT structure from list_nodeRelated. More...
subroutine, public	hecmw_construct_heclagmat_from_noderelated (np, ndof, num_lagrange, numNon0_lagrange, is_contact_active, list_nodeRelated, hecLagMAT)
	Construct hecLagMAT structure. More...
subroutine, public	hecmw_finalize_noderelated (list_nodeRelated)
	This subroutine finalize list_nodeRelated. More...

Function/Subroutine Documentation

hecmw_ass_noderelated_from_contact_pair()

subroutine, public hecmw_matrix_contact_lagrange::hecmw_ass_noderelated_from_contact_pair	(	integer(kind=kint), intent(in)	np,
		integer(kind=kint), intent(in)	nnode,
		integer(kind=kint), dimension(:), intent(in)	ndLocal,
		integer(kind=kint), intent(in)	count_lagrange,
		logical, intent(inout)	permission,
		logical, intent(in)	necessary_to_insert_node,
		type(noderelated), dimension(:), intent(in), pointer	list_nodeRelated_org,
		type(noderelated), dimension(:), intent(inout), pointer	list_nodeRelated,
		integer(kind=kint), intent(inout)	countNon0LU_node,
		integer(kind=kint), intent(inout)	countNon0LU_lagrange
	)

Parameters

[in]	count_lagrange	counter of Lagrange multiplier
[in]	list_noderelated_org	original structure of matrix
[in,out]	list_noderelated	current structure of matrix
[in,out]	countnon0lu_lagrange	counters of node-based number of non-zero items

Definition at line 103 of file hecmw_matrix_contact_lagrange.f90.

hecmw_construct_heclagmat_from_noderelated()

subroutine, public hecmw_matrix_contact_lagrange::hecmw_construct_heclagmat_from_noderelated	(	integer(kind=kint), intent(in)	np,
		integer(kind=kint), intent(in)	ndof,
		integer(kind=kint), intent(in)	num_lagrange,
		integer(kind=kint), intent(in)	numNon0_lagrange,
		logical, intent(in)	is_contact_active,
		type(noderelated), dimension(:), intent(in), pointer	list_nodeRelated,
		type(hecmwst_matrix_lagrange), intent(inout)	hecLagMAT
	)

Construct hecLagMAT structure.

Parameters

[in]	list_noderelated	nodeRelated structure of matrix
[in,out]	heclagmat	type hecmwST_matrix_lagrange

Definition at line 396 of file hecmw_matrix_contact_lagrange.f90.

hecmw_construct_hecmat_from_noderelated()

subroutine, public hecmw_matrix_contact_lagrange::hecmw_construct_hecmat_from_noderelated	(	integer(kind=kint), intent(in)	n,
		integer(kind=kint), intent(in)	np,
		integer(kind=kint), intent(in)	ndof,
		integer(kind=kint), intent(in)	nnz,
		integer(kind=kint), intent(in)	num_lagrange,
		type(noderelated), dimension(:), intent(in), pointer	list_nodeRelated,
		type(hecmwst_matrix), intent(inout)	hecMAT
	)

This subroutine constructs hecMAT structure from list_nodeRelated.

Parameters

[in]	list_noderelated	nodeRelated structure of matrix
[in,out]	hecmat	type hecmwST_matrix

Definition at line 309 of file hecmw_matrix_contact_lagrange.f90.

hecmw_construct_noderelated_from_hecmat()

subroutine, public hecmw_matrix_contact_lagrange::hecmw_construct_noderelated_from_hecmat	(	type(hecmwst_matrix), intent(in)	hecMAT,
		integer(kind=kint), intent(out)	NPL,
		integer(kind=kint), intent(out)	NPU,
		type(noderelated), dimension(:), intent(inout), pointer	list_nodeRelated
	)

This subroutine saves original matrix structure constructed originally by hecMW_matrix.

Parameters

[in]	hecmat	type hecmwST_matrix
[out]	npl	original number of non-zero items(lower)
[out]	npu	original number of non-zero items(upper)
[in,out]	list_noderelated	nodeRelated structure of matrix

Definition at line 30 of file hecmw_matrix_contact_lagrange.f90.

hecmw_finalize_noderelated()

subroutine, public hecmw_matrix_contact_lagrange::hecmw_finalize_noderelated

(

type(noderelated), dimension(:), intent(inout), pointer

list_nodeRelated

)

This subroutine finalize list_nodeRelated.

Parameters

[in,out]

list_noderelated

nodeRelated structure of matrix

Definition at line 482 of file hecmw_matrix_contact_lagrange.f90.

hecmw_init_noderelated_from_org()

subroutine, public hecmw_matrix_contact_lagrange::hecmw_init_noderelated_from_org	(	integer(kind=kint), intent(in)	np,
		integer(kind=kint), intent(in)	num_lagrange,
		logical, intent(in)	is_contact_active,
		type(noderelated), dimension(:), intent(in), pointer	list_nodeRelated_org,
		type(noderelated), dimension(:), intent(inout), pointer	list_nodeRelated
	)

Get original list of related nodes.

Parameters

[in]	num_lagrange	total number of nodes
[in]	list_noderelated_org	original structure of matrix
[in,out]	list_noderelated	current structure of matrix

Definition at line 71 of file hecmw_matrix_contact_lagrange.f90.