FrontISTR  5.9.0
Large-scale structural analysis program with finit element method
fstr_contact_smoothing.f90 File Reference

Go to the source code of this file.

Modules

module  m_fstr_contact_smoothing
 Contact surface smoothing using Nagata patch interpolation.
 

Functions/Subroutines

subroutine, public m_fstr_contact_smoothing::reorder_tri3n_to_tri6n (vertices_in, midpoints_in, nodes_out)
 Reorder triangle vertices and midpoints from fe_tri3n to fe_tri6n order fe_tri3n: v1(xi), v2(et), v3(st), m1(xi-et), m2(et-st), m3(st-xi) fe_tri6n: v1(st), v2(xi), v3(et), m4(xi-st), m5(xi-et), m6(et-st) More...
 
subroutine, public m_fstr_contact_smoothing::update_surface_normal (surf, currpos, hecMESH)
 
subroutine m_fstr_contact_smoothing::compute_cab_old (na_vec, nb_vec, Cab_a, Cab_b)
 Compute Cab correction matrices for edge (a,b) Kab = (Aab^T*Aab + eps*I)^-1 * Aab^T * D * Aab Cab_a = 0.5*I - Kab, Cab_b = 0.5*I + Kab. More...
 
subroutine, public m_fstr_contact_smoothing::compute_cab (na_vec, nb_vec, Cab_a, Cab_b)
 
subroutine, public m_fstr_contact_smoothing::compute_interpolation_matrix_p (etype, nnode, lpos, vertex_normals, P_matrix)
 Compute interpolation matrix P for Nagata patch P_matrix(3, nnode*3) represents x = P * [X1; X2; X3; ...]. More...
 
subroutine, public m_fstr_contact_smoothing::create_intermediate_points (surf, currpos, contact_name)