fstr_contact_def.F90 File Reference

Go to the source code of this file.

Data Types
type	mcontactdef::tcontactstate
	This structure records contact status. More...
type	mcontactdef::tcontact
	Structure to includes all info needed by contact calculation. More...
type	mcontactdef::fstr_info_contactchange

Modules
module	mcontactdef
	This module manages the data structure for contact calculation.

Functions/Subroutines
subroutine	mcontactdef::contact_state_init (cstate)
	Initializer. More...
subroutine	mcontactdef::contact_state_copy (cstate1, cstate2)
	Copy. More...
subroutine	mcontactdef::print_contact_state (fnum, cstate)
	Print out contact state. More...
subroutine	mcontactdef::fstr_write_contact (file, contact)
	Write out contact definition. More...
subroutine	mcontactdef::fstr_contact_finalize (contact)
	Finalizer. More...
logical function	mcontactdef::fstr_contact_check (contact, hecMESH)
	Check the consistency with given mesh of contact definition. More...
logical function	mcontactdef::fstr_contact_init (contact, hecMESH, cparam, myrank)
	Initializer of tContactState. More...
logical function	mcontactdef::fstr_embed_init (embed, hecMESH, cparam, myrank)
	Initializer of tContactState for embed case. More...
integer(kind=kint) function	mcontactdef::check_apply_contact_if (contact_if, contacts)
subroutine	mcontactdef::clear_contact_state (contact)
	Reset contact state all to free. More...
subroutine	mcontactdef::print_contatct_pair (file, pair)
	Write out the contact definition read from mesh file. More...

Variables
real(kind=kreal), save	mcontactdef::cgn =1.d-5
	convergent condition of penetration More...
real(kind=kreal), save	mcontactdef::cgt =1.d-3
	convergent condition of relative tangent disp More...
real(kind=kreal), dimension(2), save	mcontactdef::gnt
	1:current average penetration; 2:current relative tangent displacement More...
real(kind=kreal), dimension(2), save	mcontactdef::bakgnt
	1:current average penetration; 2:current relative tangent displacement! More...
integer, parameter	mcontactdef::contactunknown = -1
integer, parameter	mcontactdef::contactfree = -1
	contact state definition More...
integer, parameter	mcontactdef::contactstick = 1
integer, parameter	mcontactdef::contactslip = 2
integer, parameter	mcontactdef::contacttied = 1
	contact type or algorithm definition More...
integer, parameter	mcontactdef::contactglued = 2
integer, parameter	mcontactdef::contactsslid = 3
integer, parameter	mcontactdef::contactfslid = 4
integer, parameter	mcontactdef::c_if_slave = 1
	contact interference type More...
integer, parameter	mcontactdef::c_if_master = 2
integer, parameter	mcontactdef::kctforresidual = 1
	purpose flag for contact force calculation More...
integer, parameter	mcontactdef::kctforoutput = 2
	compute contact force for output (CONT_NFORCE/CONT_FRIC) More...