![]() |
FrontISTR
5.7.1
Large-scale structural analysis program with finit element method
|
This module manages calculation relates with materials. More...
Functions/Subroutines | |
| integer function | getnlgeomflag (gauss) |
| Fetch the nlgeom flag of the material. More... | |
| subroutine | matlmatrix (gauss, sectType, matrix, time, dtime, cdsys, temperature, isEp, hdflag) |
| Calculate constituive matrix. More... | |
| subroutine | stressupdate (gauss, sectType, strain, stress, cdsys, time, dtime, temp, tempn, hdflag) |
| Update strain and stress for elastic and hyperelastic materials. More... | |
| subroutine | mat_c2d (cijkl, dij, itype) |
| Transfer rank 4 constituive matrix to rank 2 form. More... | |
| subroutine | matlmatrix_shell (gauss, sectType, D, e1_hat, e2_hat, e3_hat, cg1, cg2, cg3, alpha, n_layer) |
| subroutine | mat_c2d_shell (c, D, itype) |
| subroutine | getconnectorproperty (gauss, ctype, dofid, rparams, iparams, stretch) |
This module manages calculation relates with materials.
| subroutine m_matmatrix::getconnectorproperty | ( | type( tgaussstatus ), intent(in) | gauss, |
| integer(kind=kint), intent(in) | ctype, | ||
| integer(kind=kint), dimension ( used only in ***_d type connector ), intent(in) | dofid, | ||
| real(kind=kreal), dimension(:), intent(out) | rparams, | ||
| integer(kind=kint), dimension(:), intent(out) | iparams, | ||
| real(kind=kreal), intent(in), optional | stretch | ||
| ) |
| integer function m_matmatrix::getnlgeomflag | ( | type( tgaussstatus ), intent(in) | gauss | ) |
Fetch the nlgeom flag of the material.
Definition at line 23 of file calMatMatrix.f90.
| subroutine m_matmatrix::mat_c2d | ( | real(kind=kreal), dimension(3,3,3,3), intent(in) | cijkl, |
| real(kind=kreal), dimension(6,6), intent(out) | dij, | ||
| integer, intent(in) | itype | ||
| ) |
Transfer rank 4 constituive matrix to rank 2 form.
Definition at line 137 of file calMatMatrix.f90.
| subroutine m_matmatrix::mat_c2d_shell | ( | real(kind = kreal), dimension(:, :, :, :), intent(in) | c, |
| real(kind = kreal), dimension(:, :), intent(out) | D, | ||
| integer, intent(in) | itype | ||
| ) |
| subroutine m_matmatrix::matlmatrix | ( | type( tgaussstatus ), intent(in) | gauss, |
| integer, intent(in) | sectType, | ||
| real(kind=kreal), dimension(:,:), intent(out) | matrix, | ||
| real(kind=kreal), intent(in) | time, | ||
| real(kind=kreal), intent(in) | dtime, | ||
| real(kind=kreal), dimension(3,3), intent(in) | cdsys, | ||
| real(kind=kreal), intent(in) | temperature, | ||
| integer(kind=kint), intent(in), optional | isEp, | ||
| integer(kind=kint), intent(in), optional | hdflag | ||
| ) |
Calculate constituive matrix.
Definition at line 29 of file calMatMatrix.f90.
| subroutine m_matmatrix::matlmatrix_shell | ( | type(tgaussstatus), intent(in) | gauss, |
| integer, intent(in) | sectType, | ||
| real(kind = kreal), dimension(:, :), intent(out) | D, | ||
| real(kind = kreal), dimension(3), intent(in) | e1_hat, | ||
| real(kind = kreal), dimension(3), intent(in) | e2_hat, | ||
| real(kind = kreal), dimension(3), intent(in) | e3_hat, | ||
| real(kind = kreal), dimension(3), intent(in) | cg1, | ||
| real(kind = kreal), dimension(3), intent(in) | cg2, | ||
| real(kind = kreal), dimension(3), intent(in) | cg3, | ||
| real(kind = kreal), intent(out) | alpha, | ||
| integer, intent(in) | n_layer | ||
| ) |
Definition at line 216 of file calMatMatrix.f90.
| subroutine m_matmatrix::stressupdate | ( | type( tgaussstatus ), intent(inout) | gauss, |
| integer, intent(in) | sectType, | ||
| real(kind=kreal), dimension(6), intent(in) | strain, | ||
| real(kind=kreal), dimension(6), intent(out) | stress, | ||
| real(kind=kreal), dimension(3,3), intent(in) | cdsys, | ||
| real(kind=kreal), intent(in), optional | time, | ||
| real(kind=kreal), intent(in), optional | dtime, | ||
| real(kind=kreal), intent(in) | temp, | ||
| real(kind=kreal), intent(in) | tempn, | ||
| integer(kind=kint), intent(in) | hdflag | ||
| ) |
Update strain and stress for elastic and hyperelastic materials.
Definition at line 102 of file calMatMatrix.f90.