MEF90DefMechGlobalOptions_Type Derived Type

type, public, extends(MEF90Object) :: MEF90DefMechGlobalOptions_Type

MEF90DefMechGlobalOptions_Type: the problem-wide options of a MEF90DefMech_Type. The values given here are the defaults used by setFromOptions


Components

Type Visibility Attributes Name Initial
integer(kind=C_INT32_T), public :: BTInterval = -1_ki
integer(kind=C_INT32_T), public :: BTScope = -1_ki
real(kind=C_DOUBLE), public :: BTTol = 1.0e-2_kr
integer(kind=C_INT32_T), public :: BTType = MEF90DefMech_BTTypeNULL
integer(kind=C_INT32_T), public :: CrackPressureScaling = MEF90Scaling_Linear
real(kind=C_DOUBLE), public :: InjectedVolumeATol = 1.0e-3_kr
integer(kind=C_INT32_T), public :: PCLag = 10_ki
real(kind=C_DOUBLE), public :: SOROmega = 1.0_kr
integer(kind=C_INT32_T), public :: bodyForceScaling = MEF90Scaling_Linear
integer(kind=C_INT32_T), public :: boundaryDamageScaling = MEF90Scaling_CST
integer(kind=C_INT32_T), public :: boundaryDisplacementScaling = MEF90Scaling_Linear

scaling = time (step) scaling law currently CST, Linear, or File

integer(kind=C_INT32_T), public :: boundaryForceScaling = MEF90Scaling_Linear
integer(kind=C_INT32_T), public :: cohesiveDisplacementScaling = MEF90Scaling_CST
integer(kind=C_INT32_T), public :: comm
logical(kind=C_BOOL), public :: cumulatedPlasticDissipationExport = PETSC_FALSE
real(kind=C_DOUBLE), public :: damageATol = 1.0e-3_kr
logical(kind=C_BOOL), public :: damageExport = PETSC_TRUE
integer(kind=C_INT32_T), public :: damageMaxIt = 1000_ki
integer(kind=C_INT32_T), public :: damageSolverType = MEF90DefMech_DamageSolverTypeSNES
real(kind=C_DOUBLE), public :: dampingCoefficientDamage = 0.0_kr
real(kind=C_DOUBLE), public :: dampingCoefficientDisplacement = 0.0_kr
logical(kind=C_BOOL), public :: displacementExport = PETSC_TRUE
integer(kind=C_INT32_T), public :: displacementLowerBoundScaling = MEF90Scaling_CST
integer(kind=C_INT32_T), public :: displacementUpperBoundScaling = MEF90Scaling_CST
real(kind=C_DOUBLE), public :: irrevthres = 0.0_kr
logical(kind=C_BOOL), public :: multiPhaseField = PETSC_FALSE
character(kind=c_char, len=MEF90MXSTRLEN), public :: name = "NULL"
real(kind=C_DOUBLE), public :: plasticStrainATol = 1.0e-4_kr
logical(kind=C_BOOL), public :: plasticStrainExport = PETSC_FALSE
character(kind=c_char, len=MEF90MXSTRLEN), public :: prefix
integer(kind=C_INT32_T), public :: pressureForceScaling = MEF90Scaling_Linear
integer(kind=C_INT32_T), public :: solverType = MEF90DefMech_SolverTypeAltMin
logical(kind=C_BOOL), public :: stressExport = PETSC_TRUE
logical(kind=C_BOOL), public :: temperatureExport = PETSC_FALSE
integer(kind=C_INT32_T), public :: timeSteppingType = MEF90DefMech_TimeSteppingTypeQuasiStatic

Type-Bound Procedures

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

  • private subroutine MEF90Object_setFromOptions(self, ierr)

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

    MEF90Object_setFromOptions: generic version of the setFromOptions method for all MEF90Objects, which just prints the object if -verbose is set to a high value Can be overridden in classes if they have options to set.

    Arguments

    Type IntentOptional Attributes Name
    class(MEF90Object), 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 => MEF90DefMechGlobalOptionsView

  • public subroutine MEF90DefMechGlobalOptionsView(self, viewer, ierr)

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

    MEF90DefMechGlobalOptionsView: the default viewer for a MEF90DefMechGlobalOptions_Type

    Arguments

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