MEF90HookesLawIsotropic3D Derived Type

type, public, extends(MEF90HookesLaw) :: MEF90HookesLawIsotropic3D


Components

Type Visibility Attributes Name Initial
real(kind=C_DOUBLE), public :: BulkModulus = 0.0_Kr
real(kind=C_DOUBLE), public :: PoissonRatio = 0.3_Kr
real(kind=C_DOUBLE), public :: YoungsModulus = 1.0_Kr
integer(kind=C_INT32_T), public :: comm
real(kind=C_DOUBLE), public :: lambda = 0.0_Kr
real(kind=C_DOUBLE), public :: mu = 0.0_Kr
character(kind=c_char, len=MEF90MXSTRLEN), public :: name = "NULL"
character(kind=c_char, len=MEF90MXSTRLEN), public :: prefix

Type-Bound Procedures

procedure, public :: mult => MEF90HookesLawIsotropic3D_mult

procedure, public :: multmult => MEF90HookesLawIsotropic3D_multmult

procedure, public, pass(self) :: setFromOptions => MEF90HookesLawIsotropic3D_setFromOptions

  • private subroutine MEF90HookesLawIsotropic3D_setFromOptions(self, ierr)

    Author
    Blaise Bourdin (2025, bourdin@mcmaster.ca)

    MEF90HookesLawIsotropic3D_setFromOptions: initializes a MEF90HookesLawIsotropic3D_type from options

    Arguments

    Type IntentOptional Attributes Name
    class(MEF90HookesLawIsotropic3D), intent(inout) :: self
    integer(kind=C_INT32_T), intent(inout) :: ierr

procedure, public, pass(self) :: view => MEF90Object_view

  • private subroutine MEF90Object_view(self, viewer, ierr)

    Author
    Blaise Bourdin (2026, bourdin@mcmaster.ca)

    MEF90Object_view: Views a MEF90Object and flagged it as viewed so that it is not viewed multiple times when -verbose is set to a high value

    Arguments

    Type IntentOptional Attributes Name
    class(MEF90Object), intent(in) :: self
    type(tPetscViewer), intent(in) :: viewer
    integer(kind=C_INT32_T), intent(inout) :: ierr

procedure, public, pass(self) :: view_internal => MEF90HookesLawIsotropic3D_View

  • private subroutine MEF90HookesLawIsotropic3D_View(self, viewer, ierr)

    Author
    Blaise Bourdin (2025, bourdin@mcmaster.ca)

    MEF90HookesLawIsotropic3D_view: the default viewer for a MEF90_DefMechAT_Type

    Arguments

    Type IntentOptional Attributes Name
    class(MEF90HookesLawIsotropic3D), intent(in) :: self
    type(tPetscViewer), intent(in) :: viewer
    integer(kind=C_INT32_T), intent(inout) :: ierr