#include <contact_elements.h>

Inheritance diagram for oomph::NonlinearSurfaceContactElement< ELEMENT >:

Public Member Functions
	NonlinearSurfaceContactElement (FiniteElement *const &element_pt, const int &face_index, const unsigned &id=0, const bool &called_from_refineable_constructor=false)

void	fill_in_contribution_to_residuals_surface_contact (Vector< double > &residuals)
	Return the residuals for the SurfaceContactElement equations. More...

void	output (std::ostream &outfile)
	Output function. More...

void	output (std::ostream &outfile, const unsigned &n_plot)
	Output function. More...

void	resulting_contact_force (Vector< double > &contact_force)
	Resulting contact force. More...

Public Member Functions inherited from oomph::SurfaceContactElementBase< ELEMENT >
	SurfaceContactElementBase (FiniteElement *const &element_pt, const int &face_index, const unsigned &id=0, const bool &called_from_refineable_constructor=false)
	value of the index and its limit More...

	SurfaceContactElementBase ()
	Default constructor. More...

void	enable_stick ()

double	zeta_nodal (const unsigned &n, const unsigned &k, const unsigned &i) const

double	s_min () const
	Min value of local coordinate. More...

double	s_max () const
	Max. value of local coordinate. More...

void	disable_stick ()

bool	is_stick_enabled ()

void	fill_in_contribution_to_residuals (Vector< double > &residuals)
	Return the residuals. More...

Penetrator *	penetrator_pt () const
	Pointer to penetrator. More...

void	set_penetrator_pt (Penetrator *penetrator_pt)
	Set pointer to penetrator. More...

void	output (FILE *file_pt)
	C_style output function. More...

void	output (FILE *file_pt, const unsigned &n_plot)
	C-style output function. More...

void	shape_p (const Vector< double > &s, Shape &psi) const
	Shape fct for lagrange multiplier. More...

void	shape_i (const Vector< double > &s, Shape &psi) const

Public Member Functions inherited from oomph::FaceElement
	FaceElement ()
	Constructor: Initialise all appropriate member data. More...

virtual	~FaceElement ()
	Empty virtual destructor. More...

	FaceElement (const FaceElement &)=delete
	Broken copy constructor. More...

const unsigned &	boundary_number_in_bulk_mesh () const
	Broken assignment operator. More...

void	set_boundary_number_in_bulk_mesh (const unsigned &b)
	Set function for the boundary number in bulk mesh. More...

double	zeta_nodal (const unsigned &n, const unsigned &k, const unsigned &i) const

double	J_eulerian (const Vector< double > &s) const

double	J_eulerian_at_knot (const unsigned &ipt) const

void	check_J_eulerian_at_knots (bool &passed) const

double	interpolated_x (const Vector< double > &s, const unsigned &i) const

double	interpolated_x (const unsigned &t, const Vector< double > &s, const unsigned &i) const

void	interpolated_x (const Vector< double > &s, Vector< double > &x) const

void	interpolated_x (const unsigned &t, const Vector< double > &s, Vector< double > &x) const

double	interpolated_dxdt (const Vector< double > &s, const unsigned &i, const unsigned &t)

void	interpolated_dxdt (const Vector< double > &s, const unsigned &t, Vector< double > &dxdt)

int &	normal_sign ()

int	normal_sign () const

int &	face_index ()

int	face_index () const

const Vector< double > *	tangent_direction_pt () const
	Public access function for the tangent direction pointer. More...

void	set_tangent_direction (Vector< double > *tangent_direction_pt)
	Set the tangent direction vector. More...

void	turn_on_warning_for_discontinuous_tangent ()

void	turn_off_warning_for_discontinuous_tangent ()

void	continuous_tangent_and_outer_unit_normal (const Vector< double > &s, Vector< Vector< double >> &tang_vec, Vector< double > &unit_normal) const

void	continuous_tangent_and_outer_unit_normal (const unsigned &ipt, Vector< Vector< double >> &tang_vec, Vector< double > &unit_normal) const

void	outer_unit_normal (const Vector< double > &s, Vector< double > &unit_normal) const
	Compute outer unit normal at the specified local coordinate. More...

void	outer_unit_normal (const unsigned &ipt, Vector< double > &unit_normal) const
	Compute outer unit normal at ipt-th integration point. More...

FiniteElement *&	bulk_element_pt ()
	Pointer to higher-dimensional "bulk" element. More...

FiniteElement *	bulk_element_pt () const
	Pointer to higher-dimensional "bulk" element (const version) More...

CoordinateMappingFctPt &	face_to_bulk_coordinate_fct_pt ()

CoordinateMappingFctPt	face_to_bulk_coordinate_fct_pt () const

BulkCoordinateDerivativesFctPt &	bulk_coordinate_derivatives_fct_pt ()

BulkCoordinateDerivativesFctPt	bulk_coordinate_derivatives_fct_pt () const

Vector< double >	local_coordinate_in_bulk (const Vector< double > &s) const

void	get_local_coordinate_in_bulk (const Vector< double > &s, Vector< double > &s_bulk) const

void	get_ds_bulk_ds_face (const Vector< double > &s, DenseMatrix< double > &dsbulk_dsface, unsigned &interior_direction) const

unsigned &	bulk_position_type (const unsigned &i)

const unsigned &	bulk_position_type (const unsigned &i) const

void	bulk_node_number_resize (const unsigned &i)
	Resize the storage for the bulk node numbers. More...

unsigned &	bulk_node_number (const unsigned &n)

const unsigned &	bulk_node_number (const unsigned &n) const

void	bulk_position_type_resize (const unsigned &i)
	Resize the storage for bulk_position_type to i entries. More...

unsigned &	nbulk_value (const unsigned &n)

unsigned	nbulk_value (const unsigned &n) const

void	nbulk_value_resize (const unsigned &i)

void	resize_nodes (Vector< unsigned > &nadditional_data_values)

void	output_zeta (std::ostream &outfile, const unsigned &nplot)
	Output boundary coordinate zeta. More...

Public Member Functions inherited from oomph::FiniteElement
void	set_dimension (const unsigned &dim)

void	set_nodal_dimension (const unsigned &nodal_dim)

void	set_nnodal_position_type (const unsigned &nposition_type)
	Set the number of types required to interpolate the coordinate. More...

void	set_n_node (const unsigned &n)

int	nodal_local_eqn (const unsigned &n, const unsigned &i) const

double	dJ_eulerian_at_knot (const unsigned &ipt, Shape &psi, DenseMatrix< double > &djacobian_dX) const

	FiniteElement ()
	Constructor. More...

virtual	~FiniteElement ()

	FiniteElement (const FiniteElement &)=delete
	Broken copy constructor. More...

virtual bool	local_coord_is_valid (const Vector< double > &s)
	Broken assignment operator. More...

virtual void	move_local_coord_back_into_element (Vector< double > &s) const

void	get_centre_of_gravity_and_max_radius_in_terms_of_zeta (Vector< double > &cog, double &max_radius) const

virtual void	local_coordinate_of_node (const unsigned &j, Vector< double > &s) const

virtual void	local_fraction_of_node (const unsigned &j, Vector< double > &s_fraction)

virtual double	local_one_d_fraction_of_node (const unsigned &n1d, const unsigned &i)

virtual void	set_macro_elem_pt (MacroElement *macro_elem_pt)

MacroElement *	macro_elem_pt ()
	Access function to pointer to macro element. More...

void	get_x (const Vector< double > &s, Vector< double > &x) const

void	get_x (const unsigned &t, const Vector< double > &s, Vector< double > &x)

virtual void	get_x_from_macro_element (const Vector< double > &s, Vector< double > &x) const

virtual void	get_x_from_macro_element (const unsigned &t, const Vector< double > &s, Vector< double > &x)

virtual void	set_integration_scheme (Integral *const &integral_pt)
	Set the spatial integration scheme. More...

