ConstitutiveModelClass Module



Derived Types

type, public ::  ConstitutiveModel_

Components

Type Visibility Attributes Name Initial
type(Stress_), public :: Stress
type(Strain_), public :: Strain
logical, public :: infinitesimal

type, public ::  ConstModel_

Components

Type Visibility Attributes Name Initial
real(kind=real64), public, allocatable :: sigma(:,:)
real(kind=real64), public, allocatable :: S_IJ(:,:)
real(kind=real64), public, allocatable :: M_IJ(:,:)
real(kind=real64), public, allocatable :: tau(:,:)
real(kind=real64), public, allocatable :: F_iJ(:,:)
real(kind=real64), public, allocatable :: F_T(:,:)
real(kind=real64), public, allocatable :: F_iJ_n(:,:)
real(kind=real64), public, allocatable :: F_inv_iJ(:,:)
real(kind=real64), public, allocatable :: F_T_inv_iJ(:,:)
real(kind=real64), public, allocatable :: Fp_iJ(:,:)
real(kind=real64), public, allocatable :: FT_Ij(:,:)
real(kind=real64), public, allocatable :: b_ij(:,:)
real(kind=real64), public, allocatable :: C_IJ(:,:)
real(kind=real64), public, allocatable :: C_IJ_n(:,:)
real(kind=real64), public, allocatable :: C_IJ_inv(:,:)
real(kind=real64), public, allocatable :: E_IJ(:,:)
real(kind=real64), public, allocatable :: Cp_IJ(:,:)
real(kind=real64), public, allocatable :: Cp_IJ_inv(:,:)
real(kind=real64), public, allocatable :: Cp_IJ_n(:,:)
real(kind=real64), public, allocatable :: Bmat(:,:)
real(kind=real64), public, allocatable :: StressDer(:,:,:,:)
real(kind=real64), public :: detF
real(kind=real64), public :: lamda
real(kind=real64), public :: mu
real(kind=real64), public :: K_mod
real(kind=real64), public :: G_mod
character(len=70), public :: ModelType
character(len=70), public :: Config

Type-Bound Procedures

procedure, public :: getStress => HyperElasticStress
procedure, public :: getStressDer => HyperElasticDer

Subroutines

public subroutine HyperElasticStress(obj)

Arguments

Type IntentOptional Attributes Name
class(ConstModel_), intent(inout) :: obj

public subroutine HyperElasticDer(obj, DerType)

Arguments

Type IntentOptional Attributes Name
class(ConstModel_), intent(inout) :: obj
character(len=70), intent(in) :: DerType