vDef Program

Variables

Type Attributes Name Initial
integer(kind=C_INT32_T) :: AltMinIter
integer(kind=C_INT32_T) :: AltMinStep = 0_ki
logical(kind=C_BOOL) :: EXONeedsFormatting = PETSC_FALSE
integer(kind=C_INT32_T) :: EXOstep
character(len=MEF90MXSTRLEN) :: IOBuffer
type(MEF90Ctx_Type), target :: MEF90Ctx
type(MEF90DefMech_Type), target :: MEF90DefMechCtx

Defect mechanics contexts

type(MEF90DefMechGlobalOptions_Type) :: MEF90DefMechGlobalOptions
type(MEF90CtxGlobalOptions_Type) :: MEF90GlobalOptions
type(MEF90HeatXfer_Type), target :: MEF90HeatXferCtx

HeatXfer contexts

type(MEF90HeatXferGlobalOptions_Type) :: MEF90HeatXferGlobalOptions
real(kind=C_DOUBLE) :: SOROmega
real(kind=C_DOUBLE), dimension(:), pointer :: bodyForceWork
real(kind=C_DOUBLE), dimension(:), pointer :: boundaryForceWork
real(kind=C_DOUBLE), dimension(:), pointer :: cohesiveEnergy
character(len=MEF90MXSTRLEN) :: convergedReasonString
type(tVec), pointer :: damage
type(tVec) :: damageAltMinOld
real(kind=C_DOUBLE), dimension(:), pointer :: damageAltMinOldArray
real(kind=C_DOUBLE), dimension(:), pointer :: damageArray
type(tDM), target :: damageDM
type(tVec) :: damageLB
real(kind=C_DOUBLE), dimension(:), pointer :: damageLBArray
real(kind=C_DOUBLE) :: damageMax
real(kind=C_DOUBLE) :: damageMaxChange
real(kind=C_DOUBLE) :: damageMin
type(tVec) :: damageResidual
type(tSNES) :: damageSNES
type(eSNESConvergedReason) :: damageSNESConvergedReason
type(tVec), pointer :: damageSol
type(tVec), pointer :: damageSolLocal
type(tTao) :: damageTAO
type(eTaoConvergedReason) :: damageTAOConvergedReason
type(tVec) :: damageUB
real(kind=C_DOUBLE), dimension(:), pointer :: damageUBArray
type(tVec) :: displacement
type(tDM), target :: displacementDM
type(tVec) :: displacementResidual
type(tSNES) :: displacementSNES
type(eSNESConvergedReason) :: displacementSNESConvergedReason
type(tDM), target :: dm
real(kind=C_DOUBLE), dimension(:), pointer :: elasticEnergy
integer :: exoid
logical(kind=C_BOOL) :: flg
integer(kind=C_INT32_T) :: iDof
integer(kind=C_INT32_T) :: ierr
integer(kind=C_INT32_T) :: logStageDamage
integer(kind=C_INT32_T) :: logStageDisplacement
integer(kind=C_INT32_T) :: logStageEnergy
integer(kind=C_INT32_T) :: logStageHeatXfer
integer(kind=C_INT32_T) :: logStageIO
type(tPetscViewer) :: logViewer
real(kind=C_DOUBLE) :: mySOROmega
integer(kind=C_INT32_T) :: numCellSet
integer(kind=C_INT32_T) :: numFaceSet
integer(kind=C_INT32_T) :: numPF
type(tVec), dimension(:), pointer :: partialDamage
integer(kind=C_INT32_T) :: set
integer(kind=C_INT32_T), dimension(:), pointer :: setID
type(tIS) :: setIS
integer(kind=C_INT32_T) :: step
real(kind=C_DOUBLE), dimension(:), pointer :: surfaceEnergy
type(tVec) :: temperature
type(tDM), target :: temperatureDM
real(kind=C_DOUBLE) :: temperatureInitialTime
real(kind=C_DOUBLE) :: temperatureInitialTimeStep
type(tVec) :: temperatureResidual
type(tSNES) :: temperatureSNES
type(eSNESConvergedReason) :: temperatureSNESConvergedReason
type(tTS) :: temperatureTS
type(tTSAdapt) :: temperatureTSAdapt
real(kind=C_DOUBLE), dimension(:), pointer :: time
character(len=MEF90MXSTRLEN) :: vecName