Integral *const &	integral_pt () const
	Return the pointer to the integration scheme (const version) More...

virtual void	shape (const Vector< double > &s, Shape &psi) const =0

virtual void	shape_at_knot (const unsigned &ipt, Shape &psi) const

virtual void	dshape_local (const Vector< double > &s, Shape &psi, DShape &dpsids) const

virtual void	dshape_local_at_knot (const unsigned &ipt, Shape &psi, DShape &dpsids) const

virtual void	d2shape_local (const Vector< double > &s, Shape &psi, DShape &dpsids, DShape &d2psids) const

virtual void	d2shape_local_at_knot (const unsigned &ipt, Shape &psi, DShape &dpsids, DShape &d2psids) const

void	check_J_eulerian_at_knots (bool &passed) const

void	check_jacobian (const double &jacobian) const

double	dshape_eulerian (const Vector< double > &s, Shape &psi, DShape &dpsidx) const

virtual double	dshape_eulerian_at_knot (const unsigned &ipt, Shape &psi, DShape &dpsidx) const

virtual double	dshape_eulerian_at_knot (const unsigned &ipt, Shape &psi, DShape &dpsi, DenseMatrix< double > &djacobian_dX, RankFourTensor< double > &d_dpsidx_dX) const

double	d2shape_eulerian (const Vector< double > &s, Shape &psi, DShape &dpsidx, DShape &d2psidx) const

virtual double	d2shape_eulerian_at_knot (const unsigned &ipt, Shape &psi, DShape &dpsidx, DShape &d2psidx) const

virtual void	assign_nodal_local_eqn_numbers (const bool &store_local_dof_pt)

virtual void	describe_local_dofs (std::ostream &out, const std::string &current_string) const

virtual void	describe_nodal_local_dofs (std::ostream &out, const std::string &current_string) const

virtual void	assign_all_generic_local_eqn_numbers (const bool &store_local_dof_pt)

Node *&	node_pt (const unsigned &n)
	Return a pointer to the local node n. More...

Node *const &	node_pt (const unsigned &n) const
	Return a pointer to the local node n (const version) More...

unsigned	nnode () const
	Return the number of nodes. More...

virtual unsigned	nnode_1d () const

double	raw_nodal_position (const unsigned &n, const unsigned &i) const

double	raw_nodal_position (const unsigned &t, const unsigned &n, const unsigned &i) const

double	raw_dnodal_position_dt (const unsigned &n, const unsigned &i) const

double	raw_dnodal_position_dt (const unsigned &n, const unsigned &j, const unsigned &i) const

double	raw_nodal_position_gen (const unsigned &n, const unsigned &k, const unsigned &i) const

double	raw_nodal_position_gen (const unsigned &t, const unsigned &n, const unsigned &k, const unsigned &i) const

double	raw_dnodal_position_gen_dt (const unsigned &n, const unsigned &k, const unsigned &i) const

double	raw_dnodal_position_gen_dt (const unsigned &j, const unsigned &n, const unsigned &k, const unsigned &i) const

double	nodal_position (const unsigned &n, const unsigned &i) const

double	nodal_position (const unsigned &t, const unsigned &n, const unsigned &i) const

double	dnodal_position_dt (const unsigned &n, const unsigned &i) const
	Return the i-th component of nodal velocity: dx/dt at local node n. More...

double	dnodal_position_dt (const unsigned &n, const unsigned &j, const unsigned &i) const

double	nodal_position_gen (const unsigned &n, const unsigned &k, const unsigned &i) const

double	nodal_position_gen (const unsigned &t, const unsigned &n, const unsigned &k, const unsigned &i) const

double	dnodal_position_gen_dt (const unsigned &n, const unsigned &k, const unsigned &i) const

double	dnodal_position_gen_dt (const unsigned &j, const unsigned &n, const unsigned &k, const unsigned &i) const

virtual void	get_dresidual_dnodal_coordinates (RankThreeTensor< double > &dresidual_dnodal_coordinates)

virtual void	disable_ALE ()

virtual void	enable_ALE ()

virtual unsigned	required_nvalue (const unsigned &n) const

unsigned	nnodal_position_type () const

bool	has_hanging_nodes () const

unsigned	nodal_dimension () const
	Return the required Eulerian dimension of the nodes in this element. More...

virtual unsigned	nvertex_node () const

virtual Node *	vertex_node_pt (const unsigned &j) const

virtual Node *	construct_node (const unsigned &n)

virtual Node *	construct_node (const unsigned &n, TimeStepper *const &time_stepper_pt)

virtual Node *	construct_boundary_node (const unsigned &n)

virtual Node *	construct_boundary_node (const unsigned &n, TimeStepper *const &time_stepper_pt)

int	get_node_number (Node *const &node_pt) const

virtual Node *	get_node_at_local_coordinate (const Vector< double > &s) const

double	raw_nodal_value (const unsigned &n, const unsigned &i) const

double	raw_nodal_value (const unsigned &t, const unsigned &n, const unsigned &i) const

double	nodal_value (const unsigned &n, const unsigned &i) const

double	nodal_value (const unsigned &t, const unsigned &n, const unsigned &i) const

unsigned	dim () const

virtual ElementGeometry::ElementGeometry	element_geometry () const
	Return the geometry type of the element (either Q or T usually). More...

unsigned	ngeom_data () const

Data *	geom_data_pt (const unsigned &j)

void	position (const Vector< double > &zeta, Vector< double > &r) const

void	position (const unsigned &t, const Vector< double > &zeta, Vector< double > &r) const

void	dposition_dt (const Vector< double > &zeta, const unsigned &t, Vector< double > &drdt)

void	interpolated_zeta (const Vector< double > &s, Vector< double > &zeta) const

void	locate_zeta (const Vector< double > &zeta, GeomObject *&geom_object_pt, Vector< double > &s, const bool &use_coordinate_as_initial_guess=false)

virtual void	node_update ()

virtual void	identify_field_data_for_interactions (std::set< std::pair< Data *, unsigned >> &paired_field_data)

virtual void	identify_geometric_data (std::set< Data * > &geometric_data_pt)

double	size () const

virtual double	compute_physical_size () const

virtual void	point_output_data (const Vector< double > &s, Vector< double > &data)

void	point_output (std::ostream &outfile, const Vector< double > &s)

virtual unsigned	nplot_points_paraview (const unsigned &nplot) const

virtual unsigned	nsub_elements_paraview (const unsigned &nplot) const

void	output_paraview (std::ofstream &file_out, const unsigned &nplot) const

virtual void	write_paraview_output_offset_information (std::ofstream &file_out, const unsigned &nplot, unsigned &counter) const

virtual void	write_paraview_type (std::ofstream &file_out, const unsigned &nplot) const

virtual void	write_paraview_offsets (std::ofstream &file_out, const unsigned &nplot, unsigned &offset_sum) const

virtual unsigned	nscalar_paraview () const

virtual void	scalar_value_paraview (std::ofstream &file_out, const unsigned &i, const unsigned &nplot) const

virtual void	scalar_value_fct_paraview (std::ofstream &file_out, const unsigned &i, const unsigned &nplot, FiniteElement::SteadyExactSolutionFctPt exact_soln_pt) const

virtual void	scalar_value_fct_paraview (std::ofstream &file_out, const unsigned &i, const unsigned &nplot, const double &time, FiniteElement::UnsteadyExactSolutionFctPt exact_soln_pt) const

virtual std::string	scalar_name_paraview (const unsigned &i) const

virtual void	output (const unsigned &t, std::ostream &outfile, const unsigned &n_plot) const

virtual void	output_fct (std::ostream &outfile, const unsigned &n_plot, FiniteElement::SteadyExactSolutionFctPt exact_soln_pt)
	Output an exact solution over the element. More...

virtual void	output_fct (std::ostream &outfile, const unsigned &n_plot, const double &time, FiniteElement::UnsteadyExactSolutionFctPt exact_soln_pt)
	Output a time-dependent exact solution over the element. More...

