m_static_lib_3dic Module Reference

Eight-node hexagonal element with incompatible mode. More...

Functions/Subroutines
subroutine	stf_c3d8ic (etype, nn, ecoord, gausses, stiff, cdsys_ID, coords, time, tincr, u, aux, temperature)
	CALCULATION STIFF Matrix for C3D8IC ELEMENT. More...
subroutine	update_c3d8ic (etype, nn, ecoord, u, du, ddu, cdsys_ID, coords, qf, gausses, iter, time, tincr, aux, ddaux, TT, T0, TN)
	Update strain and stress inside element. More...
subroutine	tload_c3d8ic (etype, nn, xx, yy, zz, tt, t0, gausses, VECT, cdsys_ID, coords)
	This subroutine calculates thermal loading. More...

Detailed Description

Eight-node hexagonal element with incompatible mode.

See also

R.L.Taylor,P.J.Bereford, and E.L.Wilson, "A Nonconforming element for Stress Analysis", Intl. J. Numer. Methods Engng, 10(6), pp1211-1219 ,1976

Function/Subroutine Documentation

stf_c3d8ic()

subroutine m_static_lib_3dic::stf_c3d8ic	(	integer(kind=kint), intent(in)	etype,
		integer(kind=kint), intent(in)	nn,
		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(3, nn), intent(in), optional	u,
		real(kind=kreal), dimension(3, 3), intent(in), optional	aux,
		real(kind=kreal), dimension(nn), intent(in)	temperature
	)

CALCULATION STIFF Matrix for C3D8IC ELEMENT.

Parameters

[in]	etype	element type, not used here
[in]	nn	number of elements nodes
[in]	ecoord	nodal coord of curr element
[in]	gausses	Info of qudrature points
[out]	stiff	stiffness matrix
[in,out]	coords	variables to define material coordinate system
[in]	time	current time
[in]	tincr	time increment
[in]	u	nodal displacemwent
[in]	aux	enhanced disp of bending mode

Definition at line 24 of file static_LIB_3dIC.f90.

Here is the call graph for this function:

tload_c3d8ic()

subroutine m_static_lib_3dic::tload_c3d8ic	(	integer(kind=kint), intent(in)	etype,
		integer(kind=kint), intent(in)	nn,
		real(kind=kreal), dimension(nn), intent(in)	xx,
		real(kind=kreal), dimension(nn), intent(in)	yy,
		real(kind=kreal), dimension(nn), intent(in)	zz,
		real(kind=kreal), dimension(nn), intent(in)	tt,
		real(kind=kreal), dimension(nn), intent(in)	t0,
		type(tgaussstatus), dimension(:), intent(inout)	gausses,
		real(kind=kreal), dimension(nn*ndof), intent(out)	VECT,
		integer(kind=kint), intent(in)	cdsys_ID,
		real(kind=kreal), dimension(3, 3), intent(inout)	coords
	)

This subroutine calculates thermal loading.

Parameters

[in]	etype	element type, not used here
[in]	nn	number of element nodes
[in]	zz	nodes coordinate of element
[in]	t0	current and ref temperature
[in,out]	gausses	info about qudrature points
[out]	vect	load vector
[in,out]	coords	variables to define material coordinate system

Definition at line 681 of file static_LIB_3dIC.f90.

Here is the call graph for this function:

update_c3d8ic()

subroutine m_static_lib_3dic::update_c3d8ic	(	integer(kind=kint), intent(in)	etype,
		integer(kind=kint), intent(in)	nn,
		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)	du,
		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,
		integer, intent(in)	iter,
		real(kind=kreal), intent(in)	time,
		real(kind=kreal), intent(in)	tincr,
		real(kind=kreal), dimension(3, 3), intent(inout)	aux,
		real(kind=kreal), dimension(3, 3), intent(out)	ddaux,
		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]	nn	[in] number of elemental nodes
[in]	ecoord	[in] coordinates of elemental nodes
[in]	u	[in] nodal displacements
[in]	du	[in] increment of nodal displacements
[in]	ddu	[in] correction of nodal displacements
[in,out]	coords	variables to define material coordinate system
[out]	qf	[out] Internal Force
[in,out]	gausses	[out] status of qudrature points
[in]	time	current time
[in]	tincr	time increment
[in,out]	aux	[in] incompatible dof
[out]	ddaux	[in] increment of incompatible dof
[in]	tt	current temperature
[in]	t0	reference temperature
[in]	tn	reference temperature

Definition at line 223 of file static_LIB_3dIC.f90.

Here is the call graph for this function: