![]() |
FrontISTR
5.8.0
Large-scale structural analysis program with finit element method
|
This module provides functions for elastic material. More...
Functions/Subroutines | |
| subroutine | calelasticmatrix (matl, sectType, D, temp, hdflag) |
| Calculate isotropic elastic matrix hdflag: 0=full, 1=deviatoric only (edge-smoothed, etype=891), 2=volumetric only (node-smoothed, etype=881) More... | |
| subroutine | calelasticmatrix_ortho (matl, sectType, bij, DMAT, temp, hdflag) |
| Calculate orthotropic elastic matrix bij: rotation matrix from material axes to global axes, supplied via !SECTION ORIENTATION= (mandatory) hdflag: 0=full, 1=deviatoric only (edge-smoothed, etype=891), 2=volumetric only (node-smoothed, etype=881) volumetric part uses projector split: c = 1 / sum(S(1:3,1:3)), D_vol = c * m*m^T. More... | |
| subroutine | linearelastic_shell (matl, sectType, c, e1_hat, e2_hat, e3_hat, cg1, cg2, cg3, alpha, n_layer) |
This module provides functions for elastic material.
| subroutine m_elasticlinear::calelasticmatrix | ( | type( tmaterial ), intent(in) | matl, |
| integer, intent(in) | sectType, | ||
| real(kind=kreal), dimension(:,:), intent(out) | D, | ||
| real(kind=kreal), intent(in) | temp, | ||
| integer(kind=kint), intent(in), optional | hdflag | ||
| ) |
Calculate isotropic elastic matrix hdflag: 0=full, 1=deviatoric only (edge-smoothed, etype=891), 2=volumetric only (node-smoothed, etype=881)
Definition at line 16 of file ElasticLinear.f90.
| subroutine m_elasticlinear::calelasticmatrix_ortho | ( | type( tmaterial ), intent(in) | matl, |
| integer, intent(in) | sectType, | ||
| real(kind=kreal), dimension(3,3), intent(in) | bij, | ||
| real(kind=kreal), dimension(:,:), intent(out) | DMAT, | ||
| real(kind=kreal), intent(in) | temp, | ||
| integer(kind=kint), intent(in), optional | hdflag | ||
| ) |
Calculate orthotropic elastic matrix bij: rotation matrix from material axes to global axes, supplied via !SECTION ORIENTATION= (mandatory) hdflag: 0=full, 1=deviatoric only (edge-smoothed, etype=891), 2=volumetric only (node-smoothed, etype=881) volumetric part uses projector split: c = 1 / sum(S(1:3,1:3)), D_vol = c * m*m^T.
Definition at line 112 of file ElasticLinear.f90.
| subroutine m_elasticlinear::linearelastic_shell | ( | type( tmaterial ), intent(in) | matl, |
| integer, intent(in) | sectType, | ||
| real(kind = kreal), dimension(:, :, :, :), intent(out) | c, | ||
| 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 | ||
| ) |
| [in] | e3_hat | local Orthonormal frame |
| [in] | cg3 | contravaraint frame |
Definition at line 192 of file ElasticLinear.f90.