FrontISTR  5.2.0
Large-scale structural analysis program with finit element method
m_static_lib_1d Module Reference

This module provide common functions of 3D truss elements. More...

Functions/Subroutines

subroutine stf_c1 (etype, nn, ecoord, area, gausses, stiff, u, temperature)
 This subroutine calculate stiff matrix of 2-nodes truss element. More...
 
subroutine update_c1 (etype, nn, ecoord, area, u, du, qf, gausses, TT, T0)
 Update strain and stress inside element. More...
 
subroutine nodalstress_c1 (ETYPE, NN, gausses, ndstrain, ndstress)
 
subroutine elementstress_c1 (ETYPE, gausses, strain, stress)
 
subroutine dl_c1 (etype, nn, xx, yy, zz, rho, thick, ltype, params, vect, nsize)
 
subroutine truss_diag_modify (hecMAT, hecMESH)
 
subroutine search_diag_modify (n, nn, hecMAT, hecMESH)
 

Detailed Description

This module provide common functions of 3D truss elements.

Function/Subroutine Documentation

◆ dl_c1()

subroutine m_static_lib_1d::dl_c1 ( integer(kind = kint), intent(in)  etype,
integer(kind = kint), intent(in)  nn,
real(kind = kreal), dimension(:), intent(in)  xx,
real(kind = kreal), dimension(:), intent(in)  yy,
real(kind = kreal), dimension(:), intent(in)  zz,
real(kind = kreal)  rho,
real(kind = kreal)  thick,
integer(kind = kint)  ltype,
real(kind = kreal), dimension(0:6), intent(in)  params,
real(kind = kreal), dimension(:), intent(inout)  vect,
integer(kind = kint)  nsize 
)

Definition at line 187 of file static_LIB_1d.f90.

◆ elementstress_c1()

subroutine m_static_lib_1d::elementstress_c1 ( integer(kind=kint), intent(in)  ETYPE,
type(tgaussstatus), dimension(:), intent(in)  gausses,
real(kind=kreal), dimension(6), intent(out)  strain,
real(kind=kreal), dimension(6), intent(out)  stress 
)

Definition at line 168 of file static_LIB_1d.f90.

◆ nodalstress_c1()

subroutine m_static_lib_1d::nodalstress_c1 ( integer(kind=kint), intent(in)  ETYPE,
integer(kind=kint), intent(in)  NN,
type(tgaussstatus), dimension(:), intent(in)  gausses,
real(kind=kreal), dimension(nn,6), intent(out)  ndstrain,
real(kind=kreal), dimension(nn,6), intent(out)  ndstress 
)

Definition at line 147 of file static_LIB_1d.f90.

◆ search_diag_modify()

subroutine m_static_lib_1d::search_diag_modify ( integer  n,
integer  nn,
type (hecmwst_matrix hecMAT,
type (hecmwst_local_mesh hecMESH 
)

Definition at line 290 of file static_LIB_1d.f90.

◆ stf_c1()

subroutine m_static_lib_1d::stf_c1 ( integer(kind=kint), intent(in)  etype,
integer(kind=kint), intent(in)  nn,
real(kind=kreal), dimension(3,nn), intent(in)  ecoord,
real(kind=kreal), intent(in)  area,
type(tgaussstatus), dimension(:), intent(in)  gausses,
real(kind=kreal), dimension(:,:), intent(out)  stiff,
real(kind=kreal), dimension(:,:), intent(in), optional  u,
real(kind=kreal), dimension(nn), intent(in), optional  temperature 
)

This subroutine calculate stiff matrix of 2-nodes truss element.

Parameters
[in]etypeelement type
[in]nnnumber of elemental nodes
[in]ecoordcoordinates of elemental nodes
[in]areasection area
[in]gaussesstatus of qudrature points
[out]stiffstiff matrix
[in]unodal displacemwent

Definition at line 17 of file static_LIB_1d.f90.

◆ truss_diag_modify()

subroutine m_static_lib_1d::truss_diag_modify ( type (hecmwst_matrix hecMAT,
type (hecmwst_local_mesh hecMESH 
)

Definition at line 251 of file static_LIB_1d.f90.

Here is the caller graph for this function:

◆ update_c1()

subroutine m_static_lib_1d::update_c1 ( integer(kind=kint), intent(in)  etype,
integer(kind=kint), intent(in)  nn,
real(kind=kreal), dimension(3,nn), intent(in)  ecoord,
real(kind=kreal), intent(in)  area,
real(kind=kreal), dimension(3,nn), intent(in)  u,
real(kind=kreal), dimension(3,nn), intent(in)  du,
real(kind=kreal), dimension(nn*3), intent(out)  qf,
type(tgaussstatus), dimension(:), intent(inout)  gausses,
real(kind=kreal), dimension(nn), intent(in), optional  TT,
real(kind=kreal), dimension(nn), intent(in), optional  T0 
)

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]areasection area
[in]u[in] nodal dislplacements
[in]du[in] nodal displacement ( solutions of solver )
[out]qf[out] Internal Force
[in,out]gausses[out] status of qudrature points
[in]ttcurrent temperature
[in]t0reference temperature

Definition at line 73 of file static_LIB_1d.f90.