rheolef  7.0
cosinusprod_error.cc
Go to the documentation of this file.
1 #include "rheolef.h"
2 using namespace rheolef;
3 using namespace std;
4 #include "cosinusprod.icc"
5 int main(int argc, char**argv) {
6  environment rheolef(argc, argv);
7  Float error_linf_expected = (argc > 1) ? atof(argv[1]) : 1e+38;
8  field uh; din >> uh;
9  space Xh = uh.get_space();
10  size_t d = Xh.get_geo().dimension();
11  field pi_h_u = interpolate(Xh, u_exact(d));
12  field eh = uh - pi_h_u;
13  trial u (Xh); test v (Xh);
14  form m = integrate (u*v);
15  form a = integrate (dot(grad(u),grad(v)));
16  dout << "error_l2 " << sqrt(m(eh,eh)) << endl
17  << "error_linf " << eh.max_abs() << endl
18  << "error_h1 " << sqrt(a(eh,eh)) << endl;
19  return (eh.max_abs() <= error_linf_expected) ? 0 : 1;
20 }
T max_abs() const
Definition: field.h:624
field - piecewise polynomial finite element field
rheolef::std enable_if ::type dot const Expr1 expr1, const Expr2 expr2 dot(const Expr1 &expr1, const Expr2 &expr2)
Definition: vec_expr_v2.h:335
int main(int argc, char **argv)
STL namespace.
irheostream, orheostream - large data streams
Definition: compiler.h:7
static field_basic< T, sequential > interpolate(const space_basic< T, sequential > &Vh, const field_basic< T, sequential > &uh)
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 quadrature_option &qopt, Result dummy=Result())
integrate - integrate a function or an expression
Definition: integrate.h:107
space – piecewise polynomial finite element space
Definition: space.h:229
double Float
Definition: compiler.h:160
size_t d
std::enable_if< details::is_field_expr_v2_linear_arg< Expr >::value,details::field_expr_v2_nonlinear_terminal_field_grad< typename Expr::scalar_type,typename Expr::memory_type >>::type grad(const Expr &expr)
idiststream din(cin)
form - representation of a finite element bilinear form
Definition: form.h:98
Float u(const point &x)
odiststream dout(cout)
Definition: diststream.h:313