Rheolef  7.2
an efficient C++ finite element environment
mosolov_augmented_lagrangian1.icc

The Mossolov problem by the augmented Lagrangian method – solver class body.

The Mossolov problem by the augmented Lagrangian method – solver class body

int mosolov_augmented_lagrangian::solve (field& sigma_h, field& uh) const {
test v(Xh);
derr << "# k residue" << endl;
for (size_t k = 0; true; ++k) {
field grad_uh = inv_mt*(b*uh);
auto c = compose(vector_projection(Bi,n,1,r), norm(sigma_h+r*grad_uh));
field gamma_h = lazy_interpolate(Th, c*(sigma_h + r*grad_uh));
field delta_sigma_h = r*(grad_uh - gamma_h);
sigma_h += delta_sigma_h;
Float residue = delta_sigma_h.max_abs();
derr << k << " " << residue << endl;
if (residue <= tol || k >= max_iter) {
derr << endl << endl;
return (pow(residue,3) <= tol) ? 0 : 1;
}
field rhs = (1/r)*(lh - integrate(dot(sigma_h - r*gamma_h, grad(v))));
pa.solve (rhs, uh);
}
}
see the Float page for the full documentation
see the field page for the full documentation
see the test page for the full documentation
class rheolef::details::field_expr_v2_nonlinear_node_unary compose
rheolef::details::is_vec dot
std::enable_if< details::has_field_rdof_interface< Expr >::value, details::field_expr_v2_nonlinear_terminal_field< typenameExpr::scalar_type, typenameExpr::memory_type, details::differentiate_option::gradient > >::type grad(const Expr &expr)
grad(uh): see the expression page for the full documentation
field_basic< T, M > lazy_interpolate(const space_basic< T, M > &X2h, const field_basic< T, M > &u1h)
see the interpolate page for the full documentation
Definition: field.h:871
space_mult_list< T, M > pow(const space_basic< T, M > &X, size_t n)
Definition: space_mult.h:120
std::enable_if< details::is_field_expr_v2_nonlinear_arg< Expr >::value &&!is_undeterminated< Result >::value, Result >::type integrate(const geo_basic< T, M > &omega, const Expr &expr, const integrate_option &iopt, Result dummy=Result())
see the integrate page for the full documentation
Definition: integrate.h:211
T norm(const vec< T, M > &x)
norm(x): see the expression page for the full documentation
Definition: vec.h:387
field residue(Float p, const field &uh)
int solve(field &sigma_h, field &uh) const
The projection for yield-stress rheologies – vector-valued case for the Mossolov problem.