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
elasticityTypeElasticity type. It can take following values:
TypeElasticity%Isotropicfor isotropic elasticityTypeElasticity%Anisotropicfor anisotropic elasticity.TypeElasticity%Orthotropicfor orthotropic elasticity.
isPlaneStressSet it to true if the problem is plane stress.
isPlaneStrainSet it to true if the problem is plane strain.
poissonRatioPoisson's Ratio.
youngsModulusYoungs modules.
shearModulusShear modulus.
lambdaLame parameter.
CElastic tangent matrix.
invCInverse of tangent matrix.