coordinates.hh

Go to the documentation of this file.

// -*- tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
// vi: set et ts=4 sw=2 sts=2:
#ifndef DUNE_GRID_YASPGRID_COORDINATES_HH
#define DUNE_GRID_YASPGRID_COORDINATES_HH
 
#include <bitset>
#include <vector>
 
#include <dune/common/array.hh>
#include <dune/common/fvector.hh>
 
namespace Dune
{
  template<class ct, int dim>
  class EquidistantCoordinates
  {
    public:
    typedef ct ctype;
    static const int dimension = dim;
 
    EquidistantCoordinates() {}
 
    EquidistantCoordinates(const Dune::FieldVector<ct,dim>& h, const Dune::array<int,dim>& s)
      : _h(h), _s(s) {}
 
    inline ct meshsize(int d, int i) const
    {
      return _h[d];
    }
 
    inline ct coordinate(int d, int i) const
    {
      return i*_h[d];
    }
 
    inline int size(int d) const
    {
      return _s[d];
    }
 
    EquidistantCoordinates<ct,dim> refine(std::bitset<dim> ovlp_low, std::bitset<dim> ovlp_up, int overlap, bool keep_ovlp) const
    {
      //determine new size and meshsize
      Dune::array<int,dim> news;
      Dune::FieldVector<ct,dim> newh;
 
      for (int i=0; i<dim; i++)
      {
        news[i] = 2 * _s[i];
        if (!keep_ovlp)
        {
          if (ovlp_low[i])
            news[i] -= overlap;
          if (ovlp_up[i])
            news[i] -= overlap;
        }
 
        newh[i] = _h[i] / 2.;
      }
      return EquidistantCoordinates<ct,dim>(newh,news);
    }
 
    void print(std::ostream& s) const
    {
      s << "Printing equidistant coordinate information:" << std::endl;
      s << "Meshsize: " << _h << std::endl << "Size: " << _s << std::endl;
    }
 
    private:
    Dune::FieldVector<ct,dim> _h;
    Dune::array<int,dim> _s;
  };
 
  template<class ct, int dim>
  inline std::ostream& operator<< (std::ostream& s, EquidistantCoordinates<ct,dim>& c)
  {
    c.print(s);
    return s;
  }
 
   template<class ct, int dim>
   class EquidistantOffsetCoordinates
   {
     public:
     typedef ct ctype;
     static const int dimension = dim;
 
     EquidistantOffsetCoordinates() {}
 
     EquidistantOffsetCoordinates(const Dune::FieldVector<ct,dim>& origin, const Dune::FieldVector<ct,dim>& h, const Dune::array<int,dim>& s)
       : _origin(origin), _h(h), _s(s) {}
 
     inline ct meshsize(int d, int i) const
     {
       return _h[d];
     }
 
     inline ct coordinate(int d, int i) const
     {
       return _origin[d] + i*_h[d];
     }
 
     inline int size(int d) const
     {
       return _s[d];
     }
 
     inline ct origin(int d) const
     {
       return _origin[d];
     }
 
     EquidistantOffsetCoordinates<ct,dim> refine(std::bitset<dim> ovlp_low, std::bitset<dim> ovlp_up, int overlap, bool keep_ovlp) const
     {
       //determine new size and meshsize
       Dune::array<int,dim> news;
       Dune::FieldVector<ct,dim> newh;
 
       for (int i=0; i<dim; i++)
       {
         news[i] = 2 * _s[i];
         if (!keep_ovlp)
         {
           if (ovlp_low[i])
             news[i] -= overlap;
           if (ovlp_up[i])
             news[i] -= overlap;
         }
 
         newh[i] = _h[i] / 2.;
       }
       return EquidistantOffsetCoordinates<ct,dim>(_origin,newh,news);
     }
 
     void print(std::ostream& s) const
     {
       s << "Printing equidistant coordinate information:" << std::endl;
       s << "Meshsize: " << _h << std::endl << "Size: " << _s << std::endl;
       s << "Offset to origin: " << _origin << std::endl;
     }
 
