void
StressDivergenceTensors::computeOffDiagJacobian(MooseVariableFEBase & jvar)
{
if (_volumetric_locking_correction)
{
computeAverageGradientPhi();
computeAverageGradientTest();
}
if (_use_finite_deform_jacobian)
{
_finite_deform_Jacobian_mult.resize(_qrule->n_points());
for (_qp = 0; _qp < _qrule->n_points(); ++_qp)
computeFiniteDeformJacobian();
ALEKernel::computeOffDiagJacobian(jvar);
}
else
Kernel::computeOffDiagJacobian(jvar);
}
void
StressDivergenceTensors::computeResidual()
{
DenseVector<Number> & re = _assembly.residualBlock(_var.number());
_local_re.resize(re.size());
_local_re.zero();
if (_volumetric_locking_correction)
computeAverageGradientTest();
precalculateResidual();
for (_i = 0; _i < _test.size(); ++_i)
for (_qp = 0; _qp < _qrule->n_points(); ++_qp)
_local_re(_i) += _JxW[_qp] * _coord[_qp] * computeQpResidual();
re += _local_re;
if (_has_save_in)
{
Threads::spin_mutex::scoped_lock lock(Threads::spin_mtx);
for (const auto & var : _save_in)
var->sys().solution().add_vector(_local_re, var->dofIndices());
}
}
