![]() |
FrontISTR
5.7.0
Large-scale structural analysis program with finit element method
|
This module provides common functions of Plane deformation elements. More...
Functions/Subroutines | |
subroutine | stf_c2 (ETYPE, NN, ecoord, gausses, PARAM1, stiff, ISET, u) |
subroutine | dl_c2 (ETYPE, NN, XX, YY, RHO, PARAM1, LTYPE, PARAMS, VECT, NSIZE, ISET) |
subroutine | tload_c2 (ETYPE, NN, XX, YY, TT, T0, gausses, PARAM1, ISET, VECT) |
subroutine | update_c2 (etype, nn, ecoord, gausses, PARAM1, iset, u, ddu, qf, TT, T0, TN) |
Update strain and stress inside element. More... | |
subroutine | nodalstress_c2 (ETYPE, NN, gausses, ndstrain, ndstress) |
subroutine | elementstress_c2 (ETYPE, gausses, strain, stress) |
This module provides common functions of Plane deformation elements.
subroutine m_static_lib_2d::dl_c2 | ( | 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) | RHO, | ||
real(kind=kreal) | PARAM1, | ||
integer(kind=kint) | LTYPE, | ||
real(kind=kreal), dimension(0:6), intent(in) | PARAMS, | ||
real(kind=kreal), dimension(nn*2), intent(out) | VECT, | ||
integer(kind=kint) | NSIZE, | ||
integer(kind=kint) | ISET | ||
) |
subroutine m_static_lib_2d::elementstress_c2 | ( | integer(kind=kint), intent(in) | ETYPE, |
type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
real(kind=kreal), dimension(4), intent(out) | strain, | ||
real(kind=kreal), dimension(4), intent(out) | stress | ||
) |
subroutine m_static_lib_2d::nodalstress_c2 | ( | integer(kind=kint), intent(in) | ETYPE, |
integer(kind=kint), intent(in) | NN, | ||
type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
real(kind=kreal), dimension(nn,4), intent(out) | ndstrain, | ||
real(kind=kreal), dimension(nn,4), intent(out) | ndstress | ||
) |
subroutine m_static_lib_2d::stf_c2 | ( | integer(kind=kint), intent(in) | ETYPE, |
integer(kind=kint), intent(in) | NN, | ||
real(kind=kreal), dimension(2,nn), intent(in) | ecoord, | ||
type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
real(kind=kreal), intent(in) | PARAM1, | ||
real(kind=kreal), dimension(:,:), intent(out) | stiff, | ||
integer(kind=kint), intent(in) | ISET, | ||
real(kind=kreal), dimension(:,:), intent(in), optional | u | ||
) |
subroutine m_static_lib_2d::tload_c2 | ( | 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) | TT, | ||
real(kind=kreal), dimension(nn), intent(in) | T0, | ||
type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
real(kind=kreal), intent(in) | PARAM1, | ||
integer(kind=kint) | ISET, | ||
real(kind=kreal), dimension(nn*2), intent(out) | VECT | ||
) |
[in] | gausses | status of qudrature points |
Definition at line 303 of file static_LIB_2d.f90.
subroutine m_static_lib_2d::update_c2 | ( | 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(inout) | gausses, | ||
real(kind=kreal), intent(in) | PARAM1, | ||
integer(kind=kint), intent(in) | iset, | ||
real(kind=kreal), dimension(2,nn), intent(in) | u, | ||
real(kind=kreal), dimension(2,nn), intent(in) | ddu, | ||
real(kind=kreal), dimension(:), intent(out) | qf, | ||
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.
[in] | tt | current temperature |
[in] | t0 | reference temperature |
[in] | tn | reference temperature |
Definition at line 418 of file static_LIB_2d.f90.