int main(int argc, char **args)
{
if (argc < 3) error("Not enough parameters.");
char *type = args[1];
Mesh mesh;
H3DReader mesh_loader;
if (!mesh_loader.load(args[2], &mesh)) error("Loading mesh file '%s'\n", args[2]);
if (strcmp(type, "sln") == 0) {
// Testing on Exact solution which always gives the same value (values from Solution may differ by epsilon)
ExactSolution ex_sln(&mesh, exact_solution);
output.out(&ex_sln, "U");
}
else if (strcmp(type, "vec-sln") == 0) {
// Testing on Exact solution which always gives the same value (values from Solution may differ by epsilon)
ExactSolution ex_sln(&mesh, exact_vec_solution);
output.out(&ex_sln, "U");
}
else if (strcmp(type, "3sln") == 0) {
// Testing on Exact solution which always gives the same value (values from Solution may differ by epsilon)
ExactSolution ex_sln0(&mesh, exact_solution0);
ExactSolution ex_sln1(&mesh, exact_solution1);
ExactSolution ex_sln2(&mesh, exact_solution2);
output.out(&ex_sln0, &ex_sln1, &ex_sln2, "U");
}
else if (strcmp(type, "ord") == 0) {
Ord3 order;
if (mesh.elements[1]->get_mode() == HERMES_MODE_HEX)
order = Ord3(2, 3, 4);
else if (mesh.elements[1]->get_mode() == HERMES_MODE_TET)
order = Ord3(3);
else
error(HERMES_ERR_NOT_IMPLEMENTED);
H1Space space(&mesh, bc_types, essential_bc_values, order);
#if defined GMSH
output.out_orders_gmsh(&space, "orders_gmsh");
#elif defined VTK
output.out_orders_vtk(&space, "orders_vtk");
#endif
}
else if (strcmp(type, "bc") == 0) {
#if defined GMSH
output.out_bc_gmsh(&mesh);
#elif defined VTK
output.out_bc_vtk(&mesh);
#endif
}
else if (strcmp(type, "mat") == 0) {
StiffMatrix mat;
test_mat(&mesh, mat);
output.out(&mat);
}
else if (strcmp(type, "mm") == 0) {
test_mm(&mesh);
}
return 0;
}
