| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer(kind=C_INT32_T), | public | :: | aOrder | = | -1 | ||
| integer(kind=C_INT32_T), | public | :: | comm | ||||
| real(kind=C_DOUBLE), | public | :: | cw | = | -1.0_Kr | ||
| real(kind=C_DOUBLE), | public | :: | fractureToughness | = | 0.0_Kr | ||
| real(kind=C_DOUBLE), | public | :: | internalLength | = | -1.0_Kr | ||
| logical(kind=C_BOOL), | public | :: | isElastic | = | PETSC_FALSE | ||
| character(kind=c_char, len=MEF90MXSTRLEN), | public | :: | name | = | "NULL" | ||
| character(kind=c_char, len=MEF90MXSTRLEN), | public | :: | prefix | ||||
| real(kind=C_DOUBLE), | public | :: | residualStiffness | = | 0.0_Kr | ||
| class(mef90Mat), | public, | allocatable | :: | toughnessAnisotropyMatrix | |||
| character(len=MEF90MXSTRLEN), | public | :: | type | = | '' | ||
| integer(kind=C_INT32_T), | public | :: | wOrder | = | -1 |
| procedure, public, pass(self) :: D2a => D2aAT1 | |
| procedure, public, pass(self) :: D2w => D2wAT1 | |
| procedure, public, pass(self) :: Da => DaAT1 | |
| procedure, public, pass(self) :: Dw => DwAT1 | |
| procedure, public, pass(self) :: a => aAT1 | |
| procedure, public, pass(self) :: setFromOptions => MEF90DefMechAT1_setFromOptions | |
| procedure, public, pass(self) :: view => MEF90Object_view | |
| procedure, public, pass(self) :: view_internal => MEF90DefMechAT_View | |
| procedure, public, pass(self) :: w => wAT1 |
D2aAT1: the second derivative of the "a" function of the standard AT1 model, i.e. $a''(\alpha) = 2(1-\eta)$
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(MEF90DefMechAT1_Type), | intent(in) | :: | self | |||
| real(kind=C_DOUBLE) | :: | alpha |
D2wAT1: the second derivative of the "w" function of the standard AT1 model, i.e. $w''(\alpha) = 0$
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(MEF90DefMechAT1_Type), | intent(in) | :: | self | |||
| real(kind=C_DOUBLE) | :: | alpha |
DaAT1: the derivative of the "a" function of the standard AT1 model, i.e. $a'(\alpha) = -2(1-\eta)(1-\alpha)$
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(MEF90DefMechAT1_Type), | intent(in) | :: | self | |||
| real(kind=C_DOUBLE) | :: | alpha |
DwAT1: the derivative of the "w" function of the standard AT1 model, i.e. $w'(\alpha) = 1$
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(MEF90DefMechAT1_Type), | intent(in) | :: | self | |||
| real(kind=C_DOUBLE) | :: | alpha |
aAT1: the "a" function of the standard AT1 model, i.e. $a(\alpha) = \eta + (1-\eta)(1-\alpha)^2$
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(MEF90DefMechAT1_Type), | intent(in) | :: | self | |||
| real(kind=C_DOUBLE) | :: | alpha |
wAT1: the "w" function of the standard AT1 model, i.e. $w(\alpha) = \alpha$
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(MEF90DefMechAT1_Type), | intent(in) | :: | self | |||
| real(kind=C_DOUBLE) | :: | alpha |
MEF90DefMechAT1_setFromOptions: initializes a MEF90_DefMechAT1_Type from options
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(MEF90DefMechAT1_Type), | intent(inout) | :: | self | |||
| integer(kind=C_INT32_T), | intent(inout) | :: | ierr |