Rheolef  7.1
an efficient C++ finite element environment
combustion_keller_post.cc
Go to the documentation of this file.
1 #include "rheolef.h"
26 using namespace rheolef;
27 using namespace std;
28 #include "combustion.h"
29 int main(int argc, char**argv) {
30  environment rheolef (argc,argv);
31  string metric;
32  din >> catchmark("metric") >> metric;
33  keller<combustion> F (combustion(), metric);
35  dout << noverbose
36  << setprecision(numeric_limits<Float>::digits10)
37  << "# metric " << metric << endl
38  << "# s lambda umax det(mantissa,base,exp) |u| |grad(u)| |residue|"
39  << endl;
40  for (size_t n = 0; F.get(din,xh); ++n) {
41  problem::determinant_type det;
42  if (n > 0 || metric != "spherical") det = F.update_derivative(xh);
43  const space& Xh = xh.second.get_space();
44  trial u (Xh); test v (Xh);
45  form a = integrate(dot(grad(u),grad(v))),
46  m = integrate(u*v);
47  const combustion& F0 = F.get_problem();
48  field mrh = F0.residue(xh.second);
49  dout << F.parameter() << " " << xh.first
50  << " " << xh.second.max_abs()
51  << " " << det.mantissa
52  << " " << det.base
53  << " " << det.exponant
54  << " " << sqrt(m(xh.second,xh.second))
55  << " " << sqrt(a(xh.second,xh.second))
56  << " " << sqrt(F0.dual_space_dot (mrh,mrh))
57  << endl;
58  dot_xh = F.direction (xh);
59  F.refresh (F.parameter(), xh, dot_xh);
60  }
61 }
see the field page for the full documentation
see the form page for the full documentation
see the catchmark page for the full documentation
Definition: catchmark.h:67
see the environment page for the full documentation
Definition: environment.h:115
see the continuation page for the full documentation
Definition: keller.h:32
idiststream din
see the diststream page for the full documentation
Definition: diststream.h:427
odiststream dout(cout)
see the diststream page for the full documentation
Definition: diststream.h:430
see the space page for the full documentation
see the test page for the full documentation
see the test page for the full documentation
The combustion problem: class header for the Newton method.
int main(int argc, char **argv)
This file is part of Rheolef.
rheolef::std enable_if ::type dot const Expr1 expr1, const Expr2 expr2 dot(const Expr1 &expr1, const Expr2 &expr2)
dot(x,y): see the expression page for the full documentation
Definition: vec_expr_v2.h:415
std::enable_if< details::is_field_convertible< Expr >::value,details::field_expr_v2_nonlinear_terminal_field< typename Expr::scalar_type,typename Expr::memory_type,details::differentiate_option::gradient >>::type grad(const Expr &expr)
grad(uh): see the expression page for the full documentation
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:202
rheolef - reference manual
float_type dual_space_dot(const field &mrh, const field &msh) const
Definition: combustion2.icc:65
field residue(const field &uh) const
Definition: combustion2.icc:25
Definition: leveque.h:25
Float u(const point &x)