MEF90DefMechComputeCompositeDamage Subroutine

public subroutine MEF90DefMechComputeCompositeDamage(damage, damageSets, ierr)

MEF90DefMechComputeCompositeDamage: Reconstruct a global damage field by taking the min of all set damage fields Use in multi-phase field for I/O, error on altmin etc

Arguments

Type IntentOptional Attributes Name
type(tVec), intent(in) :: damage
type(tVec), dimension(:), pointer :: damageSets
integer(kind=C_INT32_T), intent(inout) :: ierr