StrainClass Module

Derived Types

type, public ::  Strain_

Components

Type	Visibility	Attributes		Name		Initial
real(kind=real64),	public,	allocatable	::	F(:,:)
real(kind=real64),	public,	allocatable	::	F_n(:,:)
real(kind=real64),	public,	allocatable	::	C(:,:)
real(kind=real64),	public,	allocatable	::	C_n(:,:)
real(kind=real64),	public,	allocatable	::	b(:,:)
real(kind=real64),	public,	allocatable	::	Cp(:,:)
real(kind=real64),	public,	allocatable	::	Cp_n(:,:)
real(kind=real64),	public		::	detF
real(kind=real64),	public,	allocatable	::	d(:,:)
real(kind=real64),	public,	allocatable	::	de(:,:)
real(kind=real64),	public,	allocatable	::	dp(:,:)
real(kind=real64),	public,	allocatable	::	l(:,:)
real(kind=real64),	public,	allocatable	::	w(:,:)
real(kind=real64),	public,	allocatable	::	eps(:,:)
real(kind=real64),	public,	allocatable	::	eps_n(:,:)
real(kind=real64),	public,	allocatable	::	eps_p(:,:)
real(kind=real64),	public,	allocatable	::	eps_p_n(:,:)
real(kind=real64),	public,	allocatable	::	eps_e(:,:)
real(kind=real64),	public,	allocatable	::	eps_e_n(:,:)
integer(kind=int32),	public		::	TheoryID
character(len=40),	public		::	StrainTheory

Type-Bound Procedures

procedure, public :: init => InitStrain
procedure, public :: import => importStrain
procedure, public :: get => getStrain
procedure, public :: getAll => getallStrain
procedure, public :: delete => deleteStrain

Subroutines

public subroutine InitStrain(obj, StrainTheory)

Arguments

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

public subroutine deleteStrain(obj)

Arguments

Type	Intent	Optional	Attributes		Name
class(Strain_),	intent(inout)			::	obj

public subroutine importStrain(obj, F, F_n, C, C_n, b, Cp, Cp_n, d, de, dp, l, w, eps, eps_n)

Arguments

Type	Intent	Optional	Attributes		Name
class(Strain_),	intent(inout)			::	obj
real(kind=real64),	intent(in),	optional		::	F(:,:)
real(kind=real64),	intent(in),	optional		::	F_n(:,:)
real(kind=real64),	intent(in),	optional		::	C(:,:)
real(kind=real64),	intent(in),	optional		::	C_n(:,:)
real(kind=real64),	intent(in),	optional		::	b(:,:)
real(kind=real64),	intent(in),	optional		::	Cp(:,:)
real(kind=real64),	intent(in),	optional		::	Cp_n(:,:)
real(kind=real64),	intent(in),	optional		::	d(:,:)
real(kind=real64),	intent(in),	optional		::	de(:,:)
real(kind=real64),	intent(in),	optional		::	dp(:,:)
real(kind=real64),	intent(in),	optional		::	l(:,:)
real(kind=real64),	intent(in),	optional		::	w(:,:)
real(kind=real64),	intent(in),	optional		::	eps(:,:)
real(kind=real64),	intent(in),	optional		::	eps_n(:,:)

public subroutine getallStrain(obj, ShapeFunction)

Arguments

Type	Intent	Optional	Attributes		Name
class(Strain_),	intent(inout)			::	obj
class(ShapeFunction_),	intent(in)			::	ShapeFunction

public subroutine getStrain(obj, C, b, d, w, de, detF)

Arguments

Type	Intent	Optional	Attributes		Name
class(Strain_),	intent(inout)			::	obj
logical,	intent(in),	optional		::	C
logical,	intent(in),	optional		::	b
logical,	intent(in),	optional		::	d
logical,	intent(in),	optional		::	w
logical,	intent(in),	optional		::	de
logical,	intent(in),	optional		::	detF