m_static_lib_3d_vp Module Reference

Functions/Subroutines
subroutine	stf_c3_vp (etype, nn, ecoord, gausses, stiff, tincr, v, temperature)
subroutine	update_c3_vp (etype, nn, ecoord, v, dv, gausses)
subroutine	load_c3_vp (etype, nn, ecoord, v, dv, r, gausses, tincr)

Function/Subroutine Documentation

load_c3_vp()

subroutine m_static_lib_3d_vp::load_c3_vp	(	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(4, nn), intent(in)	v,
		real(kind=kreal), dimension(4, nn), intent(in)	dv,
		real(kind=kreal), dimension(4*nn), intent(out)	r,
		type(tgaussstatus), dimension(:), intent(inout)	gausses,
		real(kind=kreal), intent(in)	tincr
	)

Parameters

[in]	etype	element type
[in]	nn	the number of elemental nodes
[in]	ecoord	coordinates of elemental nodes
[in]	v	nodal dislplacements
[in]	dv	nodal velocity increment
[out]	r	elemental residual
[in,out]	gausses	status of qudrature points
[in]	tincr	time increment

Definition at line 583 of file static_LIB_3d_vp.f90.

Here is the call graph for this function:

stf_c3_vp()

subroutine m_static_lib_3d_vp::stf_c3_vp	(	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,
		real(kind=kreal), intent(in)	tincr,
		real(kind=kreal), dimension(:, :), intent(in), optional	v,
		real(kind=kreal), dimension(nn), intent(in), optional	temperature
	)

Parameters

[in]	etype	element type
[in]	nn	the number of elemental nodes
[in]	ecoord	coordinates of elemental nodes
[in]	gausses	status of qudrature points
[out]	stiff	stiff matrix
[in]	tincr	time increment
[in]	v	nodal velocity

Definition at line 18 of file static_LIB_3d_vp.f90.

Here is the call graph for this function:

update_c3_vp()

subroutine m_static_lib_3d_vp::update_c3_vp	(	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(4, nn), intent(in)	v,
		real(kind=kreal), dimension(4, nn), intent(in)	dv,
		type(tgaussstatus), dimension(:), intent(inout)	gausses
	)

Parameters

[in]	etype	element type
[in]	nn	the number of elemental nodes
[in]	ecoord	coordinates of elemental nodes
[in]	v	nodal velcoity
[in]	dv	nodal velocity increment
[in,out]	gausses	status of qudrature points

Definition at line 495 of file static_LIB_3d_vp.f90.

Here is the call graph for this function: