void ConvDiffInterface2DLaw::CalculateMaterialResponseCauchy (Parameters& rValues)
{
const Properties& props = rValues.GetMaterialProperties();
Vector& strainVector = rValues.GetStrainVector();
Vector& stressVector = rValues.GetStressVector();
Matrix& constitutiveMatrix = rValues.GetConstitutiveMatrix();
Flags& Options = rValues.GetOptions();
bool compute_constitutive_tensor = Options.Is(COMPUTE_CONSTITUTIVE_TENSOR);
bool compute_stress = Options.Is(COMPUTE_STRESS) || compute_constitutive_tensor;
SizeType size = GetStrainSize();
if(compute_stress)
if(stressVector.size() != size)
stressVector.resize(size, false);
if(compute_constitutive_tensor)
if(constitutiveMatrix.size1() != size || constitutiveMatrix.size2() != size)
constitutiveMatrix.resize(size, size, false);
CalculationData data;
InitializeCalculationData( props, rValues.GetElementGeometry(), strainVector, data );
std::stringstream ss;
//std::cout << "CalculateMaterialResponseCauchy - strainVector = " << strainVector << std::endl;
//std::cout << "CalculateMaterialResponseCauchy - constitutiveMatrix = " << constitutiveMatrix << std::endl;
if (data.ExpCurveTypeFlag)
{
CalculateElasticStressVector(data, strainVector);
//std::cout << "CalculateMaterialResponseCauchy - ElasticStressVector = " << data.ElasticStressVector << std::endl;
CalculateEquivalentMeasure(data);
UpdateDamage(data);
CalculateContactConductivity(data);
}
else
{
CalculateEffectiveOpening(data);
UpdateDamage(data);
CalculateContactConductivity(data);
}
mD1 = data.D1; // Update the mK1 to the current value
if( compute_stress )
{
CalculateStress(data, strainVector, stressVector);
}
//std::cout << "CalculateMaterialResponseCauchy - CalculateStress = " << stressVector << std::endl;
if( compute_constitutive_tensor )
{
CalculateConstitutiveMatrix( data, strainVector, stressVector, constitutiveMatrix );
}
std::cout << ss.str();
}
void ScalarDamageInterface2DLaw::FinalizeSolutionStep(const Properties& rMaterialProperties,
const GeometryType& rElementGeometry,
const Vector& rShapeFunctionsValues,
const ProcessInfo& rCurrentProcessInfo)
{
#ifdef INTERF_DAM_2D_IMPLEX
// implicit step
// create dummy material parameters
Vector dummy_stress(this->GetStrainSize());
Matrix dummy_tangent(this->GetStrainSize(), this->GetStrainSize());
ConstitutiveLaw::Parameters parameters(rElementGeometry, rMaterialProperties, rCurrentProcessInfo);
parameters.SetStrainVector( m_strain );
parameters.SetStressVector( dummy_stress );
parameters.SetConstitutiveMatrix( dummy_tangent );
Flags& options = parameters.GetOptions();
options.Set(ConstitutiveLaw::COMPUTE_STRESS, true);
options.Set(ConstitutiveLaw::COMPUTE_CONSTITUTIVE_TENSOR, false);
options.Set(ConstitutiveLaw::INITIAL_CONFIGURATION);
double detF = 1.0;
double detF0 = 1.0;
Matrix F(IdentityMatrix(2,2));
Matrix F0(IdentityMatrix(2,2));
parameters.SetDeterminantF(detF);
parameters.SetDeterminantF0(detF0);
parameters.SetDeformationGradientF(F);
parameters.SetDeformationGradientF0(F0);
// initialize calculation data
CalculationData data;
InitializeCalculationData(rMaterialProperties, rElementGeometry, m_strain, rCurrentProcessInfo, data);
CalculateElasticStressVector( data, m_strain );
// calculate internal variables implicitly
CalculateEquivalentMeasure( data );
UpdateDamage( data );
mD1 = data.D1;
mD2 = data.D2;
// move from n to n-1
mK1_converged_old = mK1_converged;
mK2_converged_old = mK2_converged;
m_dTime_n_converged = m_dTime_n;
#endif // INTERF_DAM_2D_IMPLEX
// save converged values
mK1_converged = mK1;
mK2_converged = mK2;
mD2_bar_converged = mD2_bar;
}
void ScalarDamageInterface2DLaw::CalculateMaterialResponseCauchy (Parameters& rValues)
{
const Properties& props = rValues.GetMaterialProperties();
const Vector& strainVector = rValues.GetStrainVector();
Vector& stressVector = rValues.GetStressVector();
Matrix& constitutiveMatrix = rValues.GetConstitutiveMatrix();
Flags& Options = rValues.GetOptions();
bool compute_constitutive_tensor = Options.Is(COMPUTE_CONSTITUTIVE_TENSOR);
bool compute_stress = Options.Is(COMPUTE_STRESS) || compute_constitutive_tensor;
#ifdef INTERF_DAM_2D_IMPLEX
this->m_strain = rValues.GetStrainVector();
#endif // INTERF_DAM_2D_IMPLEX
SizeType size = GetStrainSize();
if(compute_stress)
if(stressVector.size() != size)
stressVector.resize(size, false);
if(compute_constitutive_tensor)
if(constitutiveMatrix.size1() != size || constitutiveMatrix.size2() != size)
constitutiveMatrix.resize(size, size, false);
CalculationData data;
InitializeCalculationData( props, rValues.GetElementGeometry(), strainVector, rValues.GetProcessInfo(), data );
CalculateElasticStressVector( data, strainVector );
#ifdef INTERF_DAM_2D_IMPLEX
double time_factor = 0.0;
if(m_dTime_n_converged>0.0) time_factor = data.dTime/m_dTime_n_converged;
m_dTime_n = data.dTime;
mK1 = mK1_converged + time_factor * (mK1_converged-mK1_converged_old);
mK2 = mK2_converged + time_factor * (mK2_converged-mK2_converged_old);
if(mK1 > 0.0)
{
data.D1 = 1.0 - data.Ft/(mK1+data.Ft) * std::exp( -data.Ft/(data.GI*data.Kn) * mK1 );
data.D1 = std::max( std::min( data.D1, 1.0 ), 0.0 );
}
if(mK2 > 0.0)
{
data.D2 = 1.0 - data.C0/(mK2+data.C0) * std::exp( -data.C0/data.GII/data.Kt * mK2 );
data.D2 = std::max( std::min( data.D2, 1.0 ), 0.0 );
}
#ifdef USE_AS_BRICK_INTERFACE
data.D2 = 0.0;
if(data.D1 > 0.99)
data.D2 = 1.0;
#endif // USE_AS_BRICK_INTERFACE
#else
CalculateEquivalentMeasure( data );
UpdateDamage( data );
#endif // INTERF_DAM_2D_IMPLEX
mD1 = data.D1;
mD2 = data.D2;
if( compute_stress )
CalculateStress( data, stressVector );
//**********************************************
double sig_n = stressVector(1);
double sig_t = std::abs(stressVector(0));
double C0_d = (1.0 - mD2)*data.C0;
mYieldValue = sig_n*data.Fs + sig_t - C0_d;
//**********************************************
if( compute_constitutive_tensor )
{
if(data.ForceSecant) {
constitutiveMatrix.clear();
constitutiveMatrix(0,0) = data.Kt*(1.0-mD2);
constitutiveMatrix(1,1) = data.Kn;
if(stressVector(1) > 0.0) {
constitutiveMatrix(1,1) *= (1.0-mD1);
}
}
else {
CalculateConstitutiveMatrix( data, strainVector, stressVector, constitutiveMatrix );
}
}
}
