m_MEF90_HookesLawIsotropic2D Module

Uses

Derived Types

type, public, extends(MEF90HookesLaw) :: MEF90HookesLawIsotropic2D

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
logical(kind=C_BOOL),	public		::	isPlaneStress	=	PETSC_FALSE
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 => MEF90HookesLawIsotropic2D_mult
procedure, public :: multmult => MEF90HookesLawIsotropic2D_multmult
procedure, public :: setFromOptions => MEF90HookesLawIsotropic2D_setFromOptions
procedure, public, pass(self) :: view => MEF90Object_view
procedure, public :: view_internal => MEF90HookesLawIsotropic2D_View

Subroutines

private subroutine MEF90HookesLawIsotropic2D_View(self, viewer, ierr)

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

MEF90HookesLawIsotropic2D_view: the default viewer for a MEF90_DefMechAT_Type

Arguments

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

private subroutine MEF90HookesLawIsotropic2D_mult(A, phi, Aphi, ierr)

Arguments

Type	Intent	Optional	Attributes		Name
class(MEF90HookesLawIsotropic2D),	intent(in)			::	A
class(mef90Mat),	intent(in)			::	phi
class(mef90Mat),	intent(out),		allocatable	::	Aphi
integer(kind=C_INT32_T),	intent(inout)			::	ierr

private subroutine MEF90HookesLawIsotropic2D_multmult(A, phi, psi, Aphipsi, ierr)

Arguments

Type	Intent	Optional	Attributes		Name
class(MEF90HookesLawIsotropic2D),	intent(in)			::	A
class(mef90Mat),	intent(in)			::	phi
class(mef90Mat),	intent(in)			::	psi
real(kind=C_DOUBLE),	intent(out)			::	Aphipsi
integer(kind=C_INT32_T),	intent(inout)			::	ierr

private subroutine MEF90HookesLawIsotropic2D_setFromOptions(self, ierr)

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

MEF90HookesLawIsotropic2D_setFromOptions: initializes a MEF90HookesLawIsotropic2D from options

Arguments

Type	Intent	Optional	Attributes		Name
class(MEF90HookesLawIsotropic2D),	intent(inout)			::	self
integer(kind=C_INT32_T),	intent(inout)			::	ierr