1 // The libMesh Finite Element Library.
2 // Copyright (C) 2002-2020 Benjamin S. Kirk, John W. Peterson, Roy H. Stogner
3
4 // This library is free software; you can redistribute it and/or
5 // modify it under the terms of the GNU Lesser General Public
6 // License as published by the Free Software Foundation; either
7 // version 2.1 of the License, or (at your option) any later version.
8
9 // This library is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // Lesser General Public License for more details.
13
14 // You should have received a copy of the GNU Lesser General Public
15 // License along with this library; if not, write to the Free Software
16 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
17
18
19
20 // Open the mesh and solution file named on standard input, find all
21 // variables therein, and output their norms and seminorms.
22 #include "libmesh/libmesh.h"
23 #include "libmesh/mesh.h"
24 #include "libmesh/equation_systems.h"
25 #include "libmesh/enum_norm_type.h"
26
27 using namespace libMesh;
28
output_norms(const System & sys,const NumericVector<Number> & vec,const std::string & vecname)29 void output_norms(const System & sys, const NumericVector<Number> & vec, const std::string & vecname)
30 {
31 for (unsigned int k = 0; k != sys.n_vars(); ++k)
32 {
33 libMesh::out << "Norms in system " << sys.name() <<
34 ", vector " << vecname <<
35 ", variable " << sys.variable_name(k) << ":" << std::endl;
36 Real l1_vecnorm = sys.calculate_norm(vec, k, DISCRETE_L1);
37 libMesh::out << "l1 norm: " << l1_vecnorm << std::endl;
38 if (l1_vecnorm)
39 {
40 libMesh::out << "l2 norm: " << sys.calculate_norm(vec, k, DISCRETE_L2) << std::endl;
41 libMesh::out << "linf norm: " << sys.calculate_norm(vec, k, DISCRETE_L_INF) << std::endl;
42 libMesh::out << "H1 norm: " << sys.calculate_norm(vec, k, H1) << std::endl;
43 libMesh::out << "L1 norm: " << sys.calculate_norm(vec, k, L1) << std::endl;
44 libMesh::out << "L2 norm: " << sys.calculate_norm(vec, k, L2) << std::endl;
45 libMesh::out << "Linf norm: " << sys.calculate_norm(vec, k, L_INF) << std::endl;
46 libMesh::out << "H1 seminorm: " << sys.calculate_norm(vec, k, H1_SEMINORM) << std::endl;
47 libMesh::out << "H1 norm: " << sys.calculate_norm(vec, k, H1) << std::endl;
48 }
49 }
50 }
51
main(int argc,char ** argv)52 int main(int argc, char ** argv)
53 {
54 LibMeshInit init (argc, argv);
55
56 Mesh mesh(init.comm());
57 EquationSystems es(mesh);
58
59 libMesh::out << "Usage: " << argv[0]
60 << " mesh solution" << std::endl;
61
62 libMesh::out << "Loading..." << std::endl;
63
64 mesh.read(argv[1]);
65 libMesh::out << "Loaded mesh " << argv[1] << std::endl;
66 mesh.print_info();
67
68 es.read(argv[2], EquationSystems::READ_HEADER |
69 EquationSystems::READ_DATA |
70 EquationSystems::READ_ADDITIONAL_DATA |
71 EquationSystems::READ_BASIC_ONLY);
72 libMesh::out << "Loaded solution " << argv[2] << std::endl;
73 es.print_info();
74
75 libMesh::out.precision(16);
76
77 for (unsigned int i = 0; i != es.n_systems(); ++i)
78 {
79 System & sys = es.get_system(i);
80
81 output_norms(sys, *sys.solution, std::string("solution"));
82 for (unsigned int j = 0; j != sys.n_vectors(); ++j)
83 output_norms(sys, sys.get_vector(j), sys.vector_name(j));
84 }
85 }
86