virtual void	output_fct (std::ostream &outfile, const unsigned &n_plot, const double &time, const SolutionFunctorBase &exact_soln) const
	Output a time-dependent exact solution over the element. More...

virtual void	get_s_plot (const unsigned &i, const unsigned &nplot, Vector< double > &s, const bool &shifted_to_interior=false) const

virtual std::string	tecplot_zone_string (const unsigned &nplot) const

virtual void	write_tecplot_zone_footer (std::ostream &outfile, const unsigned &nplot) const

virtual void	write_tecplot_zone_footer (FILE *file_pt, const unsigned &nplot) const

virtual unsigned	nplot_points (const unsigned &nplot) const

virtual void	compute_error (FiniteElement::SteadyExactSolutionFctPt exact_soln_pt, double &error, double &norm)
	Calculate the norm of the error and that of the exact solution. More...

virtual void	compute_error (FiniteElement::UnsteadyExactSolutionFctPt exact_soln_pt, const double &time, double &error, double &norm)
	Calculate the norm of the error and that of the exact solution. More...

virtual void	compute_error (FiniteElement::SteadyExactSolutionFctPt exact_soln_pt, Vector< double > &error, Vector< double > &norm)

virtual void	compute_error (FiniteElement::UnsteadyExactSolutionFctPt exact_soln_pt, const double &time, Vector< double > &error, Vector< double > &norm)

virtual void	compute_error (std::ostream &outfile, FiniteElement::SteadyExactSolutionFctPt exact_soln_pt, double &error, double &norm)

virtual void	compute_error (std::ostream &outfile, FiniteElement::UnsteadyExactSolutionFctPt exact_soln_pt, const double &time, double &error, double &norm)

virtual void	compute_error (std::ostream &outfile, FiniteElement::SteadyExactSolutionFctPt exact_soln_pt, Vector< double > &error, Vector< double > &norm)

virtual void	compute_error (std::ostream &outfile, FiniteElement::UnsteadyExactSolutionFctPt exact_soln_pt, const double &time, Vector< double > &error, Vector< double > &norm)

virtual void	compute_abs_error (std::ostream &outfile, FiniteElement::SteadyExactSolutionFctPt exact_soln_pt, double &error)

void	integrate_fct (FiniteElement::SteadyExactSolutionFctPt integrand_fct_pt, Vector< double > &integral)
	Integrate Vector-valued function over element. More...

void	integrate_fct (FiniteElement::UnsteadyExactSolutionFctPt integrand_fct_pt, const double &time, Vector< double > &integral)
	Integrate Vector-valued time-dep function over element. More...

virtual void	build_face_element (const int &face_index, FaceElement *face_element_pt)

virtual unsigned	self_test ()

virtual unsigned	get_bulk_node_number (const int &face_index, const unsigned &i) const

virtual int	face_outer_unit_normal_sign (const int &face_index) const
	Get the sign of the outer unit normal on the face given by face_index. More...

virtual unsigned	nnode_on_face () const

void	face_node_number_error_check (const unsigned &i) const
	Range check for face node numbers. More...

virtual CoordinateMappingFctPt	face_to_bulk_coordinate_fct_pt (const int &face_index) const

virtual BulkCoordinateDerivativesFctPt	bulk_coordinate_derivatives_fct_pt (const int &face_index) const

Public Member Functions inherited from oomph::GeneralisedElement
	GeneralisedElement ()
	Constructor: Initialise all pointers and all values to zero. More...

virtual	~GeneralisedElement ()
	Virtual destructor to clean up any memory allocated by the object. More...

	GeneralisedElement (const GeneralisedElement &)=delete
	Broken copy constructor. More...

void	operator= (const GeneralisedElement &)=delete
	Broken assignment operator. More...

Data *&	internal_data_pt (const unsigned &i)
	Return a pointer to i-th internal data object. More...

Data *const &	internal_data_pt (const unsigned &i) const
	Return a pointer to i-th internal data object (const version) More...

Data *&	external_data_pt (const unsigned &i)
	Return a pointer to i-th external data object. More...

Data *const &	external_data_pt (const unsigned &i) const
	Return a pointer to i-th external data object (const version) More...

unsigned long	eqn_number (const unsigned &ieqn_local) const

int	local_eqn_number (const unsigned long &ieqn_global) const

unsigned	add_external_data (Data *const &data_pt, const bool &fd=true)

bool	external_data_fd (const unsigned &i) const

void	exclude_external_data_fd (const unsigned &i)

void	include_external_data_fd (const unsigned &i)

void	flush_external_data ()
	Flush all external data. More...

void	flush_external_data (Data *const &data_pt)
	Flush the object addressed by data_pt from the external data array. More...

unsigned	ninternal_data () const
	Return the number of internal data objects. More...

unsigned	nexternal_data () const
	Return the number of external data objects. More...

unsigned	ndof () const
	Return the number of equations/dofs in the element. More...

void	dof_vector (const unsigned &t, Vector< double > &dof)
	Return the vector of dof values at time level t. More...

void	dof_pt_vector (Vector< double * > &dof_pt)
	Return the vector of pointers to dof values. More...

void	set_internal_data_time_stepper (const unsigned &i, TimeStepper *const &time_stepper_pt, const bool &preserve_existing_data)

void	assign_internal_eqn_numbers (unsigned long &global_number, Vector< double * > &Dof_pt)

void	describe_dofs (std::ostream &out, const std::string &current_string) const

void	add_internal_value_pt_to_map (std::map< unsigned, double * > &map_of_value_pt)

virtual void	assign_local_eqn_numbers (const bool &store_local_dof_pt)

virtual void	complete_setup_of_dependencies ()

virtual void	get_residuals (Vector< double > &residuals)

virtual void	get_jacobian (Vector< double > &residuals, DenseMatrix< double > &jacobian)

virtual void	get_mass_matrix (Vector< double > &residuals, DenseMatrix< double > &mass_matrix)

virtual void	get_jacobian_and_mass_matrix (Vector< double > &residuals, DenseMatrix< double > &jacobian, DenseMatrix< double > &mass_matrix)

virtual void	get_dresiduals_dparameter (double *const &parameter_pt, Vector< double > &dres_dparam)

virtual void	get_djacobian_dparameter (double *const &parameter_pt, Vector< double > &dres_dparam, DenseMatrix< double > &djac_dparam)

virtual void	get_djacobian_and_dmass_matrix_dparameter (double *const &parameter_pt, Vector< double > &dres_dparam, DenseMatrix< double > &djac_dparam, DenseMatrix< double > &dmass_matrix_dparam)

virtual void	get_hessian_vector_products (Vector< double > const &Y, DenseMatrix< double > const &C, DenseMatrix< double > &product)

virtual void	get_inner_products (Vector< std::pair< unsigned, unsigned >> const &history_index, Vector< double > &inner_product)

virtual void	get_inner_product_vectors (Vector< unsigned > const &history_index, Vector< Vector< double >> &inner_product_vector)

virtual void	compute_norm (Vector< double > &norm)

virtual void	compute_norm (double &norm)

virtual unsigned	ndof_types () const

virtual void	get_dof_numbers_for_unknowns (std::list< std::pair< unsigned long, unsigned >> &dof_lookup_list) const

Public Member Functions inherited from oomph::GeomObject
	GeomObject ()
	Default constructor. More...

	GeomObject (const unsigned &ndim)

	GeomObject (const unsigned &nlagrangian, const unsigned &ndim)

	GeomObject (const unsigned &nlagrangian, const unsigned &ndim, TimeStepper *time_stepper_pt)

	GeomObject (const GeomObject &dummy)=delete
	Broken copy constructor. More...

void	operator= (const GeomObject &)=delete
	Broken assignment operator. More...

virtual	~GeomObject ()
	(Empty) destructor More...

unsigned	nlagrangian () const
	Access function to # of Lagrangian coordinates. More...

