hecmw_matrix_ass Module Reference

Functions/Subroutines
subroutine, public	hecmw_mat_ass_elem (hecMAT, nn, nodLOCAL, stiffness)
subroutine, public	stf_get_block (stiffness, ndof, inod, jnod, a)
subroutine, public	hecmw_mat_add_node (hecMAT, inod, jnod, a)
integer(kind=kint) function, public	hecmw_array_search_i (array, is, iE, ival)
subroutine, public	hecmw_mat_ass_equation (hecMESH, hecMAT)
subroutine, public	hecmw_mat_ass_equation_rhs (hecMESH, hecMAT)
subroutine, public	hecmw_mat_add_dof (hecMAT, inod, idof, jnod, jdof, val)
subroutine, public	hecmw_mat_ass_bc (hecMAT, inode, idof, RHS, conMAT)
subroutine, public	hecmw_mat_ass_bc_contactlag (hecMAT, hecLagMAT, inode, idof, RHS)
	Modify Lagrange multiplier-related part of stiffness matrix and right-hand side vector for dealing with prescribed displacement boundary condition. More...
subroutine, public	hecmw_mat_ass_contactlag (nnode, ndLocal, id_lagrange, fcoeff, stiffness, hecMAT, hecLagMAT)
	This subroutine assembles contact stiffness matrix of a contact pair into global stiffness matrix. More...

Function/Subroutine Documentation

hecmw_array_search_i()

integer(kind=kint) function, public hecmw_matrix_ass::hecmw_array_search_i	(	integer(kind=kint), dimension(:)	array,
		integer(kind=kint)	is,
		integer(kind=kint)	iE,
		integer(kind=kint)	ival
	)

Definition at line 139 of file hecmw_mat_ass.f90.

Here is the caller graph for this function:

hecmw_mat_add_dof()

subroutine, public hecmw_matrix_ass::hecmw_mat_add_dof	(	type (hecmwst_matrix)	hecMAT,
		integer(kind=kint)	inod,
		integer(kind=kint)	idof,
		integer(kind=kint)	jnod,
		integer(kind=kint)	jdof,
		real(kind=kreal)	val
	)

Definition at line 276 of file hecmw_mat_ass.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

hecmw_mat_add_node()

subroutine, public hecmw_matrix_ass::hecmw_mat_add_node	(	type (hecmwst_matrix)	hecMAT,
		integer(kind=kint)	inod,
		integer(kind=kint)	jnod,
		real(kind=kreal), dimension(:, :)	a
	)

Definition at line 74 of file hecmw_mat_ass.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

hecmw_mat_ass_bc()

subroutine, public hecmw_matrix_ass::hecmw_mat_ass_bc	(	type (hecmwst_matrix)	hecMAT,
		integer(kind=kint)	inode,
		integer(kind=kint)	idof,
		real(kind=kreal)	RHS,
		type (hecmwst_matrix), optional	conMAT
	)

Definition at line 329 of file hecmw_mat_ass.f90.

hecmw_mat_ass_bc_contactlag()

subroutine, public hecmw_matrix_ass::hecmw_mat_ass_bc_contactlag	(	type(hecmwst_matrix)	hecMAT,
		type(hecmwst_matrix_lagrange)	hecLagMAT,
		integer(kind=kint)	inode,
		integer(kind=kint)	idof,
		real(kind=kreal)	RHS
	)

Modify Lagrange multiplier-related part of stiffness matrix and right-hand side vector for dealing with prescribed displacement boundary condition.

Parameters

hecmat	hecmwST_matrix
heclagmat	hecmwST_matrix_lagrange
idof	number of node; degree of freedom
rhs	value of prescribed displacement

Definition at line 469 of file hecmw_mat_ass.f90.

Here is the call graph for this function:

hecmw_mat_ass_contactlag()

subroutine, public hecmw_matrix_ass::hecmw_mat_ass_contactlag	(	integer(kind=kint)	nnode,
		integer(kind=kint), dimension(nnode + 1)	ndLocal,
		integer(kind=kint)	id_lagrange,
		real(kind=kreal)	fcoeff,
		real(kind=kreal), dimension(:,:)	stiffness,
		type(hecmwst_matrix)	hecMAT,
		type(hecmwst_matrix_lagrange)	hecLagMAT
	)

This subroutine assembles contact stiffness matrix of a contact pair into global stiffness matrix.

Parameters

hecmat	type hecmwST_matrix
heclagmat	type hecmwST_matrix_lagrange
id_lagrange	total number of nodes of master segment global number of nodes of contact pair number of Lagrange multiplier
fcoeff	friction coefficient
stiffness	contact stiffness matrix

Definition at line 493 of file hecmw_mat_ass.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

hecmw_mat_ass_elem()

subroutine, public hecmw_matrix_ass::hecmw_mat_ass_elem	(	type (hecmwst_matrix)	hecMAT,
		integer(kind=kint)	nn,
		integer(kind=kint), dimension(:)	nodLOCAL,
		real(kind=kreal), dimension(:, :)	stiffness
	)

Definition at line 33 of file hecmw_mat_ass.f90.

Here is the call graph for this function:

hecmw_mat_ass_equation()

subroutine, public hecmw_matrix_ass::hecmw_mat_ass_equation	(	type (hecmwst_local_mesh)	hecMESH,
		type (hecmwst_matrix), target	hecMAT
	)

Definition at line 176 of file hecmw_mat_ass.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

hecmw_mat_ass_equation_rhs()

subroutine, public hecmw_matrix_ass::hecmw_mat_ass_equation_rhs	(	type (hecmwst_local_mesh)	hecMESH,
		type (hecmwst_matrix), target	hecMAT
	)

Definition at line 234 of file hecmw_mat_ass.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

stf_get_block()

subroutine, public hecmw_matrix_ass::stf_get_block	(	real(kind=kreal), dimension(:, :)	stiffness,
		integer(kind=kint)	ndof,
		integer(kind=kint)	inod,
		integer(kind=kint)	jnod,
		real(kind=kreal), dimension(:, :)	a
	)

Definition at line 56 of file hecmw_mat_ass.f90.

Here is the caller graph for this function: