Strain_ Derived Type

  1. StrainClass.f90
  2. StrainClass
  3. Strain_

type, public :: Strain_


Contents

Variables

Type-Bound Procedures


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

  • public subroutine InitStrain(obj, StrainTheory)

    Arguments

    Type IntentOptional AttributesName
    class(Strain_), intent(inout) :: obj
    character(len=*), intent(in) :: StrainTheory

procedure, public :: import => importStrain

  • 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(:,:)

procedure, public :: get => getStrain

  • 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

procedure, public :: getAll => getallStrain

  • public subroutine getallStrain(obj, ShapeFunction)

    Arguments

    Type IntentOptional AttributesName
    class(Strain_), intent(inout) :: obj
    class(ShapeFunction_), intent(in) :: ShapeFunction

procedure, public :: delete => deleteStrain

  • public subroutine deleteStrain(obj)

    Arguments

    Type IntentOptional AttributesName
    class(Strain_), intent(inout) :: obj