m_MEF90_Materials Module


Uses


Variables

Type Visibility Attributes Name Initial
character(len=MEF90MXSTRLEN), protected, dimension(5) :: MEF90HookesLawTypeList
integer(kind=C_SIZE_T), protected :: sizeofMEF90HookesLaw2D
integer(kind=C_SIZE_T), protected :: sizeofMEF90HookesLaw3D

Interfaces

public interface operator(*)

  • public function MEF90HookesLaw2DXMatS2D(A, X)

    Author
    Blaise Bourdin (2016, bourdin@lsu.edu)

    MEF90HookesLaw2DXMatS2D:

    Arguments

    Type IntentOptional Attributes Name
    type(MEF90HookesLaw2D), intent(in) :: A
    type(MatS2D), intent(in) :: X

    Return Value type(MatS2D)

  • public function MEF90HookesLaw3DXMatS3D(A, X)

    Author
    Blaise Bourdin (2016, bourdin@lsu.edu)

    MEF90HookesLaw2DXMatS3D:

    Arguments

    Type IntentOptional Attributes Name
    type(MEF90HookesLaw3D), intent(in) :: A
    type(MatS3D), intent(in) :: X

    Return Value type(MatS3D)

  • public function MEF90HookesLaw2DXMat2D(A, X)

    Author
    Blaise Bourdin (2016, bourdin@lsu.edu)

    MEF90HookesLaw2DXMat2D:

    Arguments

    Type IntentOptional Attributes Name
    type(MEF90HookesLaw2D), intent(in) :: A
    type(Mat2D), intent(in) :: X

    Return Value type(Mat2D)

  • public function MEF90HookesLaw3DXMat3D(A, X)

    Author
    Blaise Bourdin (2016, bourdin@lsu.edu)

    MEF90HookesLaw2DXMat3D:

    Arguments

    Type IntentOptional Attributes Name
    type(MEF90HookesLaw3D), intent(in) :: A
    type(Mat3D), intent(in) :: X

    Return Value type(Mat3D)

  • public function ScalarXMEF90HookesLaw2D(t, A)

    Author
    Blaise Bourdin (2020, bourdin@lsu.edu)

    ScalarXMEF90HookesLaw2D:

    Arguments

    Type IntentOptional Attributes Name
    real(kind=C_DOUBLE), intent(in) :: t
    type(MEF90HookesLaw2D), intent(in) :: A

    Return Value type(MEF90HookesLaw2D)

  • public function ScalarXMEF90HookesLaw3D(t, A)

    Author
    Blaise Bourdin (2020, bourdin@lsu.edu)

    ScalarXMEF90HookesLaw3D:

    Arguments

    Type IntentOptional Attributes Name
    real(kind=C_DOUBLE), intent(in) :: t
    type(MEF90HookesLaw3D), intent(in) :: A

    Return Value type(MEF90HookesLaw3D)

public interface operator(+)

public interface operator(-)


Functions

public function MEF90HookesLaw2DDiff(A, B)

Author
Blaise Bourdin (2020, bourdin@lsu.edu)

MEF90HookesLaw2DDiff:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw2D), intent(in) :: A
type(MEF90HookesLaw2D), intent(in) :: B

Return Value type(MEF90HookesLaw2D)

public function MEF90HookesLaw2DSum(A, B)

Author
Blaise Bourdin (2020, bourdin@lsu.edu)

MEF90HookesLaw2DSum:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw2D), intent(in) :: A
type(MEF90HookesLaw2D), intent(in) :: B

Return Value type(MEF90HookesLaw2D)

public function MEF90HookesLaw2DXMat2D(A, X)

Author
Blaise Bourdin (2016, bourdin@lsu.edu)

MEF90HookesLaw2DXMat2D:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw2D), intent(in) :: A
type(Mat2D), intent(in) :: X

Return Value type(Mat2D)

public function MEF90HookesLaw2DXMatS2D(A, X)

Author
Blaise Bourdin (2016, bourdin@lsu.edu)

MEF90HookesLaw2DXMatS2D:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw2D), intent(in) :: A
type(MatS2D), intent(in) :: X