unsigned	ndim () const
	Access function to # of Eulerian coordinates. More...

void	set_nlagrangian_and_ndim (const unsigned &n_lagrangian, const unsigned &n_dim)
	Set # of Lagrangian and Eulerian coordinates. More...

TimeStepper *&	time_stepper_pt ()

TimeStepper *	time_stepper_pt () const

virtual void	position (const double &t, const Vector< double > &zeta, Vector< double > &r) const

virtual void	dposition (const Vector< double > &zeta, DenseMatrix< double > &drdzeta) const

virtual void	d2position (const Vector< double > &zeta, RankThreeTensor< double > &ddrdzeta) const

virtual void	d2position (const Vector< double > &zeta, Vector< double > &r, DenseMatrix< double > &drdzeta, RankThreeTensor< double > &ddrdzeta) const

Public Member Functions inherited from oomph::TemplateFreeContactElementBase
	TemplateFreeContactElementBase ()

virtual	~TemplateFreeContactElementBase ()
	Destructor. More...

void	traction_fct (const Vector< double > &x, Vector< double > &p)

bool	use_isoparametric_flag () const

bool	use_collocated_penetration_flag ()

bool	use_collocated_contact_pressure_flag ()

TractionFctPt &	traction_fct_pt ()
	Access function: Pointer to body force function. More...

TractionFctPt	traction_fct_pt () const
	Access function: Pointer to body force function (const version) More...

bool *&	use_isoparametric_flag_pt ()
	Access function: Pointer to flag to use isoparametric. More...

bool *	use_isoparametric_flag_pt () const

bool *&	use_collocated_penetration_flag_pt ()
	Access function: Pointer to flag to use collocated penetration. More...

bool *	use_collocated_penetration_flag_pt () const

bool *&	use_collocated_contact_pressure_flag_pt ()
	Access function: Pointer to flag to use collocated contact pressure. More...

bool *	use_collocated_contact_pressure_flag_pt () const

Additional Inherited Members
Public Types inherited from oomph::FiniteElement
typedef void(*	SteadyExactSolutionFctPt) (const Vector< double > &, Vector< double > &)

typedef void(*	UnsteadyExactSolutionFctPt) (const double &, const Vector< double > &, Vector< double > &)

Public Types inherited from oomph::TemplateFreeContactElementBase
typedef void(*	TractionFctPt) (const double &t, const Vector< double > &x, Vector< double > &p)

Static Public Attributes inherited from oomph::FiniteElement
static double	Tolerance_for_singular_jacobian = 1.0e-16
	Tolerance below which the jacobian is considered singular. More...

static bool	Accept_negative_jacobian = false

static bool	Suppress_output_while_checking_for_inverted_elements

Static Public Attributes inherited from oomph::GeneralisedElement
static bool	Suppress_warning_about_repeated_internal_data

static bool	Suppress_warning_about_repeated_external_data = true

static double	Default_fd_jacobian_step = 1.0e-8

Protected Types inherited from oomph::TemplateFreeContactElementBase
enum	{ Nodal_data , Nodal_position_data , External_data }
	Enumeration for type of penetrator data. More...

Protected Member Functions inherited from oomph::SurfaceContactElementBase< ELEMENT >
double	get_interpolated_lagrange_p (const Vector< double > &s)

void	penetration (const Vector< double > &x, const Vector< double > &n, double &d, bool &intersection) const
	Work out penetration of point. More...

Protected Member Functions inherited from oomph::FaceElement
void	add_additional_values (const Vector< unsigned > &nadditional_values, const unsigned &id)

Protected Member Functions inherited from oomph::FiniteElement
virtual void	assemble_local_to_eulerian_jacobian (const DShape &dpsids, DenseMatrix< double > &jacobian) const

virtual void	assemble_local_to_eulerian_jacobian2 (const DShape &d2psids, DenseMatrix< double > &jacobian2) const

virtual void	assemble_eulerian_base_vectors (const DShape &dpsids, DenseMatrix< double > &interpolated_G) const

