rannacherturekbasis.hh

// -*- tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
// vi: set et ts=4 sw=2 sts=2:
#ifndef DUNE_FUNCTIONS_FUNCTIONSPACEBASES_RANNACHERTUREKBASIS_HH
#define DUNE_FUNCTIONS_FUNCTIONSPACEBASES_RANNACHERTUREKBASIS_HH
 
#include <dune/common/exceptions.hh>
 
#include <dune/grid/common/capabilities.hh>
 
#include <dune/localfunctions/common/localfiniteelementvariant.hh>
#include <dune/localfunctions/rannacherturek.hh>
#include <dune/localfunctions/crouzeixraviart.hh>
 
#include <dune/functions/functionspacebases/nodes.hh>
#include <dune/functions/functionspacebases/defaultglobalbasis.hh>
#include <dune/functions/functionspacebases/leafprebasismixin.hh>
 
 
namespace Dune {
namespace Functions {
 
// *****************************************************************************
// This is the reusable part of the basis. It contains
//
//   RannacherTurekPreBasis
//   RannacherTurekNode
//
// The pre-basis allows to create the others and is the owner of possible shared
// state. These components do _not_ depend on the global basis and local view
// and can be used without a global basis.
// *****************************************************************************
 
template<typename GV>
class RannacherTurekNode;
 
template<typename GV>
class RannacherTurekPreBasis;
 
template<typename GV>
class RannacherTurekPreBasis :
  public LeafPreBasisMixin< RannacherTurekPreBasis<GV> >
{
  static const int dim = GV::dimension;
 
public:
 
  using GridView = GV;
 
  using size_type = std::size_t;
 
  using Node = RannacherTurekNode<GV>;
 
  RannacherTurekPreBasis(const GridView& gv) :
    gridView_(gv)
  {
    for(auto type : gv.indexSet().types(0))
      if (!type.isSimplex() && !type.isCube())
        DUNE_THROW(Dune::NotImplemented, "Rannacher-Turek or Crouzeix-Raviart elements are only implemented for grids with simplex or cube elements.");
  }
 
  void initializeIndices()
  {}
 
  const GridView& gridView() const
  {
    return gridView_;
  }
 
  void update (const GridView& gv)
  {
    gridView_ = gv;
  }
 
  Node makeNode() const
  {
    return Node{};
  }
 
  size_type dimension() const
  {
    return (size_type)(gridView_.size(1));
  }
 
  size_type maxNodeSize() const
  {
    return 2*GV::dimension;
  }
 
  template<typename It>
  It indices(const Node& node, It it) const
  {
    for (size_type i = 0, end = node.size() ; i < end ; ++i, ++it)
      {
        Dune::LocalKey localKey = node.finiteElement().localCoefficients().localKey(i);
        const auto& gridIndexSet = gridView().indexSet();
        const auto& element = node.element();
 
        *it = {{ (size_type)(gridIndexSet.subIndex(element,localKey.subEntity(),1)) }};
      }
    return it;
  }
 
protected:
  GridView gridView_;
};
 
 
 
template<typename GV>
class RannacherTurekNode :
  public LeafBasisNode
{
  static const int dim = GV::dimension;
  static const int maxSize = 2*dim;
 
  constexpr static bool hasFixedElementType = Capabilities::hasSingleGeometryType<typename GV::Grid>::v;
 
  using CubeFiniteElement    = RannacherTurekLocalFiniteElement<typename GV::ctype,double,dim>;
  using SimplexFiniteElement = CrouzeixRaviartLocalFiniteElement<typename GV::ctype,double,dim>;
 
  constexpr static unsigned int  topologyId = Capabilities::hasSingleGeometryType<typename GV::Grid>::topologyId;  // meaningless if hasFixedElementType is false
  constexpr static GeometryType type = GeometryType(topologyId, GV::dimension);
 
public:
 
  using size_type = std::size_t;
  using Element = typename GV::template Codim<0>::Entity;
  using FiniteElement = std::conditional_t<hasFixedElementType,
                                         std::conditional_t<type.isCube(),CubeFiniteElement,SimplexFiniteElement>,
                                         LocalFiniteElementVariant<CubeFiniteElement, SimplexFiniteElement> >;
 
  RannacherTurekNode() :
    finiteElement_(),
    element_(nullptr)
  {}
 
  const Element& element() const
  {
    return *element_;
  }
 
  const FiniteElement& finiteElement() const
  {
    return finiteElement_;
  }
 
  void bind(const Element& e)
  {
    element_ = &e;
    if constexpr (!hasFixedElementType)
      finiteElement_ = e.type().isCube() ? static_cast<FiniteElement>(CubeFiniteElement())
                                         : static_cast<FiniteElement>(SimplexFiniteElement()) ;
    this->setSize(finiteElement_.size());
  }
 
protected:
 
  FiniteElement finiteElement_;
  const Element* element_;
};
 
 
 
namespace BasisFactory {
 
template<class Dummy=void>
auto rannacherTurek()
{
  return [](const auto& gridView) {
    return RannacherTurekPreBasis<std::decay_t<decltype(gridView)>>(gridView);
  };
}
 
} // end namespace BasisFactory
 
 
 
 
template<typename GV>
using RannacherTurekBasis = DefaultGlobalBasis<RannacherTurekPreBasis<GV> >;
 
} // end namespace Functions
} // end namespace Dune
 
#endif // DUNE_FUNCTIONS_FUNCTIONSPACEBASES_RANNACHERTUREKBASIS_HH