Return Value type(MatS2D)

public function MEF90HookesLaw3DDiff(A, B)

Author
Blaise Bourdin (2020, bourdin@lsu.edu)

MEF90HookesLaw3DDiff:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw3D), intent(in) :: A
type(MEF90HookesLaw3D), intent(in) :: B

Return Value type(MEF90HookesLaw3D)

public function MEF90HookesLaw3DSum(A, B)

Author
Blaise Bourdin (2020, bourdin@lsu.edu)

MEF90HookesLaw3DSum:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw3D), intent(in) :: A
type(MEF90HookesLaw3D), intent(in) :: B

Return Value type(MEF90HookesLaw3D)

public function MEF90HookesLaw3DXMat3D(A, X)

Author
Blaise Bourdin (2016, bourdin@lsu.edu)

MEF90HookesLaw2DXMat3D:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw3D), intent(in) :: A
type(Mat3D), intent(in) :: X

Return Value type(Mat3D)

public function MEF90HookesLaw3DXMatS3D(A, X)

Author
Blaise Bourdin (2016, bourdin@lsu.edu)

MEF90HookesLaw2DXMatS3D:

Arguments

Type IntentOptional Attributes Name
type(MEF90HookesLaw3D), intent(in) :: A
type(MatS3D), intent(in) :: X

Return Value type(MatS3D)

public function ScalarXMEF90HookesLaw2D(t, A)

Author
Blaise Bourdin (2020, bourdin@lsu.edu)

ScalarXMEF90HookesLaw2D:

Arguments

Type IntentOptional Attributes Name
real(kind=C_DOUBLE), intent(in) :: t
type(MEF90HookesLaw2D), intent(in) :: A

Return Value type(MEF90HookesLaw2D)

public function ScalarXMEF90HookesLaw3D(t, A)

Author
Blaise Bourdin (2020, bourdin@lsu.edu)

ScalarXMEF90HookesLaw3D:

Arguments

Type IntentOptional Attributes Name
real(kind=C_DOUBLE), intent(in) :: t
type(MEF90HookesLaw3D), intent(in) :: A

Return Value type(MEF90HookesLaw3D)


Subroutines

public subroutine MEF90HookeLawIsoENu3D(A, E, nu)

Arguments

Type IntentOptional Attributes Name
type(Tens4OS3D), intent(out) :: A
real(kind=C_DOUBLE), intent(in) :: E
real(kind=C_DOUBLE), intent(in) :: nu

public subroutine MEF90HookeLawIsoEnu2DPlaneStrain(A, E, nu)

Arguments

Type IntentOptional Attributes Name
type(Tens4OS2D), intent(out) :: A
real(kind=C_DOUBLE), intent(in) :: E
real(kind=C_DOUBLE), intent(in) :: nu

public subroutine MEF90HookeLawIsoEnu2DPlaneStress(A, E, nu)

Arguments

Type IntentOptional Attributes Name
type(Tens4OS2D), intent(out) :: A
real(kind=C_DOUBLE), intent(in) :: E
real(kind=C_DOUBLE), intent(in) :: nu

public subroutine MEF90HookeLawIsoLambdaMu2D(A, lambda, mu)

Subroutine generating various types of Hooke's laws

Arguments

Type IntentOptional Attributes Name
type(Tens4OS2D), intent(out) :: A
real(kind=C_DOUBLE), intent(in) :: lambda
real(kind=C_DOUBLE), intent(in) :: mu

public subroutine MEF90HookeLawIsoLambdaMu3D(A, lambda, mu)

Arguments

Type IntentOptional Attributes Name
type(Tens4OS3D), intent(out) :: A
real(kind=C_DOUBLE), intent(in) :: lambda
real(kind=C_DOUBLE), intent(in) :: mu

public subroutine MEF90MaterialsInitialize_Private(ierr)

Author
Blaise Bourdin (2013-2014, bourdin@lsu.edu)

MEF90MaterialsInitialize_Private:

Arguments

Type IntentOptional Attributes Name
integer(kind=C_INT32_T), intent(out) :: ierr