template<unsigned DIM>
double	invert_jacobian (const DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const

virtual double	invert_jacobian_mapping (const DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const

virtual double	local_to_eulerian_mapping (const DShape &dpsids, DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const

double	local_to_eulerian_mapping (const DShape &dpsids, DenseMatrix< double > &inverse_jacobian) const

virtual double	local_to_eulerian_mapping_diagonal (const DShape &dpsids, DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const

virtual void	dJ_eulerian_dnodal_coordinates (const DenseMatrix< double > &jacobian, const DShape &dpsids, DenseMatrix< double > &djacobian_dX) const

template<unsigned DIM>
void	dJ_eulerian_dnodal_coordinates_templated_helper (const DenseMatrix< double > &jacobian, const DShape &dpsids, DenseMatrix< double > &djacobian_dX) const

virtual void	d_dshape_eulerian_dnodal_coordinates (const double &det_jacobian, const DenseMatrix< double > &jacobian, const DenseMatrix< double > &djacobian_dX, const DenseMatrix< double > &inverse_jacobian, const DShape &dpsids, RankFourTensor< double > &d_dpsidx_dX) const

template<unsigned DIM>
void	d_dshape_eulerian_dnodal_coordinates_templated_helper (const double &det_jacobian, const DenseMatrix< double > &jacobian, const DenseMatrix< double > &djacobian_dX, const DenseMatrix< double > &inverse_jacobian, const DShape &dpsids, RankFourTensor< double > &d_dpsidx_dX) const

virtual void	transform_derivatives (const DenseMatrix< double > &inverse_jacobian, DShape &dbasis) const

void	transform_derivatives_diagonal (const DenseMatrix< double > &inverse_jacobian, DShape &dbasis) const

virtual void	transform_second_derivatives (const DenseMatrix< double > &jacobian, const DenseMatrix< double > &inverse_jacobian, const DenseMatrix< double > &jacobian2, DShape &dbasis, DShape &d2basis) const

template<unsigned DIM>
void	transform_second_derivatives_template (const DenseMatrix< double > &jacobian, const DenseMatrix< double > &inverse_jacobian, const DenseMatrix< double > &jacobian2, DShape &dbasis, DShape &d2basis) const

template<unsigned DIM>
void	transform_second_derivatives_diagonal (const DenseMatrix< double > &jacobian, const DenseMatrix< double > &inverse_jacobian, const DenseMatrix< double > &jacobian2, DShape &dbasis, DShape &d2basis) const

virtual void	fill_in_jacobian_from_nodal_by_fd (Vector< double > &residuals, DenseMatrix< double > &jacobian)

void	fill_in_jacobian_from_nodal_by_fd (DenseMatrix< double > &jacobian)

virtual void	update_before_nodal_fd ()

virtual void	reset_after_nodal_fd ()

virtual void	update_in_nodal_fd (const unsigned &i)

virtual void	reset_in_nodal_fd (const unsigned &i)

void	fill_in_contribution_to_jacobian (Vector< double > &residuals, DenseMatrix< double > &jacobian)

template<>
double	invert_jacobian (const DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const
	Zero-d specialisation of function to calculate inverse of jacobian mapping. More...

template<>
double	invert_jacobian (const DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const
	One-d specialisation of function to calculate inverse of jacobian mapping. More...

template<>
double	invert_jacobian (const DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const
	Two-d specialisation of function to calculate inverse of jacobian mapping. More...

template<>
double	invert_jacobian (const DenseMatrix< double > &jacobian, DenseMatrix< double > &inverse_jacobian) const

template<>
void	dJ_eulerian_dnodal_coordinates_templated_helper (const DenseMatrix< double > &jacobian, const DShape &dpsids, DenseMatrix< double > &djacobian_dX) const

template<>
void	dJ_eulerian_dnodal_coordinates_templated_helper (const DenseMatrix< double > &jacobian, const DShape &dpsids, DenseMatrix< double > &djacobian_dX) const

template<>
void	dJ_eulerian_dnodal_coordinates_templated_helper (const DenseMatrix< double > &jacobian, const DShape &dpsids, DenseMatrix< double > &djacobian_dX) const

template<>
void	dJ_eulerian_dnodal_coordinates_templated_helper (const DenseMatrix< double > &jacobian, const DShape &dpsids, DenseMatrix< double > &djacobian_dX) const

template<>
void	d_dshape_eulerian_dnodal_coordinates_templated_helper (const double &det_jacobian, const DenseMatrix< double > &jacobian, const DenseMatrix< double > &djacobian_dX, const DenseMatrix< double > &inverse_jacobian, const DShape &dpsids, RankFourTensor< double > &d_dpsidx_dX) const

template<>
void	d_dshape_eulerian_dnodal_coordinates_templated_helper (const double &det_jacobian, const DenseMatrix< double > &jacobian, const DenseMatrix< double > &djacobian_dX, const DenseMatrix< double > &inverse_jacobian, const DShape &dpsids, RankFourTensor< double > &d_dpsidx_dX) const

template<>
void	d_dshape_eulerian_dnodal_coordinates_templated_helper (const double &det_jacobian, const DenseMatrix< double > &jacobian, const DenseMatrix< double > &djacobian_dX, const DenseMatrix< double > &inverse_jacobian, const DShape &dpsids, RankFourTensor< double > &d_dpsidx_dX) const

template<>
void	d_dshape_eulerian_dnodal_coordinates_templated_helper (const double &det_jacobian, const DenseMatrix< double > &jacobian, const DenseMatrix< double > &djacobian_dX, const DenseMatrix< double > &inverse_jacobian, const DShape &dpsids, RankFourTensor< double > &d_dpsidx_dX) const

template<>
void	transform_second_derivatives_template (const DenseMatrix< double > &jacobian, const DenseMatrix< double > &inverse_jacobian, const DenseMatrix< double > &jacobian2, DShape &dbasis, DShape &d2basis) const

template<>
void	transform_second_derivatives_template (const DenseMatrix< double > &jacobian, const DenseMatrix< double > &inverse_jacobian, const DenseMatrix< double > &jacobian2, DShape &dbasis, DShape &d2basis) const

template<>
void	transform_second_derivatives_diagonal (const DenseMatrix< double > &jacobian, const DenseMatrix< double > &inverse_jacobian, const DenseMatrix< double > &jacobian2, DShape &dbasis, DShape &d2basis) const

template<>
void	transform_second_derivatives_diagonal (const DenseMatrix< double > &jacobian, const DenseMatrix< double > &inverse_jacobian, const DenseMatrix< double > &jacobian2, DShape &dbasis, DShape &d2basis) const

Protected Member Functions inherited from oomph::GeneralisedElement
unsigned	add_internal_data (Data *const &data_pt, const bool &fd=true)

bool	internal_data_fd (const unsigned &i) const

void	exclude_internal_data_fd (const unsigned &i)

void	include_internal_data_fd (const unsigned &i)

void	clear_global_eqn_numbers ()

void	add_global_eqn_numbers (std::deque< unsigned long > const &global_eqn_numbers, std::deque< double * > const &global_dof_pt)

virtual void	assign_internal_and_external_local_eqn_numbers (const bool &store_local_dof_pt)

virtual void	assign_additional_local_eqn_numbers ()

int	internal_local_eqn (const unsigned &i, const unsigned &j) const

int	external_local_eqn (const unsigned &i, const unsigned &j)

void	fill_in_jacobian_from_internal_by_fd (Vector< double > &residuals, DenseMatrix< double > &jacobian, const bool &fd_all_data=false)

void	fill_in_jacobian_from_internal_by_fd (DenseMatrix< double > &jacobian, const bool &fd_all_data=false)

void	fill_in_jacobian_from_external_by_fd (Vector< double > &residuals, DenseMatrix< double > &jacobian, const bool &fd_all_data=false)

void	fill_in_jacobian_from_external_by_fd (DenseMatrix< double > &jacobian, const bool &fd_all_data=false)

virtual void	update_before_internal_fd ()

virtual void	reset_after_internal_fd ()

virtual void	update_in_internal_fd (const unsigned &i)

virtual void	reset_in_internal_fd (const unsigned &i)

virtual void	update_before_external_fd ()

virtual void	reset_after_external_fd ()

virtual void	update_in_external_fd (const unsigned &i)

virtual void	reset_in_external_fd (const unsigned &i)

virtual void	fill_in_contribution_to_mass_matrix (Vector< double > &residuals, DenseMatrix< double > &mass_matrix)

virtual void	fill_in_contribution_to_jacobian_and_mass_matrix (Vector< double > &residuals, DenseMatrix< double > &jacobian, DenseMatrix< double > &mass_matrix)

virtual void	fill_in_contribution_to_dresiduals_dparameter (double *const &parameter_pt, Vector< double > &dres_dparam)

virtual void	fill_in_contribution_to_djacobian_dparameter (double *const &parameter_pt, Vector< double > &dres_dparam, DenseMatrix< double > &djac_dparam)

virtual void	fill_in_contribution_to_djacobian_and_dmass_matrix_dparameter (double *const &parameter_pt, Vector< double > &dres_dparam, DenseMatrix< double > &djac_dparam, DenseMatrix< double > &dmass_matrix_dparam)

virtual void	fill_in_contribution_to_hessian_vector_products (Vector< double > const &Y, DenseMatrix< double > const &C, DenseMatrix< double > &product)

virtual void	fill_in_contribution_to_inner_products (Vector< std::pair< unsigned, unsigned >> const &history_index, Vector< double > &inner_product)

virtual void	fill_in_contribution_to_inner_product_vectors (Vector< unsigned > const &history_index, Vector< Vector< double >> &inner_product_vector)

Protected Attributes inherited from oomph::SurfaceContactElementBase< ELEMENT >
Penetrator *	Penetrator_pt
	Pointer to penetrator. More...

unsigned	Contact_id

bool	Enable_stick

Vector< int >	Penetrator_eq_data_type

Vector< int >	Penetrator_eq_data_index

Vector< int >	Penetrator_eq_data_data_index

Protected Attributes inherited from oomph::FaceElement
unsigned	Boundary_number_in_bulk_mesh
	The boundary number in the bulk mesh to which this element is attached. More...

FiniteElement *	Bulk_element_pt
	Pointer to the associated higher-dimensional "bulk" element. More...

Vector< unsigned >	Bulk_node_number

Vector< unsigned >	Nbulk_value

Vector< double > *	Tangent_direction_pt

Protected Attributes inherited from oomph::FiniteElement
MacroElement *	Macro_elem_pt
	Pointer to the element's macro element (NULL by default) More...

Protected Attributes inherited from oomph::GeomObject
unsigned	NLagrangian
	Number of Lagrangian (intrinsic) coordinates. More...

unsigned	Ndim
	Number of Eulerian coordinates. More...

TimeStepper *	Geom_object_time_stepper_pt

Protected Attributes inherited from oomph::TemplateFreeContactElementBase
TractionFctPt	Traction_fct_pt

bool *	Use_isoparametric_flag_pt
	Set whether or not to use isoparametric basis function for pressure. More...

bool *	Use_collocated_penetration_flag_pt
	Set options for basis/test functions for penetration and pressure. More...

bool *	Use_collocated_contact_pressure_flag_pt
	Set options for basis/test functions for penetration and pressure. More...

Static Protected Attributes inherited from oomph::FiniteElement
static const unsigned	Default_Initial_Nvalue = 0
	Default value for the number of values at a node. More...

static const double	Node_location_tolerance = 1.0e-14

static const unsigned	N2deriv [] = {0, 1, 3, 6}

Static Protected Attributes inherited from oomph::GeneralisedElement
static DenseMatrix< double >	Dummy_matrix

static std::deque< double * >	Dof_pt_deque

Detailed Description

template<class ELEMENT>
class oomph::NonlinearSurfaceContactElement< ELEMENT >

//////////////////////////////////////////////////////////////////// //////////////////////////////////////////////////////////////////// //////////////////////////////////////////////////////////////////// Class for elements that impose contact boundary conditions either enforcing non-penetration (but "without stick"; default) or permament contact (in which case contact force can be positive or negative. Uses Lagrange-multiplier-like pressure to enforce contact/non-penetration. Almost certainly works only with 2D Penetrator at the moment. Specific implementation for nonlinear elasticity.

Constructor & Destructor Documentation

◆ NonlinearSurfaceContactElement()

template<class ELEMENT >

oomph::NonlinearSurfaceContactElement< ELEMENT >::NonlinearSurfaceContactElement	(	FiniteElement *const &	element_pt,
		const int &	face_index,
		const unsigned &	id = `0`,
		const bool &	called_from_refineable_constructor = `false`
	)

inline

Constructor, which takes a "bulk" element and the value of the index and its limit

                                         : 
 //   FaceGeometry<ELEMENT>(), FaceElement(), 
  SurfaceContactElementBase<ELEMENT>(element_pt, 
                                     face_index,
                                     id,
                                     called_from_refineable_constructor)
   {}

Member Function Documentation

◆ fill_in_contribution_to_residuals_surface_contact()

template<class ELEMENT >

void oomph::NonlinearSurfaceContactElement< ELEMENT >::fill_in_contribution_to_residuals_surface_contact ( Vector< double > & residuals )

virtual

Return the residuals for the SurfaceContactElement equations.

///////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////

Implements oomph::SurfaceContactElementBase< ELEMENT >.

 {
  
  // Spatial dimension of problem
  unsigned n_dim = this->nodal_dimension();
  
  // Contribution to contact force
  Vector<double> contact_force(n_dim,0.0);
  
  // Create vector of local residuals (start assembling contributions
  // from zero -- necessary so we can over-write pseudo-hijacked
  // contributions at the end.
  unsigned n_dof=this->ndof();
  Vector<double> local_residuals(n_dof,0.0);
  {
   
   //Find out how many nodes there are
   unsigned n_node = this->nnode();
    
   //Find out how many positional dofs there are
   unsigned n_position_type = this->nnodal_position_type();
       
   //Integer to hold the local equation number
   int local_eqn=0;
    
   //Set up memory for the shape functions
   //Note that in this case, the number of lagrangian coordinates is always
   //equal to the dimension of the nodes
   Shape psi(n_node,n_position_type);
   DShape dpsids(n_node,n_position_type,n_dim-1); 
  
   // Separate shape functions for Lagrange multiplier
   Shape psi_p(n_node);
   Vector<double> s(n_dim-1);
  
   //Seperate shape for top hat function
   Shape psi_i(n_node);
  
   // Contribution to integrated pressure
   Vector<double> pressure_integral(n_node,0.0);
      
   // Contribution to weighted penetration integral
   Vector<double> penetration_integral(n_node,0.0);
      
   //Set the value of n_intpt
   unsigned n_intpt = this->integral_pt()->nweight();
    
   //Loop over the integration points
   for(unsigned ipt=0;ipt<n_intpt;ipt++)
    {
     //Get the integral weight
     double w = this->integral_pt()->weight(ipt);
      
     //Only need to call the local derivatives
     this->dshape_local_at_knot(ipt,psi,dpsids);
      
     // Separate shape function for Lagrange multiplier
     for(unsigned i=0;i<n_dim-1;i++)
      {
       s[i] = this->integral_pt()->knot(ipt,i);
      }
     this->shape_p(s,psi_p);
  
     //If we are using collocation for both, then we don't need to set up the integration shape
     if(!(this->use_collocated_penetration_flag() 
         && this->use_collocated_contact_pressure_flag()))
      {
       this->shape_i(s,psi_i);
      }
     
     // Interpolated Lagrange multiplier (pressure acting on solid
     // to enforce melting)
     double interpolated_lambda_p=0.0;
         
     //Calculate the Eulerian and Lagrangian coordinates 
     Vector<double> interpolated_x(n_dim,0.0);
      
     //Also calculate the surface Vectors (derivatives wrt local coordinates)
     DenseMatrix<double> interpolated_A(n_dim-1,n_dim,0.0);   
      
     //Calculate displacements and derivatives
     for(unsigned l=0;l<n_node;l++) 
      {
  
       // Cast to a boundary node
       BoundaryNodeBase *bnod_pt = 
        dynamic_cast<BoundaryNodeBase*>(this->node_pt(l));
        
       // Get the index of the nodal value associated with
       // this FaceElement
       unsigned first_index=
       bnod_pt->index_of_first_value_assigned_by_face_element(this->Contact_id);
        
       // Add to Lagrange multiplier (acting as pressure on solid
       // to enforce motion to ensure non-penetration)
       interpolated_lambda_p+=this->node_pt(l)->value(first_index)*psi_p[l];
        
       //Loop over positional dofs
       for(unsigned k=0;k<n_position_type;k++)
        {
         //Loop over displacement components (deformed position)
         for(unsigned i=0;i<n_dim;i++)
          {
           //Calculate the Eulerian and Lagrangian positions
           interpolated_x[i] += 
            this->nodal_position_gen(l,this->bulk_position_type(k),i)*psi(l,k);
                       
           //Loop over LOCAL derivative directions, to calculate the tangent(s)
           for(unsigned j=0;j<n_dim-1;j++)
            {
             interpolated_A(j,i) += 
              this->nodal_position_gen(l,this->bulk_position_type(k),i)*dpsids(l,k,j);
            }
          }
        }
      }
      
     //Now find the local deformed metric tensor from the tangent Vectors
     DenseMatrix<double> A(n_dim-1);
     for(unsigned i=0;i<n_dim-1;i++)
      {
       for(unsigned j=0;j<n_dim-1;j++)
        {
         //Initialise surface metric tensor to zero
         A(i,j) = 0.0;
         //Take the dot product
         for(unsigned k=0;k<n_dim;k++)
          { 
           A(i,j) += interpolated_A(i,k)*interpolated_A(j,k);
          }
        }
      }
      
     //Get the outer unit normal
     Vector<double> interpolated_normal(n_dim);
     this->outer_unit_normal(ipt,interpolated_normal);
      
     //Find the determinant of the metric tensor
     double Adet =0.0;
     switch(n_dim)
      {
      case 2:
       Adet = A(0,0);
       break;
      case 3:
       Adet = A(0,0)*A(1,1) - A(0,1)*A(1,0);
       break;
      default:
       throw OomphLibError(
        "Wrong dimension in SurfaceContactElement",
        "SurfaceContactElement::fill_in_contribution_to_residuals()",
        OOMPH_EXCEPTION_LOCATION);
      }
      
     //Premultiply the weights and the square-root of the determinant of 
     //the metric tensor
     double W = w*sqrt(Adet);
      
     // Calculate the "load" -- Lagrange multiplier acts as traction to
     // to enforce required surface displacement
     Vector<double> traction(n_dim);
     for (unsigned i=0;i<n_dim;i++)
      {
       traction[i]=-interpolated_lambda_p*interpolated_normal[i];
      }
  
  
     // Accumulate contribution to total contact force
     for(unsigned i=0;i<n_dim;i++)
      {
       contact_force[i]+=traction[i]*W;
      }
      
     //=====LOAD TERMS  FROM PRINCIPLE OF VIRTUAL DISPLACEMENTS========
        
     //Loop over the test functions, nodes of the element
     for(unsigned l=0;l<n_node;l++)
      {
       //Loop of types of dofs
       for(unsigned k=0;k<n_position_type;k++)
        {
         //Loop over the displacement components
         for(unsigned i=0;i<n_dim;i++)
          {
           local_eqn = this->position_local_eqn(l,this->bulk_position_type(k),i);
           /*IF it's not a boundary condition*/
           if(local_eqn >= 0)
            {
             //Add the loading terms to the residuals
             local_residuals[local_eqn] -= traction[i]*psi(l,k)*W;
            }
          }
        } //End of if not boundary condition
      } //End of loop over shape functions
 //faire!!!!
        //=====CONTRIBUTION TO CONTACT PRESSURE/LAGRANGE MULTIPLIER EQNS ========
     
     if(!this->use_collocated_contact_pressure_flag())
      {
       //Loop over the nodes
       for(unsigned l=0;l<n_node;l++)
        {
         // Contribution to integrated pressure
         pressure_integral[l]+=interpolated_lambda_p*psi_i[l]*W;
        }
      }
     
     if(!this->use_collocated_penetration_flag())
      {
       //Get local penetration
       double d = 0.0;
       bool intersection = false;
       this->penetration(interpolated_x,interpolated_normal,d,intersection);
       if(!intersection)
        {
         //if there is no intersection then we set d as -infinity
         d = -DBL_MAX;
        }
       
       //Loop over the nodes
       for(unsigned l=0;l<n_node;l++)
        {
         // Contribution to integrated penetration
         penetration_integral[l]+=d*psi_i[l]*W;
        }
      }
    } //End of loop over integration points
  
     
  
  
   
   // Determine contact pressure/Lagrange multiplier:
   //------------------------------------------------
   
   // Storage for nodal coordinate
   Vector<double> x(n_dim);
   
   //Loop over the nodes
   for(unsigned l=0;l<n_node;l++)
    {
     // get the node pt
     Node* nod_pt = this->node_pt(l);
    
     // Cast to a boundary node
     BoundaryNodeBase *bnod_pt =
      dynamic_cast<BoundaryNodeBase*>(nod_pt);
    
     // Get the index of the first nodal value associated with
     // this FaceElement
     unsigned first_index=
      bnod_pt->index_of_first_value_assigned_by_face_element(this->Contact_id);
  
     // Equation for Lagrange multiplier
     local_eqn = this->nodal_local_eqn(l,first_index);
     
     /*IF it's not a boundary condition*/
     if(local_eqn >= 0)
      {
       //Set to integrated discretisations for now
       double d=penetration_integral[l];
       double contact_pressure=pressure_integral[l];
       
       //overwrite appropriate measure if using collocation
       if(this->use_collocated_penetration_flag() 
          || this->use_collocated_contact_pressure_flag())
        {//If so, we are gonna need information about the node
         
         // Nodal position
         x[0]=nod_pt->x(0);
         x[1]=nod_pt->x(1);
         
         // Get outer unit normal
         Vector<double> s(1);
         this->local_coordinate_of_node(l,s);
         Vector<double> unit_normal(2);
         this->outer_unit_normal(s,unit_normal);
  
         if(this->use_collocated_penetration_flag())
          {
           // Get penetration
           bool intersection = false;
           this->penetration(x,unit_normal,d,intersection);
           
           //If there is no intersection, d = -max, ie the penetrator is infinitely far away
           if(!intersection)
            {
             d = -DBL_MAX;
            }
          }
  
         if(this->use_collocated_contact_pressure_flag())
          {
           contact_pressure=nod_pt->value(first_index);
          }
        }
  
       //Now that we have the appropriate discretisations of penetration and contact pressure, 
       //use the semi-smooth residual scheme
  
       // Contact/non-penetration residual
       if (this->Enable_stick)
        {
         // Enforce contact
         local_residuals[local_eqn]-=d;
        }
       else
        {
         // Piecewise linear variation for non-penetration constraint
         if (-d>contact_pressure)
          {
           local_residuals[local_eqn]+=contact_pressure;
          }
         else
          {
           local_residuals[local_eqn]-=d;
          }
        }
      }
    }
  }
  
 // faire: we need to go through this
  // Now deal with the penetrator equilibrium equations (if any!)
  unsigned n=this->Penetrator_eq_data_type.size();
  for (unsigned i=0;i<n;i++)
   {
    if (this->Penetrator_eq_data_type[i]>=0)
     {
      switch(unsigned(this->Penetrator_eq_data_type[i]))
       {
          
       case TemplateFreeContactElementBase::External_data:
       {
        int local_eqn=this->external_local_eqn(
         this->Penetrator_eq_data_data_index[i],
         this->Penetrator_eq_data_index[i]);
        if (local_eqn>=0)
         {
          local_residuals[local_eqn]+=contact_force[i];
         }
       }
       break;
         
       case TemplateFreeContactElementBase::Nodal_position_data:
       {
        // position type (dummy -- hierher paranoid check)
        unsigned k=0;
        int local_eqn=this->position_local_eqn(
         this->Penetrator_eq_data_data_index[i],k,
         this->Penetrator_eq_data_index[i]);
        if (local_eqn>=0)
         {
          local_residuals[local_eqn]+=contact_force[i];
         }
       }
       break;
         
         
       case TemplateFreeContactElementBase::Nodal_data:
       {
        int local_eqn=this->nodal_local_eqn(
         this->Penetrator_eq_data_data_index[i],
         this->Penetrator_eq_data_index[i]);
        if (local_eqn>=0)
         {
          local_residuals[local_eqn]+=contact_force[i];
         }
       }
       break;
         
       default:
  
  
        std::stringstream junk;
        junk << "Never get here: "
             << "unsigned(Penetrator_eq_data_type[i]) = "
             << unsigned(this->Penetrator_eq_data_type[i]);
        throw OomphLibError(
         junk.str(),
         OOMPH_CURRENT_FUNCTION,
         OOMPH_EXCEPTION_LOCATION);
  
       }
     }  
   }
  
  // Now add local contribution to existing entries
  for (unsigned j=0;j<n_dof;j++)
   {
    residuals[j]+=local_residuals[j];
   }
  
 }

References oomph::TemplateFreeContactElementBase::External_data, i, oomph::BoundaryNodeBase::index_of_first_value_assigned_by_face_element(), j, k, n, oomph::TemplateFreeContactElementBase::Nodal_data, oomph::TemplateFreeContactElementBase::Nodal_position_data, OOMPH_CURRENT_FUNCTION, OOMPH_EXCEPTION_LOCATION, s, sqrt(), oomph::Node::value(), w, oomph::QuadTreeNames::W, plotDoE::x, and oomph::Node::x().

◆ output() [1/2]

template<class ELEMENT >

void oomph::NonlinearSurfaceContactElement< ELEMENT >::output ( std::ostream & outfile )

inlinevirtual

Output function.

Reimplemented from oomph::SurfaceContactElementBase< ELEMENT >.

  {
   unsigned n_plot=5;
   this->output(outfile,n_plot);
  }

◆ output() [2/2]

template<class ELEMENT >

void oomph::NonlinearSurfaceContactElement< ELEMENT >::output	(	std::ostream &	outfile,
		const unsigned &	n_plot
	)

inlinevirtual

Output function.

Reimplemented from oomph::SurfaceContactElementBase< ELEMENT >.

  {
   
   unsigned n_dim = this->nodal_dimension();
   
   Vector<double> x(n_dim);
   Vector<double> xi(n_dim);
   Vector<double> s(n_dim-1);
   Vector<double> r_pen(n_dim);
   Vector<double> unit_normal(n_dim);
   
   // Tecplot header info
   outfile << this->tecplot_zone_string(n_plot);
   
   // Loop over plot points
   unsigned num_plot_points=this->nplot_points(n_plot);
   for (unsigned iplot=0;iplot<num_plot_points;iplot++)
    {
     // Get local coordinates of plot point
     this->get_s_plot(iplot,n_plot,s);
     
     // Get Eulerian and Lagrangian coordinates and outer unit normal
     this->interpolated_x(s,x);
     this->interpolated_xi(s,xi);
     this->outer_unit_normal(s,unit_normal);   
     
     // Get penetration
     double d=0.0;
     bool intersection = false;
     this->penetration(x,unit_normal,d,intersection);
     
     //Output the x,y,..
     for(unsigned i=0;i<n_dim;i++) 
      {outfile << x[i] << " ";}//1,2
     
     // Penetration
     outfile << std::max(d,-100.0) << " ";//3
     
     // Lagrange multiplier-like pressure
     double p=this->get_interpolated_lagrange_p(s);
     outfile << p << " "; //4
     
     
     // Plot Lagrange multiplier like pressure
     outfile << -unit_normal[0]*p << " ";//5
     outfile << -unit_normal[1]*p << " ";//6
     
     // Plot vector from current point to boundary of penetrator
     double d_tmp=d;
     if (!intersection) d_tmp=0.0;
     outfile << -d_tmp*unit_normal[0] << " "; 
     outfile << -d_tmp*unit_normal[1] << " "; 
     
     // Output normal
     for(unsigned i=0;i<n_dim;i++) 
      {outfile << unit_normal[i] << " ";} 
     
     
     //Output the displacements
     for(unsigned i=0;i<n_dim;i++) 
      {outfile << x[i]-xi[i] << " ";}
     
     outfile << std::endl;
    }
   
   // Write tecplot footer (e.g. FE connectivity lists)
   this->write_tecplot_zone_footer(outfile,n_plot);
   
  }

References oomph::SurfaceContactElementBase< ELEMENT >::get_interpolated_lagrange_p(), oomph::FiniteElement::get_s_plot(), i, oomph::FaceElement::interpolated_x(), max, oomph::FiniteElement::nodal_dimension(), oomph::FiniteElement::nplot_points(), oomph::FaceElement::outer_unit_normal(), p, oomph::SurfaceContactElementBase< ELEMENT >::penetration(), s, oomph::FiniteElement::tecplot_zone_string(), oomph::FiniteElement::write_tecplot_zone_footer(), and plotDoE::x.

◆ resulting_contact_force()

template<class ELEMENT >

void oomph::NonlinearSurfaceContactElement< ELEMENT >::resulting_contact_force ( Vector< double > & contact_force )

virtual

Resulting contact force.

Implements oomph::TemplateFreeContactElementBase.

 {
  //Find out how many nodes there are
  unsigned n_node = this->nnode();
    
  //Find out how many positional dofs there are
  unsigned n_position_type = this->nnodal_position_type();
    
  //Find out the dimension of the node
  unsigned n_dim = this->nodal_dimension();
  
  // Initialise
  for (unsigned i=0;i<n_dim;i++)
   {
    contact_force[i]=0.0;
   }
  
  //Set up memory for the shape functions
  //Note that in this case, the number of lagrangian coordinates is always
  //equal to the dimension of the nodes
  Shape psi(n_node,n_position_type);
  DShape dpsids(n_node,n_position_type,n_dim-1); 
    
  // Separate shape functions for Lagrange multiplier
  Shape psi_p(n_node);
  Vector<double> s(n_dim-1);
    
  //Set the value of n_intpt
  unsigned n_intpt = this->integral_pt()->nweight();
    
  //Loop over the integration points
  for(unsigned ipt=0;ipt<n_intpt;ipt++)
   {
    //Get the integral weight
    double w = this->integral_pt()->weight(ipt);
      
    //Only need to call the local derivatives
    this->dshape_local_at_knot(ipt,psi,dpsids);
      
    // Separate shape function for Lagrange multiplier
    for(unsigned i=0;i<n_dim-1;i++)
     {
      s[i] = this->integral_pt()->knot(ipt,i);
     }
    this->shape_p(s,psi_p);
      
    // Interpolated Lagrange multiplier (pressure acting on solid
    // to enforce melting)
    double interpolated_lambda_p=0.0;
      
    //Calculate the Eulerian and Lagrangian coordinates 
    Vector<double> interpolated_x(n_dim,0.0);
      
    //Also calculate the surface Vectors (derivatives wrt local coordinates)
    DenseMatrix<double> interpolated_A(n_dim-1,n_dim,0.0);   
      
    //Calculate displacements and derivatives
    for(unsigned l=0;l<n_node;l++) 
     {
      // Cast to a boundary node
      BoundaryNodeBase *bnod_pt = 
       dynamic_cast<BoundaryNodeBase*>(this->node_pt(l));
        
      // Get the index of the nodal value associated with
      // this FaceElement
      unsigned first_index=
       bnod_pt->index_of_first_value_assigned_by_face_element(this->Contact_id);
        
      // Add to Lagrange multiplier (acting as pressure on solid
      // to enforce motion to ensure non-penetration)
      interpolated_lambda_p+=this->node_pt(l)->value(first_index)*psi_p[l];
        
      //Loop over positional dofs
      for(unsigned k=0;k<n_position_type;k++)
       {
        //Loop over displacement components (deformed position)
        for(unsigned i=0;i<n_dim;i++)
         {
          //Calculate the Eulerian and Lagrangian positions
          interpolated_x[i] += 
           this->nodal_position_gen(l,this->bulk_position_type(k),i)*psi(l,k);
            
          //Loop over LOCAL derivative directions, to calculate the tangent(s)
          for(unsigned j=0;j<n_dim-1;j++)
           {
            interpolated_A(j,i) += 
             this->nodal_position_gen(l,this->bulk_position_type(k),i)*dpsids(l,k,j);
           }
         }
       }
     }
      
    //Now find the local deformed metric tensor from the tangent Vectors
    DenseMatrix<double> A(n_dim-1);
    for(unsigned i=0;i<n_dim-1;i++)
     {
      for(unsigned j=0;j<n_dim-1;j++)
       {
        //Initialise surface metric tensor to zero
        A(i,j) = 0.0;
        //Take the dot product
        for(unsigned k=0;k<n_dim;k++)
         { 
          A(i,j) += interpolated_A(i,k)*interpolated_A(j,k);
         }
       }
     }
      
    //Get the outer unit normal
    Vector<double> interpolated_normal(n_dim);
    this->outer_unit_normal(ipt,interpolated_normal);
      
    //Find the determinant of the metric tensor
    double Adet =0.0;
    switch(n_dim)
     {
     case 2:
      Adet = A(0,0);
      break;
     case 3:
      Adet = A(0,0)*A(1,1) - A(0,1)*A(1,0);
      break;
     default:
      throw OomphLibError(
       "Wrong dimension in SurfaceContactElement",
       "SurfaceContactElement::contact_force()",
       OOMPH_EXCEPTION_LOCATION);
     }
      
    //Premultiply the weights and the square-root of the determinant of 
    //the metric tensor
    double W = w*sqrt(Adet);
      
    // Calculate the "load" -- Lagrange multiplier acts as traction to
    // to enforce required surface displacement
    Vector<double> traction(n_dim);
    for (unsigned i=0;i<n_dim;i++)
     {
      traction[i]=-interpolated_lambda_p*interpolated_normal[i];
     }
      
    // Add to resulting force
    for (unsigned i=0;i<n_dim;i++)
     {
      contact_force[i]+=traction[i]*W;
     }
   }
  
 }

References i, oomph::BoundaryNodeBase::index_of_first_value_assigned_by_face_element(), j, k, OOMPH_EXCEPTION_LOCATION, s, sqrt(), w, and oomph::QuadTreeNames::W.

The documentation for this class was generated from the following file:

contact_elements.h

Public Member Functions

Additional Inherited Members

Detailed Description

template<class ELEMENT> class oomph::NonlinearSurfaceContactElement< ELEMENT >

Constructor & Destructor Documentation

◆ NonlinearSurfaceContactElement()

Member Function Documentation

◆ fill_in_contribution_to_residuals_surface_contact()

◆ output() [1/2]

◆ output() [2/2]

◆ resulting_contact_force()

template<class ELEMENT>
class oomph::NonlinearSurfaceContactElement< ELEMENT >