FrontISTR  5.7.0
Large-scale structural analysis program with finit element method
material.f90 File Reference

Go to the source code of this file.

Data Types

type  mmaterial::tshellmat
 
type  mmaterial::tmaterial
 Structure to manage all material related data. More...
 

Modules

module  mmaterial
 This module summarizes all information of material properties.
 

Functions/Subroutines

subroutine mmaterial::initmaterial (material)
 Initializer. More...
 
subroutine mmaterial::finalizematerial (material)
 Finalizer. More...
 
subroutine mmaterial::initializematls (nm)
 Initializer. More...
 
subroutine mmaterial::finalizematls ()
 Finalizer. More...
 
subroutine mmaterial::modifymatl (n, m, v)
 Set value of variable(m) of material n to v. More...
 
subroutine mmaterial::printmaterial (nfile, material)
 Print out the material properties. More...
 
integer function mmaterial::fetchdigit (npos, cnum)
 Fetch material type. More...
 
subroutine mmaterial::setdigit (npos, ival, mtype)
 Modify material type. More...
 
integer function mmaterial::getelastictype (mtype)
 Get elastic type. More...
 
integer function mmaterial::getyieldfunction (mtype)
 Get type of yield function. More...
 
integer function mmaterial::gethardentype (mtype)
 Get type of hardening. More...
 
logical function mmaterial::iskinematicharden (mtype)
 If it is a kinematic hardening material? More...
 
logical function mmaterial::iselastic (mtype)
 If it is an elastic material? More...
 
logical function mmaterial::iselastoplastic (mtype)
 If it is an elastoplastic material? More...
 
logical function mmaterial::ishyperelastic (mtype)
 If it is a hyperelastic material? More...
 
logical function mmaterial::isviscoelastic (mtype)
 If it is an viscoelastic material? More...
 
subroutine mmaterial::ep2e (mtype)
 Set material type of elastoplastic to elastic. More...
 
integer function mmaterial::getconnectortype (mtype)
 Get type of connector. More...
 
integer function mmaterial::getnumofspring_dparam (material)
 Get number of spring_d parameters. More...
 
integer function mmaterial::getnumofspring_aparam (material)
 Get number of spring_a parameters. More...
 
integer function mmaterial::getnumofdashpot_dparam (material)
 Get number of dashpot_d parameters. More...
 
integer function mmaterial::getnumofdashpot_aparam (material)
 Get number of dashpot_a parameters. More...
 

Variables

integer(kind=kint), parameter mmaterial::infinitesimal = 0
 
integer(kind=kint), parameter mmaterial::totallag = 1
 
integer(kind=kint), parameter mmaterial::updatelag = 2
 
integer(kind=kint), parameter mmaterial::usermaterial = 100000
 
integer(kind=kint), parameter mmaterial::elastic = 110000
 
integer(kind=kint), parameter mmaterial::mn_orthoelastic = 111000
 
integer(kind=kint), parameter mmaterial::userelastic = 112000
 
integer(kind=kint), parameter mmaterial::eplastic = 120000
 
integer(kind=kint), parameter mmaterial::neohooke = 130000
 
integer(kind=kint), parameter mmaterial::mooneyrivlin = 131000
 
integer(kind=kint), parameter mmaterial::arrudaboyce = 132000
 
integer(kind=kint), parameter mmaterial::userhyperelastic = 133000
 
integer(kind=kint), parameter mmaterial::mooneyrivlin_aniso = 134000
 
integer(kind=kint), parameter mmaterial::viscoelastic = 140000
 
integer(kind=kint), parameter mmaterial::norton = 150000
 
integer(kind=kint), parameter mmaterial::incomp_newtonian = 160000
 
integer(kind=kint), parameter mmaterial::connector = 170000
 
integer(kind=kint), parameter mmaterial::d3 = -1
 
integer(kind=kint), parameter mmaterial::planestress = 1
 
integer(kind=kint), parameter mmaterial::planestrain = 0
 
