StrainClass Module



Contents


Derived Types

type, public :: Strain_

Components

TypeVisibility AttributesNameInitial
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 IntentOptional AttributesName
class(Strain_), intent(inout) :: obj
character(len=*), intent(in) :: StrainTheory

public subroutine deleteStrain(obj)

Arguments

Type IntentOptional AttributesName
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 IntentOptional AttributesName
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 IntentOptional AttributesName
class(Strain_), intent(inout) :: obj
class(ShapeFunction_), intent(in) :: ShapeFunction

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

Arguments

Type IntentOptional AttributesName
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