boundary_marker.cpp File Reference

#include <MoFEM.hpp>

Go to the source code of this file.

Classes
struct	OpFace

Typedefs
using	FaceEle = MoFEM::FaceElementForcesAndSourcesCore
using	FaceEleOp = FaceEle::UserDataOperator

Functions
int	main (int argc, char *argv[])

Variables
static char	help [] = "...\n\n"

Typedef Documentation

FaceEle

using FaceEle = MoFEM::FaceElementForcesAndSourcesCore

Examples

boundary_marker.cpp.

Definition at line 16 of file boundary_marker.cpp.

FaceEleOp

using FaceEleOp = FaceEle::UserDataOperator

Examples

boundary_marker.cpp.

Definition at line 17 of file boundary_marker.cpp.

Function Documentation

main()

int main	(	int	argc,
		char *	argv[]
	)

Definition at line 74 of file boundary_marker.cpp.

                                 {
 
  MoFEM::Core::Initialize(&argc, &argv, (char *)0, help);
 
  try {
 
    moab::Core mb_instance;
    moab::Interface &moab = mb_instance;
 
    // Create MoFEM instance
    MoFEM::Core core(moab);
    MoFEM::Interface &m_field = core;
 
    int order = 4;
    CHKERR PetscOptionsGetInt(PETSC_NULL, "", "-order", &order, PETSC_NULL);
 
    DMType dm_name = "DMMOFEM";
    CHKERR DMRegister_MoFEM(dm_name);
 
    auto *simple_interface = m_field.getInterface<Simple>();
    CHKERR simple_interface->getOptions();
    CHKERR simple_interface->loadFile("");
    CHKERR simple_interface->addDomainField("FIELD1", H1,
                                            AINSWORTH_LEGENDRE_BASE, 3);
    CHKERR simple_interface->setFieldOrder("FIELD1", order);
    CHKERR simple_interface->setUp();
 
    auto get_ents_on_mesh_skin = [&]() {
      Range faces;
      CHKERR m_field.get_moab().get_entities_by_type(0, MBTRI, faces);
      Skinner skin(&m_field.get_moab());
      Range skin_edges;
      CHKERR skin.find_skin(0, faces, false, skin_edges);
      Range skin_verts;
      CHKERR moab.get_connectivity(skin_edges, skin_verts, true);
      skin_edges.merge(skin_verts);
      return skin_edges;
    };
 
    auto mark_boundary_dofs = [&](Range &skin_edges) {
      auto problem_manager = m_field.getInterface<ProblemsManager>();
      std::vector<unsigned char> marker;
      problem_manager->markDofs(simple_interface->getProblemName(), ROW,
                                ProblemsManager::OR, skin_edges, marker);
      // Unset coefficient 1, e.g. u_y
      problem_manager->modifyMarkDofs(simple_interface->getProblemName(), ROW,
                                      "FIELD1", 1, 1, ProblemsManager::AND, 0,
                                      marker);
      return marker;
    };
 
    auto skin_ents = get_ents_on_mesh_skin();
 
    // Get global local vector of marked DOFs. Is global, since is set for all
    // DOFs on processor. Is local since only DOFs on processor are in the
    // vector. To access DOFs use local indices.
    auto marker = mark_boundary_dofs(skin_ents);
 
    boost::shared_ptr<FaceEle> fe(new FaceEle(m_field));
    fe->getOpPtrVector().push_back(new OpFace(skin_ents, marker));
 
    auto dm = simple_interface->getDM();
    CHKERR DMoFEMLoopFiniteElements(dm, simple_interface->getDomainFEName(),
                                    fe);
  }
  CATCH_ERRORS;
 
  CHKERR MoFEM::Core::Finalize();
}

Variable Documentation

help

char help[] = "...\n\n"

static

Definition at line 14 of file boundary_marker.cpp.