m_static_lib_c3d4sesns Module Reference

This module contains several strategy to free locking problem in Eight-node hexagonal element. More...

Functions/Subroutines
integer(kind=kint) function, public	return_nn_comp_c3d4_sesns (nn, nodlocal)
subroutine, public	stf_c3d4_sesns (etype, nn, nodlocal, ecoord, gausses, stiff, cdsys_ID, coords, time, tincr, tmpu, temperature)
subroutine, public	update_c3_sesns (etype, nn, nodlocal, ecoord, u, ddu, cdsys_ID, coords, qf, gausses, time, tincr, TT, T0, TN)
	Update strain and stress inside element. More...

Detailed Description

This module contains several strategy to free locking problem in Eight-node hexagonal element.

Function/Subroutine Documentation

return_nn_comp_c3d4_sesns()

integer(kind=kint) function, public m_static_lib_c3d4sesns::return_nn_comp_c3d4_sesns	(	integer(kind=kint), intent(in)	nn,
		integer(kind=kint), dimension(:), intent(inout)	nodlocal
	)

Parameters

[in]	nn	number of elemental nodes
[in,out]	nodlocal	node id ( used to compress data )

Definition at line 69 of file static_LIB_C3D4_selectiveESNS.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

stf_c3d4_sesns()

subroutine, public m_static_lib_c3d4sesns::stf_c3d4_sesns	(	integer(kind=kint), intent(in)	etype,
		integer(kind=kint), intent(inout)	nn,
		integer(kind=kint), dimension(:), intent(inout)	nodlocal,
		real(kind=kreal), dimension(3,nn), intent(in)	ecoord,
		type(tgaussstatus), dimension(:), intent(in)	gausses,
		real(kind=kreal), dimension(:,:), intent(out)	stiff,
		integer(kind=kint), intent(in)	cdsys_ID,
		real(kind=kreal), dimension(3,3), intent(inout)	coords,
		real(kind=kreal), intent(in)	time,
		real(kind=kreal), intent(in)	tincr,
		real(kind=kreal), dimension(:,:), intent(in), optional	tmpu,
		real(kind=kreal), dimension(nn), intent(in)	temperature
	)

Parameters

[in]	etype	element type
[in,out]	nn	number of elemental nodes
[in,out]	nodlocal	node id ( used to compress data )
[in]	ecoord	coordinates of elemental nodes
[in]	gausses	status of qudrature points
[out]	stiff	stiff matrix
[in,out]	coords	variables to define matreial coordinate system
[in]	time	current time
[in]	tincr	time increment
[in]	tmpu	nodal displacemwent

Definition at line 196 of file static_LIB_C3D4_selectiveESNS.f90.

Here is the call graph for this function:

update_c3_sesns()

subroutine, public m_static_lib_c3d4sesns::update_c3_sesns	(	integer(kind=kint), intent(in)	etype,
		integer(kind=kint), intent(inout)	nn,
		integer(kind=kint), dimension(:), intent(inout)	nodlocal,
		real(kind=kreal), dimension(3, nn), intent(in)	ecoord,
		real(kind=kreal), dimension(3, nn), intent(in)	u,
		real(kind=kreal), dimension(3, nn), intent(in)	ddu,
		integer(kind=kint), intent(in)	cdsys_ID,
		real(kind=kreal), dimension(3, 3), intent(inout)	coords,
		real(kind=kreal), dimension(nn*3), intent(out)	qf,
		type(tgaussstatus), dimension(:), intent(inout)	gausses,
		real(kind=kreal), intent(in)	time,
		real(kind=kreal), intent(in)	tincr,
		real(kind=kreal), dimension(nn), intent(in)	TT,
		real(kind=kreal), dimension(nn), intent(in)	T0,
		real(kind=kreal), dimension(nn), intent(in)	TN
	)

Update strain and stress inside element.

Parameters

[in]	etype	[in] element type
[in,out]	nn	[in] number of elemental nodes
[in,out]	nodlocal	[inout] node id ( used to compress data )
[in]	ecoord	[in] coordinates of elemental nodes
[in]	u	[in] nodal dislplacements
[in]	ddu	[in] nodal displacement
[in,out]	coords	variables to define matreial coordinate system
[out]	qf	[out] Internal Force
[in,out]	gausses	[out] status of qudrature points
[in]	time	current time
[in]	tincr	time increment
[in]	tt	current temperature
[in]	t0	reference temperature
[in]	tn	reference temperature

Definition at line 375 of file static_LIB_C3D4_selectiveESNS.f90.

Here is the call graph for this function: