SetLinearElasticParam
Set the essential parameter for initiating an instance of LinearElasticModel_
Interface
INTERFACE
MODULE SUBROUTINE SetLinearElasticModelParam(param, elasticityType, &
& isPlaneStrain, isPlaneStress, poissonRatio, youngsModulus, &
& shearModulus, lambda, C, invC, stiffnessPower)
TYPE(ParameterList_), INTENT(INOUT) :: param
INTEGER(I4B), INTENT(IN) :: elasticityType
LOGICAL(LGT), OPTIONAL, INTENT(IN) :: isPlaneStress
LOGICAL(LGT), OPTIONAL, INTENT(IN) :: isPlaneStrain
REAL(DFP), OPTIONAL, INTENT(IN) :: poissonRatio
REAL(DFP), OPTIONAL, INTENT(IN) :: youngsModulus
REAL(DFP), OPTIONAL, INTENT(IN) :: shearModulus
REAL(DFP), OPTIONAL, INTENT(IN) :: lambda
REAL(DFP), OPTIONAL, INTENT(IN) :: C(6, 6)
REAL(DFP), OPTIONAL, INTENT(IN) :: invC(6, 6)
REAL(DFP), OPTIONAL, INTENT(IN) :: stiffnessPower
END SUBROUTINE SetLinearElasticModelParam
END INTERFACE
elasticityType
Elasticity type. It can take following values:
TypeElasticity%Isotropic
for isotropic elasticityTypeElasticity%Anisotropic
for anisotropic elasticity.TypeElasticity%Orthotropic
for orthotropic elasticity.
isPlaneStress
Set it to true if the problem is plane stress.
isPlaneStrain
Set it to true if the problem is plane strain.
poissonRatio
Poisson's Ratio.
youngsModulus
Youngs modules.
shearModulus
Shear modulus.
lambda
Lame parameter.
C
Elastic tangent matrix.
invC
Inverse of tangent matrix.