m_MEF90_DefMechAT Module


Uses


Variables

Type Visibility Attributes Name Initial
character(len=MEF90MXSTRLEN), protected, dimension(7) :: MEF90DefMech_damageTypeList = ['AT1                     ', 'AT1exp                  ', 'AT2                     ', 'KKL                     ', 'MEF90DefMech_damageType ', '_MEF90DefMech_damageType', '                        ']

Enumerations

enum, bind(c)

Enumerators

enumerator:: MEF90DefMech_damageTypeAT1 = 0
enumerator:: MEF90DefMech_damageTypeAT1exp = 1
enumerator:: MEF90DefMech_damageTypeAT2 = 2
enumerator:: MEF90DefMech_damageTypeKKL = 3

Subroutines

public subroutine MEF90DefMechGetATModel(comm, prefix, dim, ATModel, ierr)

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

MEF90DefMechGetATModel: Return the AT model object from the cell set options

Arguments

Type IntentOptional Attributes Name
integer(kind=C_INT32_T), intent(in) :: comm
character(len=MEF90MXSTRLEN), intent(in) :: prefix
integer(kind=C_INT32_T), intent(in) :: dim
class(MEF90DefMechAT_Type), intent(out), allocatable :: ATModel
integer(kind=C_INT32_T), intent(inout) :: ierr