![]() |
FrontISTR
5.9.0
Large-scale structural analysis program with finit element method
|
This module ... More...
Functions/Subroutines | |
| logical function | shellsupportsfiniterotationkinematics (etype, nn) |
| pure real(kind=kreal) function, dimension(3, 3) | outer_product3 (a, b) |
| pure subroutine | shell_basis_from_covariant (g1, g2, g3, e1_hat, e2_hat, e3_hat, cg1, cg2, cg3, det) |
| subroutine | shellstressvectortotensor (stress, tensor) |
| subroutine | shelltensortostressvector (tensor, stress) |
| subroutine | shellobjectivestressincrement (stress_old, dstrain, dstress_obj, trace_coeff) |
| subroutine | shellobjectivetracestressincrement (stress_old, dstrain, dstress_trace, trace_coeff) |
| real(kind=kreal) function | shellplanestresstracecoeff (gauss, n_layer) |
| subroutine | shelladdstressvectortodb (dstress, j, DB) |
| subroutine | shelladdulobjectivetracetangent (stress_old, ncol, B, DB, trace_coeff) |
| subroutine | shelladdulobjectivetangent (stress_old, ncol, B, DB, trace_coeff) |
| subroutine | stf_shell_mitc (etype, nn, ndof, ecoord, gausses, stiff, thick, mixflag, nddisp, element, qf_stress, include_geo_stiff, nddirector, ndrefdirector, ndcurdirector, nddrill) |
| subroutine | shelldirectorincrement (theta, director_ref, director_inc) |
| pure subroutine | shellrotationvectortomatrix (theta, rotmat) |
| pure subroutine | shellrotationmatrixtovector (rotmat, theta) |
| pure subroutine | shellcomposerotationvector (theta_old, theta_inc, theta_new) |
| pure subroutine | shellrelativerotationvector (theta_old, theta_target, theta_inc) |
| pure subroutine | shellorthonormalizetriad (triad_in, triad_out) |
| pure subroutine | shellupdatetriadwithincrement (triad_old, drill_old, theta_inc, triad_new, drill_new) |
| subroutine | shellcomposenodaldisplacement (ndof, nn, disp_old, disp_inc, disp_new) |
| pure subroutine | shelldirectorincrementalderiv (director_current, director_deriv) |
| pure subroutine | shelldirectorincrementalsecondderiv (director_current, director_second) |
| subroutine | elementstress_shell_mitc (etype, nn, ndof, ecoord, gausses, edisp, strain, stress, thick, zeta, n_layer, n_totlyr, surface_gauss_points, local_strain, local_stress, local_stress_override, nddirector, ndrefdirector, ndbase_disp) |
| subroutine | updatestressshellul_elastic (gauss, dstrain, dstress, trace_coeff) |
| subroutine | updateshelllayergauss_shell_mitc (etype, nn, ndof, ecoord, element, edisp, thick, nddirector, ndrefdirector, ndbase_disp) |
| subroutine | dl_shell (etype, nn, ndof, xx, yy, zz, rho, thick, ltype, params, vect, nsize, gausses) |
| subroutine | dl_shell_33 (ic_type, nn, ndof, xx, yy, zz, rho, thick, ltype, params, vect, nsize, gausses) |
| subroutine | updatest_shell_mitc (etype, nn, ndof, ecoord, u, du, gausses, qf, thick, mixflag, nddisp, element, nddirector, ndrefdirector, ndcurdirector, nddrill) |
| subroutine | updatest_shell_mitc33 (etype, nn, ndof, ecoord, u, du, gausses, qf, thick, mixflag, nddisp) |
| subroutine | mass_shell (etype, nn, elem, rho, thick, gausses, mass, lumped) |
This module ...
| subroutine m_static_lib_shell::dl_shell | ( | integer(kind = kint), intent(in) | etype, |
| integer(kind = kint), intent(in) | nn, | ||
| integer(kind = kint), intent(in) | ndof, | ||
| real(kind = kreal), dimension(*), intent(in) | xx, | ||
| real(kind = kreal), dimension(*), intent(in) | yy, | ||
| real(kind = kreal), dimension(*), intent(in) | zz, | ||
| real(kind = kreal), intent(in) | rho, | ||
| real(kind = kreal), intent(in) | thick, | ||
| integer | ltype, | ||
| real(kind = kreal), dimension(*), intent(in) | params, | ||
| real(kind = kreal), dimension(*), intent(out) | vect, | ||
| integer(kind = kint), intent(out) | nsize, | ||
| type(tgaussstatus), dimension(:), intent(in) | gausses | ||
| ) |
Definition at line 4047 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::dl_shell_33 | ( | integer(kind = kint) | ic_type, |
| integer(kind = kint) | nn, | ||
| integer(kind = kint) | ndof, | ||
| real(kind = kreal), dimension(*) | xx, | ||
| real(kind = kreal), dimension(*) | yy, | ||
| real(kind = kreal), dimension(*) | zz, | ||
| real(kind = kreal) | rho, | ||
| real(kind = kreal) | thick, | ||
| integer | ltype, | ||
| real(kind = kreal), dimension(*) | params, | ||
| real(kind = kreal), dimension(*) | vect, | ||
| integer(kind = kint) | nsize, | ||
| type(tgaussstatus), dimension(:) | gausses | ||
| ) |
| subroutine m_static_lib_shell::elementstress_shell_mitc | ( | integer(kind = kint), intent(in) | etype, |
| integer(kind = kint), intent(in) | nn, | ||
| integer(kind = kint), intent(in) | ndof, | ||
| real(kind = kreal), dimension(3, nn), intent(in) | ecoord, | ||
| type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
| real(kind = kreal), dimension(6, nn), intent(in) | edisp, | ||
| real(kind = kreal), dimension(:,:), intent(out) | strain, | ||
| real(kind = kreal), dimension(:,:), intent(out) | stress, | ||
| real(kind = kreal), intent(in) | thick, | ||
| real(kind = kreal), intent(in) | zeta, | ||
| integer | n_layer, | ||
| integer | n_totlyr, | ||
| logical, intent(in), optional | surface_gauss_points, | ||
| real(kind = kreal), dimension(:,:), intent(out), optional | local_strain, | ||
| real(kind = kreal), dimension(:,:), intent(out), optional | local_stress, | ||
| real(kind = kreal), dimension(:,:), intent(in), optional | local_stress_override, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | nddirector, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | ndrefdirector, | ||
| real(kind = kreal), dimension(6, nn), intent(in), optional | ndbase_disp | ||
| ) |
Definition at line 2641 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::mass_shell | ( | integer(kind = kint), intent(in) | etype, |
| integer(kind = kint), intent(in) | nn, | ||
| real(kind = kreal), dimension(3,nn), intent(in) | elem, | ||
| real(kind = kreal), intent(in) | rho, | ||
| real(kind = kreal), intent(in) | thick, | ||
| type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
| real(kind=kreal), dimension(:,:), intent(out) | mass, | ||
| real(kind=kreal), dimension(:), intent(out) | lumped | ||
| ) |
| [out] | mass | mass matrix |
| [out] | lumped | lumped mass matrix |
Definition at line 4964 of file static_LIB_shell.f90.
| pure real(kind = kreal) function, dimension(3, 3) m_static_lib_shell::outer_product3 | ( | real(kind = kreal), dimension(3), intent(in) | a, |
| real(kind = kreal), dimension(3), intent(in) | b | ||
| ) |
| pure subroutine m_static_lib_shell::shell_basis_from_covariant | ( | real(kind = kreal), dimension(3), intent(in) | g1, |
| real(kind = kreal), dimension(3), intent(in) | g2, | ||
| real(kind = kreal), dimension(3), intent(in) | g3, | ||
| real(kind = kreal), dimension(3), intent(out) | e1_hat, | ||
| real(kind = kreal), dimension(3), intent(out) | e2_hat, | ||
| real(kind = kreal), dimension(3), intent(out) | e3_hat, | ||
| real(kind = kreal), dimension(3), intent(out) | cg1, | ||
| real(kind = kreal), dimension(3), intent(out) | cg2, | ||
| real(kind = kreal), dimension(3), intent(out) | cg3, | ||
| real(kind = kreal), intent(out) | det | ||
| ) |
| subroutine m_static_lib_shell::shelladdstressvectortodb | ( | real(kind=kreal), dimension(6), intent(in) | dstress, |
| integer(kind=kint), intent(in) | j, | ||
| real(kind=kreal), dimension(:, :), intent(inout) | DB | ||
| ) |
| subroutine m_static_lib_shell::shelladdulobjectivetangent | ( | real(kind=kreal), dimension(6), intent(in) | stress_old, |
| integer(kind=kint), intent(in) | ncol, | ||
| real(kind=kreal), dimension(5, ncol), intent(in) | B, | ||
| real(kind=kreal), dimension(5, ncol), intent(inout) | DB, | ||
| real(kind=kreal), intent(in), optional | trace_coeff | ||
| ) |
Definition at line 267 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::shelladdulobjectivetracetangent | ( | real(kind=kreal), dimension(6), intent(in) | stress_old, |
| integer(kind=kint), intent(in) | ncol, | ||
| real(kind=kreal), dimension(5, ncol), intent(in) | B, | ||
| real(kind=kreal), dimension(5, ncol), intent(inout) | DB, | ||
| real(kind=kreal), intent(in), optional | trace_coeff | ||
| ) |
Definition at line 244 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::shellcomposenodaldisplacement | ( | integer(kind = kint), intent(in) | ndof, |
| integer(kind = kint), intent(in) | nn, | ||
| real(kind = kreal), dimension(:, :), intent(in) | disp_old, | ||
| real(kind = kreal), dimension(:, :), intent(in) | disp_inc, | ||
| real(kind = kreal), dimension(6, nn), intent(out) | disp_new | ||
| ) |
Definition at line 2541 of file static_LIB_shell.f90.
| pure subroutine m_static_lib_shell::shellcomposerotationvector | ( | real(kind = kreal), dimension(3), intent(in) | theta_old, |
| real(kind = kreal), dimension(3), intent(in) | theta_inc, | ||
| real(kind = kreal), dimension(3), intent(out) | theta_new | ||
| ) |
Definition at line 2402 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::shelldirectorincrement | ( | real(kind = kreal), dimension(3), intent(in) | theta, |
| real(kind = kreal), dimension(3), intent(in) | director_ref, | ||
| real(kind = kreal), dimension(3), intent(out) | director_inc | ||
| ) |
| pure subroutine m_static_lib_shell::shelldirectorincrementalderiv | ( | real(kind = kreal), dimension(3), intent(in) | director_current, |
| real(kind = kreal), dimension(3, 3), intent(out) | director_deriv | ||
| ) |
| pure subroutine m_static_lib_shell::shelldirectorincrementalsecondderiv | ( | real(kind = kreal), dimension(3), intent(in) | director_current, |
| real(kind = kreal), dimension(3, 3, 3), intent(out) | director_second | ||
| ) |
| subroutine m_static_lib_shell::shellobjectivestressincrement | ( | real(kind=kreal), dimension(6), intent(in) | stress_old, |
| real(kind=kreal), dimension(6), intent(in) | dstrain, | ||
| real(kind=kreal), dimension(6), intent(out) | dstress_obj, | ||
| real(kind=kreal), intent(in), optional | trace_coeff | ||
| ) |
Definition at line 152 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::shellobjectivetracestressincrement | ( | real(kind=kreal), dimension(6), intent(in) | stress_old, |
| real(kind=kreal), dimension(6), intent(in) | dstrain, | ||
| real(kind=kreal), dimension(6), intent(out) | dstress_trace, | ||
| real(kind=kreal), intent(in), optional | trace_coeff | ||
| ) |
Definition at line 164 of file static_LIB_shell.f90.
| pure subroutine m_static_lib_shell::shellorthonormalizetriad | ( | real(kind = kreal), dimension(3, 3), intent(in) | triad_in, |
| real(kind = kreal), dimension(3, 3), intent(out) | triad_out | ||
| ) |
| real(kind=kreal) function m_static_lib_shell::shellplanestresstracecoeff | ( | type(tgaussstatus), intent(in) | gauss, |
| integer(kind=kint), intent(in) | n_layer | ||
| ) |
Definition at line 184 of file static_LIB_shell.f90.
| pure subroutine m_static_lib_shell::shellrelativerotationvector | ( | real(kind = kreal), dimension(3), intent(in) | theta_old, |
| real(kind = kreal), dimension(3), intent(in) | theta_target, | ||
| real(kind = kreal), dimension(3), intent(out) | theta_inc | ||
| ) |
| pure subroutine m_static_lib_shell::shellrotationmatrixtovector | ( | real(kind = kreal), dimension(3, 3), intent(in) | rotmat, |
| real(kind = kreal), dimension(3), intent(out) | theta | ||
| ) |
| pure subroutine m_static_lib_shell::shellrotationvectortomatrix | ( | real(kind = kreal), dimension(3), intent(in) | theta, |
| real(kind = kreal), dimension(3, 3), intent(out) | rotmat | ||
| ) |
| subroutine m_static_lib_shell::shellstressvectortotensor | ( | real(kind=kreal), dimension(6), intent(in) | stress, |
| real(kind=kreal), dimension(3, 3), intent(out) | tensor | ||
| ) |
| logical function m_static_lib_shell::shellsupportsfiniterotationkinematics | ( | integer(kind=kint), intent(in) | etype, |
| integer(kind=kint), intent(in) | nn | ||
| ) |
Definition at line 56 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::shelltensortostressvector | ( | real(kind=kreal), dimension(3, 3), intent(in) | tensor, |
| real(kind=kreal), dimension(6), intent(out) | stress | ||
| ) |
| pure subroutine m_static_lib_shell::shellupdatetriadwithincrement | ( | real(kind = kreal), dimension(3, 3), intent(in) | triad_old, |
| real(kind = kreal), intent(in) | drill_old, | ||
| real(kind = kreal), dimension(3), intent(in) | theta_inc, | ||
| real(kind = kreal), dimension(3, 3), intent(out) | triad_new, | ||
| real(kind = kreal), intent(out) | drill_new | ||
| ) |
Definition at line 2493 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::stf_shell_mitc | ( | integer(kind = kint), intent(in) | etype, |
| integer(kind = kint), intent(in) | nn, | ||
| integer(kind = kint), intent(in) | ndof, | ||
| 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) | thick, | ||
| integer(kind = kint), intent(in) | mixflag, | ||
| real(kind = kreal), dimension(ndof, nn), intent(in), optional | nddisp, | ||
| type(telement), intent(in), optional | element, | ||
| real(kind = kreal), dimension(:), intent(out), optional | qf_stress, | ||
| logical, intent(in), optional | include_geo_stiff, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | nddirector, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | ndrefdirector, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | ndcurdirector, | ||
| real(kind = kreal), dimension(nn), intent(in), optional | nddrill | ||
| ) |
Definition at line 282 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::updateshelllayergauss_shell_mitc | ( | integer(kind = kint), intent(in) | etype, |
| integer(kind = kint), intent(in) | nn, | ||
| integer(kind = kint), intent(in) | ndof, | ||
| real(kind = kreal), dimension(3, nn), intent(in) | ecoord, | ||
| type(telement), intent(inout) | element, | ||
| real(kind = kreal), dimension(6, nn), intent(in) | edisp, | ||
| real(kind = kreal), intent(in) | thick, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | nddirector, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | ndrefdirector, | ||
| real(kind = kreal), dimension(6, nn), intent(in), optional | ndbase_disp | ||
| ) |
Definition at line 3964 of file static_LIB_shell.f90.
| subroutine m_static_lib_shell::updatest_shell_mitc | ( | integer(kind = kint), intent(in) | etype, |
| integer(kind = kint), intent(in) | nn, | ||
| integer(kind = kint), intent(in) | ndof, | ||
| real(kind = kreal), dimension(3, nn), intent(in) | ecoord, | ||
| real(kind = kreal), dimension(:, :), intent(in) | u, | ||
| real(kind = kreal), dimension(:, :), intent(in) | du, | ||
| type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
| real(kind = kreal), dimension(:), intent(out) | qf, | ||
| real(kind = kreal), intent(in) | thick, | ||
| integer(kind = kint), intent(in) | mixflag, | ||
| real(kind = kreal), dimension(ndof, nn), intent(in), optional | nddisp, | ||
| type(telement), intent(inout), optional | element, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | nddirector, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | ndrefdirector, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | ndcurdirector, | ||
| real(kind = kreal), dimension(nn), intent(in), optional | nddrill | ||
| ) |
| subroutine m_static_lib_shell::updatest_shell_mitc33 | ( | integer(kind = kint), intent(in) | etype, |
| integer(kind = kint), intent(in) | nn, | ||
| integer(kind = kint), intent(in) | ndof, | ||
| real(kind = kreal), dimension(3, nn), intent(in) | ecoord, | ||
| real(kind = kreal), dimension(3, nn*2), intent(in) | u, | ||
| real(kind = kreal), dimension(3, nn*2), intent(in) | du, | ||
| type(tgaussstatus), dimension(:), intent(in) | gausses, | ||
| real(kind = kreal), dimension(:), intent(out) | qf, | ||
| real(kind = kreal), intent(in) | thick, | ||
| integer(kind = kint), intent(in) | mixflag, | ||
| real(kind = kreal), dimension(3, nn), intent(in), optional | nddisp | ||
| ) |
| subroutine m_static_lib_shell::updatestressshellul_elastic | ( | type(tgaussstatus), intent(inout) | gauss, |
| real(kind = kreal), dimension(6), intent(in) | dstrain, | ||
| real(kind = kreal), dimension(6), intent(in) | dstress, | ||
| real(kind = kreal), intent(in), optional | trace_coeff | ||
| ) |
Definition at line 3927 of file static_LIB_shell.f90.