Flow123d  release_3.0.0-506-g34af125
generic_field.impl.hh
Go to the documentation of this file.
1 /*!
2  *
3  * Copyright (C) 2015 Technical University of Liberec. All rights reserved.
4  *
5  * This program is free software; you can redistribute it and/or modify it under
6  * the terms of the GNU General Public License version 3 as published by the
7  * Free Software Foundation. (http://www.gnu.org/licenses/gpl-3.0.en.html)
8  *
9  * This program is distributed in the hope that it will be useful, but WITHOUT
10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
11  * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
12  *
13  *
14  * @file generic_field.impl.hh
15  * @brief
16  */
17 
18 #ifndef GENERIC_FIELD_IMPL_HH_
19 #define GENERIC_FIELD_IMPL_HH_
20 
21 #include <memory>
22 #include "mesh/mesh.h"
23 #include "mesh/partitioning.hh"
24 #include "mesh/accessors.hh"
25 
26 #include "fields/generic_field.hh"
27 #include "fields/field_fe.hh"
28 #include "fields/vec_seq_double.hh"
30 
31 #include "fem/mapping_p1.hh"
32 #include "fem/fe_p.hh"
33 #include "fem/dofhandler.hh"
34 #include "fem/discrete_space.hh"
35 
36 
37 template <int spacedim>
39  IndexField region_id;
40  region_id.name("region_id");
41  region_id.units( UnitSI::dimensionless() );
42  region_id.set_mesh(mesh);
43 
44  RegionSet all_regions=mesh.region_db().get_region_set("ALL");
45  for(Region reg : all_regions) {
46  auto field_algo=std::make_shared<FieldConstant<spacedim, DoubleScalar>>();
47  field_algo->set_value(reg.id());
48  region_id.set_field(
49  {reg} ,
50  field_algo,
51  0.0); // time=0.0
52  }
53  return region_id;
54 }
55 
56 template <int spacedim>
58  static MappingP1<1,3> map1;
59  static MappingP1<2,3> map2;
60  static MappingP1<3,3> map3;
61  static FE_P_disc<0> fe0(0);
62  static FE_P_disc<1> fe1(0);
63  static FE_P_disc<2> fe2(0);
64  static FE_P_disc<3> fe3(0);
65  std::shared_ptr<DOFHandlerMultiDim> dh;
66  dh = std::make_shared<DOFHandlerMultiDim>(mesh);
67  std::shared_ptr<DiscreteSpace> ds = std::make_shared<EqualOrderDiscreteSpace>( &mesh, &fe0, &fe1, &fe2, &fe3);
68  dh->distribute_dofs(ds, true);
69 
70  auto field_subdomain_data = mesh.get_part()->subdomain_id_field_data();
71  std::vector<LongIdx> indices(1);
72  VectorSeqDouble *data_vec = new VectorSeqDouble();
73  data_vec->resize(mesh.n_elements());
74  ASSERT_EQ(dh->max_elem_dofs(), 1);
75  for(unsigned int i_ele=0; i_ele<mesh.n_elements(); ++i_ele) {
76  ElementAccessor<3> ele = mesh.element_accessor(i_ele);
77  dh->get_dof_indices(ele, indices);
78  (*data_vec)[ indices[0] ] = (*field_subdomain_data)[i_ele];
79  }
80  std::shared_ptr< FieldFE<spacedim, DoubleScalar> > field_ptr = std::make_shared< FieldFE<spacedim, DoubleScalar> >();
81  field_ptr->set_fe_data(dh, &map1, &map2, &map3, data_vec);
82 
83  IndexField subdomain;
84  subdomain.name("subdomain");
85  subdomain.units( UnitSI::dimensionless() );
86  subdomain.set_mesh(mesh);
87 
88  subdomain.set_field(
89  mesh.region_db().get_region_set("ALL"),
90  field_ptr,
91  0.0); // time=0.0
92 
93  return subdomain;
94 }
95 
96 
97 
98 #endif /* GENERAL_FIELD_IMPL_HH_ */
Class MappingP1 implements the affine transformation of the unit cell onto the actual cell...
static auto subdomain(Mesh &mesh) -> IndexField
Declaration of class which handles the ordering of degrees of freedom (dof) and mappings between loca...
Class template representing a field with values dependent on: point, element, and region...
Definition: field.hh:83
Definition: mesh.h:80
Fields computed from the mesh data.
FieldCommon & units(const UnitSI &units)
Set basic units of the field.
Definitions of basic Lagrangean finite elements with polynomial shape functions.
static auto region_id(Mesh &mesh) -> IndexField
void resize(unsigned int size)
Create shared pointer and PETSC vector with given size.
Declaration of class which provides the finite element for every mesh cell.
void set_field(const RegionSet &domain, FieldBasePtr field, double time=0.0)
Definition: field.impl.hh:198
FieldCommon & name(const string &name)
void set_mesh(const Mesh &mesh) override
Definition: field.impl.hh:159
static UnitSI & dimensionless()
Returns dimensionless unit.
Definition: unit_si.cc:55
#define ASSERT_EQ(a, b)
Definition of comparative assert macro (EQual)
Definition: asserts.hh:327