fstr_contact_elem_common.f90 File Reference

Go to the source code of this file.

Modules
module	m_fstr_contact_elem_common
	Common utilities for contact element calculations.

Functions/Subroutines
subroutine, public	m_fstr_contact_elem_common::computetm_tt (ctState, tSurf, fcoeff, Tm, Tt, smoothing_type, Bn)
	Compute Tm (relative displacement mapping) and optionally Tt (tangential mapping) This subroutine constructs the mapping matrices based on contact_disc.md section 10: Tm = [I_3; -N_1*I_3; -N_2*I_3; ...; -N_n*I_3] (size: 3 x 3*(nnode+1)) Tt = Pt * Tm where Pt = I_3 - n x n (computed only if fcoeff /= 0) More...
subroutine, public	m_fstr_contact_elem_common::computecontactmaps_alag (ctState, tSurf, ele, Bn, metric, Ht, Gt, smoothing_type)
	Compute contact maps for ALag method (normal distribution and tangential displacement maps) This subroutine constructs the mapping matrices for ALag contact using computeTm_Tt as the core: Bn: normal force distribution vector [n; -N_1*n; -N_2*n; ...; -N_n*n] (size: nnode*3+3) Ht: tangent displacement map from DispIncreMatrix (size: 2 x nnode*3+3) Gt: covariant displacement map Gt = metric * Ht (size: 2 x nnode*3+3) Where: dxy = Gt * edisp, f3 = Ht^T * fric. More...
subroutine, public	m_fstr_contact_elem_common::computefrictionforce_alag (ctState, fcoeff, lambda_n, metric, Ht, Gt, edisp, edof, ctTForce, mut, update_multiplier, slave_id, ctchanged, norm_trial, alpha, that, jump_ratio)
	Compute friction force for ALag method Given tangent maps Ht, Gt and displacement increment, compute the friction force vector. Handles both stick and slip states. More...
subroutine, public	m_fstr_contact_elem_common::gettrialfricforceandcheckfricstate (ctstate, fcoeff, tPenalty, lagrange)
	This subroutine calculates trial friction force and checks friction state. More...
subroutine, public	m_fstr_contact_elem_common::update_tangentforce (etype, nn, elemt0, elemt, cstate)
	This subroutine find the projection of a slave point onto master surface. More...