Stress_ Derived Type

type, public :: Stress_

Contents

Variables

sigma sigma_n S P dSdC sigma_dot sigma_j sigma_o sigma_t E TheoryID StrainTheory

Type-Bound Procedures

init getRate getStress getDerivative delete

Components

Type	Visibility	Attributes		Name		Initial
real(kind=real64),	public,	allocatable	::	sigma(:,:)
real(kind=real64),	public,	allocatable	::	sigma_n(:,:)
real(kind=real64),	public,	allocatable	::	S(:,:)
real(kind=real64),	public,	allocatable	::	P(:,:)
real(kind=real64),	public,	allocatable	::	dSdC(:,:,:,:)
real(kind=real64),	public,	allocatable	::	sigma_dot(:,:)
real(kind=real64),	public,	allocatable	::	sigma_j(:,:)
real(kind=real64),	public,	allocatable	::	sigma_o(:,:)
real(kind=real64),	public,	allocatable	::	sigma_t(:,:)
real(kind=real64),	public,	allocatable	::	E(:,:,:,:)
integer(kind=int32),	public		::	TheoryID
character(len=40),	public		::	StrainTheory

Type-Bound Procedures

procedure, public :: init => initStress

public subroutine initStress(obj, StrainTheory)

Arguments

Type Intent Optional Attributes Name

class(Stress_), intent(inout) :: obj

character(len=*), intent(in) :: StrainTheory

procedure, public :: getRate => getStressRate

public subroutine getStressRate(obj, strain, Type)

Arguments

Type	Intent	Optional	Attributes		Name
class(Stress_),	intent(inout)			::	obj
class(Strain_),	intent(inout)			::	strain
character(len=*),	intent(in)			::	Type

procedure, public :: getStress

public subroutine getStress(obj, strain, ConstitutiveModel, lambda, mu, K, G, c, phi, TimeIntegral, StressRate, dt)

Arguments

Type	Intent	Optional	Attributes		Name
class(Stress_),	intent(inout)			::	obj
class(Strain_),	intent(inout)			::	strain
character(len=*),	intent(in),	optional		::	ConstitutiveModel
real(kind=real64),	intent(in),	optional		::	lambda
real(kind=real64),	intent(in),	optional		::	mu
real(kind=real64),	intent(in),	optional		::	K
real(kind=real64),	intent(in),	optional		::	G
real(kind=real64),	intent(in),	optional		::	c
real(kind=real64),	intent(in),	optional		::	phi
character(len=*),	intent(in),	optional		::	TimeIntegral
character(len=*),	intent(in),	optional		::	StressRate
real(kind=real64),	intent(in),	optional		::	dt

procedure, public :: getDerivative => getStressDerivative

public subroutine getStressDerivative(obj, strain, ConstitutiveModel, lambda, mu)

Arguments

Type	Intent	Optional	Attributes		Name
class(Stress_),	intent(inout)			::	obj
class(Strain_),	intent(inout)			::	strain
character(len=*),	intent(in)			::	ConstitutiveModel
real(kind=real64),	intent(in),	optional		::	lambda
real(kind=real64),	intent(in),	optional		::	mu

procedure, public :: delete => deleteStress

public subroutine deleteStress(obj)

Arguments

Type Intent Optional Attributes Name

class(Stress_), intent(inout) :: obj