contact_lib.f90 File Reference

Go to the source code of this file.

Data Types
type	m_contact_lib::tcontactstate
	This structure records contact status. More...

Modules
module	m_contact_lib
	This module provide functions of contact stiffness calculation.

Functions/Subroutines
subroutine	m_contact_lib::contact_state_init (cstate)
	Initializer. More...
subroutine	m_contact_lib::contact_state_copy (cstate1, cstate2)
	Copy. More...
subroutine	m_contact_lib::print_contact_state (fnum, cstate)
	Print out contact state. More...
subroutine	m_contact_lib::contact2mpcval (cstate, etype, nnode, mpcval)
	Transfer contact condition int mpc bundary conditions. More...
subroutine	m_contact_lib::contact2stiff (flag, cstate, etype, nnode, ele, mu, mut, fcoeff, symm, stiff, force)
	This subroutine calculate contact stiff matrix and contact force. More...
subroutine	m_contact_lib::tied2stiff (flag, cstate, etype, nnode, mu, mut, stiff, force)
	This subroutine calculate contact stiff matrix and contact force. More...
subroutine	m_contact_lib::getmetrictensor (pos, etype, ele, tensor)
	This subroutine calculate the metric tensor of a elemental surface. More...
subroutine	m_contact_lib::dispincrematrix (pos, etype, nnode, ele, tangent, tensor, matrix)
	This subroutine calculate the relation between global disp and displacement along natural coordinate of master surface supposing penetration is small. More...
subroutine	m_contact_lib::project_point2element (xyz, etype, nn, elemt, reflen, cstate, isin, distclr, ctpos, localclr)
	This subroutine find the projection of a slave point onto master surface. More...
subroutine	m_contact_lib::project_point2solidelement (xyz, etype, nn, elemt, reflen, cstate, isin, distclr, ctpos, localclr)
	This subroutine find the projection of a slave point onto master surface. More...
subroutine	m_contact_lib::update_tangentforce (etype, nn, elemt0, elemt, cstate)
	This subroutine find the projection of a slave point onto master surface. More...
subroutine	m_contact_lib::set_shrink_factor (ctime, cstate, etime, if_type)

Variables
integer, parameter	m_contact_lib::contactunknown = -1
integer, parameter	m_contact_lib::contactfree = -1
	contact state definition More...
integer, parameter	m_contact_lib::contactstick = 1
integer, parameter	m_contact_lib::contactslip = 2
integer, parameter	m_contact_lib::contacttied = 1
	contact type or algorithm definition More...
integer, parameter	m_contact_lib::contactglued = 2
integer, parameter	m_contact_lib::contactsslid = 3
integer, parameter	m_contact_lib::contactfslid = 4
integer, parameter	m_contact_lib::c_if_slave = 1
	contact interference type More...
integer, parameter	m_contact_lib::c_if_master = 2