     private:
     Dune::FieldVector<ct,dim> _origin;
     Dune::FieldVector<ct,dim> _h;
     Dune::array<int,dim> _s;
   };
 
   template<class ct, int dim>
   inline std::ostream& operator<< (std::ostream& s, EquidistantOffsetCoordinates<ct,dim>& c)
   {
     c.print(s);
     return s;
   }
 
  template<class ct, int dim>
  class TensorProductCoordinates
  {
    public:
    typedef ct ctype;
    static const int dimension = dim;
 
    TensorProductCoordinates() {}
 
    TensorProductCoordinates(const Dune::array<std::vector<ct>,dim>& c, const Dune::array<int,dim>& offset)
      : _c(c),_offset(offset)
    {}
 
    inline ct meshsize(int d, int i) const
    {
      return _c[d][i+1-_offset[d]] - _c[d][i-_offset[d]];
    }
 
    inline ct coordinate(int d, int i) const
    {
      return _c[d][i-_offset[d]];
    }
 
    inline int size(int d) const
    {
      return _c[d].size() - 1;
    }
 
    TensorProductCoordinates<ct,dim> refine(std::bitset<dim> ovlp_low, std::bitset<dim> ovlp_up, int overlap, bool keep_ovlp) const
    {
      Dune::array<std::vector<ct>,dim> newcoords;
      Dune::array<int,dim> newoffset(_offset);
      for (int i=0; i<dim; i++)
      {
        newoffset[i] *= 2;
 
        //determine new size
        int newsize = 2 * _c[i].size() - 1;
        if (!keep_ovlp)
        {
          if (ovlp_low[i])
          {
            newoffset[i] += overlap;
            newsize -= overlap;
          }
          if (ovlp_up[i])
            newsize -= overlap;
        }
        newcoords[i].resize(newsize);
 
        typename std::vector<ct>::const_iterator it = _c[i].begin();
        typename std::vector<ct>::const_iterator end = _c[i].end()-1;
        typename std::vector<ct>::iterator iit = newcoords[i].begin() - 1;
        if (!keep_ovlp)
        {
          if (ovlp_low[i])
          {
            it += overlap/2;
            if (overlap%2)
              *(++iit) = (*it + *(++it)) / 2.;
          }
          if (ovlp_up[i])
            end -= overlap/2;
        }
 
        for (;it!=end;)
        {
          *(++iit) = *it;
          *(++iit) = (*it + *(++it)) / 2.;
        }
 
        if (++iit != newcoords[i].end())
          *iit = *it;
      }
      return TensorProductCoordinates<ct,dim>(newcoords, newoffset);
    }
 
    void print(std::ostream& s) const
    {
      s << "Printing TensorProduct Coordinate information:" << std::endl;
      for (int i=0; i<dim; i++)
      {
        s << "Direction " << i << ": " << _c[i].size() << " coordinates" << std::endl;
        for (std::size_t j=0; j<_c[i].size(); j++)
          s << _c[i][j] << std::endl;
      }
    }
 
    private:
    Dune::array<std::vector<ct>,dim> _c;
    Dune::array<int,dim> _offset;
  };
 
  template<class ct, int dim>
  inline std::ostream& operator<< (std::ostream& s, TensorProductCoordinates<ct,dim>& c)
  {
    c.print(s);
    return s;
  }
 
 namespace Yasp {
  template<class ctype, std::size_t dim>
  bool checkIfMonotonous(const Dune::array<std::vector<ctype>, dim>& coords)
  {
    for (std::size_t i=0; i<dim; i++)
    {
      if (coords[i].size() <= 1)
        return false;
      for (std::size_t j=1; j<coords[i].size(); j++)
        if (coords[i][j] < coords[i][j-1])
          return false;
    }
    return true;
  }
 } // namespace Yasp
} // namespace Dune
 
#endif