integer(kind=kint), parameter mmaterial::axissymetric = 2
 
integer(kind=kint), parameter mmaterial::shell = 3
 
integer(kind=kint), parameter mmaterial::m_youngs = 1
 
integer(kind=kint), parameter mmaterial::m_poisson = 2
 
integer(kind=kint), parameter mmaterial::m_density = 3
 
integer(kind=kint), parameter mmaterial::m_thick = 4
 
integer(kind=kint), parameter mmaterial::m_plconst1 = 5
 
integer(kind=kint), parameter mmaterial::m_plconst2 = 6
 
integer(kind=kint), parameter mmaterial::m_plconst3 = 7
 
integer(kind=kint), parameter mmaterial::m_plconst4 = 8
 
integer(kind=kint), parameter mmaterial::m_plconst5 = 9
 
integer(kind=kint), parameter mmaterial::m_kinehard = 10
 
integer(kind=kint), parameter mmaterial::m_exapnsion = 20
 
integer(kind=kint), parameter mmaterial::m_alpha_over_mu = 21
 
integer(kind=kint), parameter mmaterial::m_beam_radius = 22
 
integer(kind=kint), parameter mmaterial::m_beam_angle1 = 23
 
integer(kind=kint), parameter mmaterial::m_beam_angle2 = 24
 
integer(kind=kint), parameter mmaterial::m_beam_angle3 = 25
 
integer(kind=kint), parameter mmaterial::m_beam_angle4 = 26
 
integer(kind=kint), parameter mmaterial::m_beam_angle5 = 27
 
integer(kind=kint), parameter mmaterial::m_beam_angle6 = 28
 
integer(kind=kint), parameter mmaterial::m_viscocity = 29
 
integer(kind=kint), parameter mmaterial::m_plconst6 = 30
 
integer(kind=kint), parameter mmaterial::m_plconst7 = 31
 
integer(kind=kint), parameter mmaterial::m_plconst8 = 32
 
integer(kind=kint), parameter mmaterial::m_plconst9 = 33
 
integer(kind=kint), parameter mmaterial::m_plconst10 = 34
 
integer(kind=kint), parameter mmaterial::m_damping_rm = 35
 
integer(kind=kint), parameter mmaterial::m_damping_rk = 36
 
integer(kind=kint), parameter mmaterial::m_spring_dof = 0
 
integer(kind=kint), parameter mmaterial::m_spring_axial = 1
 
integer(kind=kint), parameter mmaterial::m_dashpot_dof = 2
 
integer(kind=kint), parameter mmaterial::m_dashpot_axial = 3
 
integer(kind=kint), parameter mmaterial::m_spring_d_ndoffset = 0
 
integer(kind=kint), parameter mmaterial::m_spring_a_ndoffset = 72
 
integer(kind=kint), parameter mmaterial::m_dashpot_d_ndoffset = 73
 
integer(kind=kint), parameter mmaterial::m_dashpot_a_ndoffset = 145
 
character(len=dict_key_length) mmaterial::mc_isoelastic = 'ISOELASTIC'
 
character(len=dict_key_length) mmaterial::mc_orthoelastic = 'ORTHOELASTIC'
 
character(len=dict_key_length) mmaterial::mc_yield = 'YIELD'
 
character(len=dict_key_length) mmaterial::mc_themoexp = 'THEMOEXP'
 
character(len=dict_key_length) mmaterial::mc_orthoexp = 'ORTHOEXP'
 
character(len=dict_key_length) mmaterial::mc_viscoelastic = 'VISCOELASTIC'
 
character(len=dict_key_length) mmaterial::mc_norton = 'NORTON'
 
character(len=dict_key_length) mmaterial::mc_incomp_newtonian = 'INCOMP_FLUID'
 
character(len=dict_key_length) mmaterial::mc_spring = 'SPRING'
 
character(len=dict_key_length) mmaterial::mc_dashpot = 'DASHPOT'
 
type(tmaterial), dimension(:), allocatable mmaterial::materials