CellDecomposer.hpp

/*
 * CellDecomposer.hpp
 *
 *  Created on: Apr 1, 2015
 *      Author: Pietro Incardona
 */
 
#ifndef CELLDECOMPOSER_HPP_
#define CELLDECOMPOSER_HPP_
 
#include "Space/Ghost.hpp"
#include "Space/Shape/Box.hpp"
#include "Space/Matrix.hpp"
#include "util/copy_compare/meta_compare.hpp"
#include "Grid/grid_sm.hpp"
 
#define CELL_DECOMPOSER 8001lu
 
 
 
 
template<unsigned int dim, typename T>
class shift
{
    Point<dim,T> sh;
 
    Matrix<dim,T> mat;
 
public:
 
    __device__ __host__ shift(const Matrix<dim,T> & t, const Point<dim,T> & s)
    :sh(s)
    {
        mat.identity();
    }
 
    __device__ __host__  inline T transform(const T(&s)[dim], const size_t i) const
    {
        return s[i] - sh.get(i);
    }
 
    __device__ __host__  inline T transform(const Point<dim,T> & s, const size_t i) const
    {
        return s.get(i) - sh.get(i);
    }
 
    template<typename Mem> inline __device__ __host__  T transform(const encapc<1,Point<dim,T>,Mem> & s, const size_t i) const
    {
        return s.template get<0>()[i] - sh.get(i);
    }
 
    __device__ __host__  inline void setTransform(const Matrix<dim,T> & mat, const Point<dim,T> & orig)
    {
        for (size_t i = 0 ; i < dim ; i++)
            sh.get(i) = orig.get(i);
    }
 
    inline const Point<dim,T> & getOrig() const
    {
        return sh;
    }
 
    inline const Matrix<dim,T> & getMat() const
    {
        return mat;
    }
 
    inline bool operator==(const shift<dim,T> & s)
    {
        return sh == s.sh;
    }
 
    inline bool operator!=(const shift<dim,T> & s)
    {
        return !this->operator==(s);
    }
};
 
template<unsigned int dim, typename T>
class shift_only
{
    Point<dim,T> sh;
 
public:
 
    shift_only()
    {
        sh.zero();
    }
 
    shift_only(const Matrix<dim,T> & t, const Point<dim,T> & s)
    :sh(s)
    {
    }
 
    __device__ __host__  inline T transform(const T * s, const int i) const
    {
        return s[i] - sh.get(i);
    }
 
    __device__ __host__  inline T transform(const T(&s)[dim], const int i) const
    {
        return s[i] - sh.get(i);
    }
 
    __device__ __host__  inline T transform(const Point<dim,T> & s, const int i) const
    {
        return s.get(i) - sh.get(i);
    }
 
    template<typename Mem> __device__ __host__   inline T transform(const encapc<1,Point<dim,T>,Mem> & s, const int i) const
    {
        return s.template get<0>()[i] - sh.get(i);
    }
 
    inline void setTransform(const Matrix<dim,T> & mat, const Point<dim,T> & orig)
    {
        for (size_t i = 0 ; i < dim ; i++)
            sh.get(i) = orig.get(i);
    }
 
    __device__ __host__ inline const Point<dim,T> & getOrig() const
    {
        return sh;
    }
 
 
    inline bool operator==(const shift<dim,T> & s)
    {
        return sh == s.sh;
    }
 
    inline bool operator!=(const shift<dim,T> & s)
    {
        return !this->operator==(s);
    }
};
 
template<unsigned int dim, typename T>
class no_transform
{
    Point<dim,T> orig;
 
    Matrix<dim,T> mat;
 
public:
 
    __device__ __host__ no_transform(const Matrix<dim,T> & t, const Point<dim,T> & s)
    {
        orig.zero();
        mat.identity();
    }
 
    __device__ __host__ inline T transform(const T(&s)[dim], const size_t i) const
    {
        return s[i];
    }
 
    __device__ __host__ inline T transform(const Point<dim,T> & s, const size_t i) const
    {
        return s.get(i);
    }
 
    template<typename Mem> __device__ __host__ inline T transform(const encapc<1,Point<dim,T>,Mem> & s, const size_t i) const
    {
        return s.template get<Point<dim,T>::x>()[i];
    }
 
    inline void setTransform(const Matrix<dim,T> & mat, const Point<dim,T> & orig)
    {
 
    }
 
    inline bool operator==(const no_transform<dim,T> & nt)
    {
        return true;
    }
 
    inline bool operator!=(const no_transform<dim,T> & nt)
    {
        return false;
    }
 
    inline const Point<dim,T> & getOrig() const
    {
        return orig;
    }
 
    inline const Matrix<dim,T> & getMat() const
    {
        return mat;
    }
};
 
template<unsigned int dim, typename T>
class no_transform_only
{
 
public:
 
    no_transform_only(const Matrix<dim,T> & t, const Point<dim,T> & s)
    {
    }
 
    __device__ __host__ inline T transform(const T * s, const int i) const
    {
        return s[i];
    }
 
    __device__ __host__ inline T transform(const T(&s)[dim], const int i) const
    {
        return s[i];
    }
 
    __device__ __host__  inline T transform(const Point<dim,T> & s, const int i) const
    {
        return s.get(i);
    }
 
    template<typename Mem> __device__ __host__ inline T transform(const encapc<1,Point<dim,T>,Mem> & s, const int i) const
    {
        return s.template get<Point<dim,T>::x>()[i];
    }
 
    inline void setTransform(const Matrix<dim,T> & mat, const Point<dim,T> & orig)
    {
 
    }
 
    inline bool operator==(const no_transform<dim,T> & nt)
    {
        return true;
    }
 
    inline bool operator!=(const no_transform<dim,T> & nt)
    {
        return false;
    }
};
 
template<unsigned int dim,typename T, typename transform_type = no_transform<dim,T>>
class CellDecomposer_sm
{
    // Point in the middle of a cell
    //
    // \verbatim
    //
    //         C (0.1,0.1)
    // +-----+
    // |     |
    // |  .P |
    // |     |
    // +-----+
    //
    // \endverbatim
    //
    //    C is the cell and P is the point inside the middle of the cell
    //    for example if the cell is (0.1,0.1) P is (0.05,0.05)
    //
    //
    Point<dim,T> p_middle;
 
    // Point transformation before get the Cell object (useful for example to shift the cell list)
    transform_type pointTransform;
 
    inline size_t ConvertToID(const T (&x)[dim] ,size_t s) const
    {
        size_t id = openfpm::math::size_t_floor(pointTransform.transform(x,s) / unitCellSpaceBox.getHigh(s)) + off[s];
        id = (id >= cellListGrid.size(s))?(cellListGrid.size(s)-1-cellShift.get(s)):id-cellShift.get(s);
        return id;
    }
 
    inline size_t ConvertToID(const Point<dim,T> & x ,size_t s, size_t sc = 0) const
    {
        size_t id = openfpm::math::size_t_floor(pointTransform.transform(x,s) / unitCellSpaceBox.getHigh(s)) + off[s];
        id = (id >= cellListGrid.size(s))?(cellListGrid.size(s)-1-cellShift.get(s)):id-cellShift.get(s);
        return id;
    }
 
    inline size_t ConvertToID_me(const Point<dim,T> & x ,size_t s, size_t sc = 0) const
    {
        T cc = pointTransform.transform(x,s) / unitCellSpaceBox.getHigh(s) - 0.015625;
        size_t id = openfpm::math::size_t_floor(cc) + off[s];
        id = (id >= cellListGrid.size(s))?(cellListGrid.size(s)-1-cellShift.get(s)):id-cellShift.get(s);
        return id;
    }
 
    inline size_t ConvertToID_pe(const Point<dim,T> & x ,size_t s, size_t sc = 0) const
    {
        T cc = pointTransform.transform(x,s) / unitCellSpaceBox.getHigh(s) + 0.015625;
        size_t id = openfpm::math::size_t_floor(cc) + off[s];
        id = (id >= cellListGrid.size(s))?(cellListGrid.size(s)-1-cellShift.get(s)):id-cellShift.get(s);
        return id;
    }
 
    inline size_t ConvertToID_ns(const T (&x)[dim] ,size_t s) const
    {
        size_t id = openfpm::math::size_t_floor(pointTransform.transform(x,s) / unitCellSpaceBox.getHigh(s)) + off[s];
        id = (id >= cellListGrid.size(s))?(cellListGrid.size(s)-1):id;
        return id;
    }
 
    inline size_t ConvertToID_ns(const Point<dim,T> & x ,size_t s, size_t sc = 0) const
    {
        size_t id = openfpm::math::size_t_floor(pointTransform.transform(x,s) / unitCellSpaceBox.getHigh(s)) + off[s];
        id = (id >= cellListGrid.size(s))?(cellListGrid.size(s)-1):id;
        return id;
    }
 
    template <typename Mem> inline size_t ConvertToID_(const encapc<1,Point<dim,T>,Mem> & x ,size_t s, size_t sc = 0) const
    {
        size_t id = (size_t)(pointTransform.transform(x,s) / unitCellSpaceBox.getHigh(s)) + off[s];
        id = (id >= cellListGrid.size(s))?(cellListGrid.size(s)-1-cellShift.get(s)):id-cellShift.get(s);
        return id;
    }
 
    template<typename Ele> inline void check_and_print_error(const Ele & pos ,size_t s) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
 
        if (pos[s] < cellListSpaceBox.getLow(s) - off[s]*unitCellSpaceBox.getP2()[s] || pos[s] > cellListSpaceBox.getHigh(s) + off[s]*unitCellSpaceBox.getP2()[s])
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point " << Point<dim,T>(pos).toString() << " is not inside the cell space";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
#endif
    }
 
 
    template<typename Ele> inline size_t getCellDom_impl(const Ele & pos) const
    {
        check_and_print_error(pos,0);
 
        size_t cell_id = ConvertToID_ns(pos,0);
 
        cell_id = (cell_id == cellListGrid.size(0) - off[0])?cellListGrid.size(0) - off[0] - 1:cell_id;
        cell_id = (cell_id == off[0]-1)?off[0]:cell_id;
 
        cell_id -= cellShift.get(0);
 
        for (size_t s = 1 ; s < dim ; s++)
        {
            check_and_print_error(pos,s);
 
            size_t cell_idt = ConvertToID_ns(pos,s);
 
            cell_idt = (cell_idt == cellListGrid.size(s) - off[s])?cellListGrid.size(s) - off[s] - 1:cell_idt;
            cell_idt = (cell_idt == off[s]-1)?off[s]:cell_idt;
 
            cell_idt -= cellShift.get(s);
 
            cell_id += gr_cell2.size_s(s-1) * cell_idt;
        }
 
        return cell_id;
    }
 
    template<typename Ele> inline size_t getCellPad_impl(const Ele & pos) const
    {
        check_and_print_error(pos,0);
 
        size_t cell_id = ConvertToID_ns(pos,0);
 
        cell_id = (cell_id == off[0])?off[0]-1:cell_id;
        cell_id = (cell_id == cellListGrid.size(0) - off[0] - 1)?cellListGrid.size(0) - off[0]:cell_id;
 
        cell_id -= cellShift.get(0);
 
        for (size_t s = 1 ; s < dim ; s++)
        {
            check_and_print_error(pos,s);
 
            size_t cell_idt = ConvertToID_ns(pos,s);
            cell_idt = (cell_idt == off[s])?off[s]-1:cell_idt;
            cell_idt = (cell_idt == cellListGrid.size(s) - off[s] - 1)?cellListGrid.size(s) - off[s]:cell_idt;
 
            cell_idt -= cellShift.get(s);
 
            cell_id += gr_cell2.size_s(s-1) * cell_idt;
        }
 
        return cell_id;
    }
 
 
protected:
 
    size_t cellTotalCount;
 
    Box<dim,T> cellListSpaceBox;
 
    Box<dim,T> unitCellSpaceBox;
 
    grid_sm<dim,void> cellListGrid;
 
    grid_sm<dim,void> gr_cell2;
 
    Box<dim,T> box_gr_cell2;
 
    size_t off[dim];
 
    Point<dim,long int> cellShift;
 
    // temporal buffer
    mutable size_t div_wp[dim];
 
    void Initialize(const size_t pad, const size_t (& div)[dim])
    {
#ifdef SE_CLASS1
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            if (div[i] == 0)
            {
                std::cerr << "Error " << __FILE__ << ":" << __LINE__ << " the number of cells on each dimension must be different from zero\n";
                ACTION_ON_ERROR(CELL_DECOMPOSER)
            }
        }
 
#endif
 
        // set div_wp to zero
        for (size_t i = 0 ; i < dim ; i++)
        {div_wp[i] = 0;}
 
        // created a padded div
        size_t div_p[dim];
 
        for (size_t i = 0 ; i < dim ; i++)
            div_p[i] = div[i] + 2*pad;
 
        cellListGrid.setDimensions(div_p);
        gr_cell2.setDimensions(div_p);
 
        cellTotalCount = 1;
 
        // Total number of cells and calculate the unit cell size
 
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            cellTotalCount *= cellListGrid.size(i);
            unitCellSpaceBox.setHigh(i,(cellListSpaceBox.getHigh(i) - cellListSpaceBox.getLow(i)) / (cellListGrid.size(i)- 2*pad) );
        }
 
        for (size_t i = 0; i < dim ; i++)
            off[i] = pad;
 
        // Initialize p_middle
 
        p_middle = unitCellSpaceBox.getP2();
        p_middle = p_middle / 2;
    }
 
public:
 
    const transform_type & getTransform()
    {
        return pointTransform;
    }
 
    const grid_sm<dim,void> & getGrid() const
    {
#ifdef DEBUG
        if (cellTotalCount == 0)
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
#endif
 
        return cellListGrid;
    }
 
    inline grid_key_dx<dim> getCellGrid(const T (& pos)[dim]) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
#endif
 
        grid_key_dx<dim> key;
        key.set_d(0,ConvertToID(pos,0));
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if ((size_t)(pointTransform.transform(pos,s) / unitCellSpaceBox.getHigh(s)) + off[s] < 0)
            {
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point is not inside the cell space\n";
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            key.set_d(s,ConvertToID(pos,s));
 
        }
 
        return key;
    }
 
    inline size_t getCellLin(grid_key_dx<dim> && k) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
 
        if (gr_cell2.size(0) < k.get(0) + off[0] - cellShift.get(0))
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " cell coordinate 0 = " << k.get(0) + off[0] - cellShift.get(0) << " bigger than cell space " << gr_cell2.size(0) << std::endl;
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
#endif
 
        size_t cell_id = k.get(0) + off[0] - cellShift.get(0);
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if (gr_cell2.size(s) < k.get(s) + off[s] - cellShift.get(s))
            {
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " cell coordinate 0 = " << k.get(0) + off[0] - cellShift.get(0) << " bigger than cell space " << gr_cell2.size(s) << std::endl;
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            cell_id += gr_cell2.size_s(s-1) * (k.get(s) + off[s] -cellShift.get(s));
        }
 
        return cell_id;
    }
 
    inline size_t getCellLin(const grid_key_dx<dim> & k) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
 
        if (gr_cell2.size(0) < k.get(0) + off[0] - cellShift.get(0))
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " cell coordinate 0 = " << k.get(0) + off[0] - cellShift.get(0) << " bigger than cell space " << gr_cell2.size(0) << std::endl;
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
#endif
 
        size_t cell_id = k.get(0) + off[0] -cellShift.get(0);
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if (gr_cell2.size(s) < k.get(s) + off[s] - cellShift.get(s))
            {
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " cell coordinate 0 = " << k.get(0) + off[0] - cellShift.get(0) << " bigger than cell space " << gr_cell2.size(s) << std::endl;
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            cell_id += gr_cell2.size_s(s-1) * (k.get(s) + off[s] -cellShift.get(s));
        }
 
        return cell_id;
    }
 
    inline grid_key_dx<dim> getCellGrid_me(const Point<dim,T> & pos) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer" << std::endl;
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
#endif
 
        grid_key_dx<dim> key;
        key.set_d(0,ConvertToID_me(pos,0));
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if ((size_t)(pointTransform.transform(pos,s) / unitCellSpaceBox.getHigh(s)) + off[s] < 0)
            {
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point is not inside the cell space" << std::endl;
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            /* coverity[dead_error_line] */
            key.set_d(s,ConvertToID_me(pos,s));
        }
 
        return key;
    }
 
    inline grid_key_dx<dim> getCellGrid_pe(const Point<dim,T> & pos) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer" << std::endl;
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
#endif
 
        grid_key_dx<dim> key;
        key.set_d(0,ConvertToID_pe(pos,0));
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if ((size_t)(pointTransform.transform(pos,s) / unitCellSpaceBox.getHigh(s)) + off[s] < 0)
            {
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point is not inside the cell space" << std::endl;
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            /* coverity[dead_error_line] */
            key.set_d(s,ConvertToID_pe(pos,s));
        }
 
        return key;
    }
 
    inline grid_key_dx<dim> getCellGrid(const Point<dim,T> & pos) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer" << std::endl;
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
#endif
 
        grid_key_dx<dim> key;
        key.set_d(0,ConvertToID(pos,0));
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if ((size_t)(pointTransform.transform(pos,s) / unitCellSpaceBox.getHigh(s)) + off[s] < 0)
            {
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point is not inside the cell space" << std::endl;
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            /* coverity[dead_error_line] */
            key.set_d(s,ConvertToID(pos,s));
        }
 
        return key;
    }
 
    inline size_t getCellDom(const Point<dim,T> & pos) const
    {
        return getCellDom_impl<Point<dim,T>>(pos);
    }
 
 
    inline size_t getCellDom(const T (& pos)[dim]) const
    {
        return getCellDom_impl<T[dim]>(pos);
    }
 
    inline size_t getCellPad(const Point<dim,T> & pos) const
    {
        return getCellPad_impl<Point<dim,T>>(pos);
    }
 
    inline size_t getCellPad(const T (& pos)[dim]) const
    {
        return getCellPad_impl<T[dim]>(pos);
    }
 
    inline size_t getCell(const T (& pos)[dim]) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
 
#endif
        size_t cell_id = ConvertToID(pos,0);
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if (pos[s] < cellListSpaceBox.getLow(s) - off[s]*unitCellSpaceBox.getP2()[s] || pos[s] > cellListSpaceBox.getHigh(s) + off[s]*unitCellSpaceBox.getP2()[s])
            {
                return -1;
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point " << toPointString(pos) << " is not inside the cell space";
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            cell_id += gr_cell2.size_s(s-1) * ConvertToID(pos,s);
        }
 
        return cell_id;
    }
 
    inline int getCell(const Point<dim,T> & pos) const
    {
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
 
#endif
        size_t cell_id = ConvertToID(pos,0);
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
            if (pos.get(s) < cellListSpaceBox.getLow(s) - off[s]*unitCellSpaceBox.getP2()[s] || pos.get(s) > cellListSpaceBox.getHigh(s) + off[s]*unitCellSpaceBox.getP2()[s])
            {
                return -1;
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point " << pos.toPointString() << " is not inside the cell space";
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            /* coverity[dead_error_line] */
            cell_id += gr_cell2.size_s(s-1) * ConvertToID(pos,s);
        }
 
        return cell_id;
    }
 
    template<typename Mem> inline int getCell(const encapc<1,Point<dim,T>,Mem> & pos) const
    {
 
#ifdef SE_CLASS1
        if (cellTotalCount == 0)
        {
            std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " using an uninitialized CellDecomposer";
            ACTION_ON_ERROR(CELL_DECOMPOSER);
        }
 
#endif
 
        size_t cell_id = ConvertToID_(pos,0);
 
        for (size_t s = 1 ; s < dim ; s++)
        {
#ifdef SE_CLASS1
 
            if (pos.template get<0>()[s] < cellListSpaceBox.getLow(s) - off[s]*unitCellSpaceBox.getP2()[s] || pos.template get<0>()[s] > cellListSpaceBox.getHigh(s) + off[s]*unitCellSpaceBox.getP2()[s])
            {
                return -1;
                std::cerr << "Error: " << __FILE__ << ":" << __LINE__ << " point " << toPointString(pos) << " is not inside the cell space";
                ACTION_ON_ERROR(CELL_DECOMPOSER);
            }
#endif
            cell_id += gr_cell2.size_s(s-1) * ConvertToID_(pos,s);
        }
 
        return cell_id;
    }
 
    inline Box<dim,size_t> getGridPoints(const Box<dim,T> & s_box) const
    {
        // Box with inside grid
        Box<dim,size_t> bx;
 
        // Point p2
        Point<dim,T> p2 = s_box.getP2();
        p2 = p2 - p_middle;
 
        // Point p1
        Point<dim,T> p1 = s_box.getP1();
        p1 = p1 + p_middle;
 
        bx.setP2(getCellGrid(p2));
        bx.setP1(getCellGrid(p1));
 
        return bx;
    }
 
    inline void setDimensions(const Box<dim,T> & box, const size_t (&div)[dim], const size_t (&div2)[dim], const size_t pad, Point<dim,long int> cellShift)
    {
        Matrix<dim,T> mat;
        mat.identity();
        pointTransform.setTransform(mat,box.getP1());
        this->cellListSpaceBox = box;
 
        Initialize(pad,div);
 
        size_t cells[dim];
 
        for (size_t i = 0 ; i < dim ; i++)
            cells[i] = div2[i] + 2*pad;
 
        gr_cell2.setDimensions(cells);
 
        for (size_t i = 0 ; i < dim ; i++)
            this->cellShift.get(i) = cellShift.get(i) - off[i];
    }
 
    inline void setDimensions(const Box<dim,T> & box, const size_t (&div)[dim], const size_t pad)
    {
        Matrix<dim,T> mat;
        mat.identity();
        pointTransform.setTransform(mat,box.getP1());
        this->cellListSpaceBox = box;
        Initialize(pad,div);
        this->cellShift = 0;
    }
 
    inline void setDimensions(const Box<dim,T> & box, const size_t (&div)[dim], const size_t (&div2)[dim], const Matrix<dim,T> & mat, const size_t pad, Point<dim,long int> cellShift)
    {
        pointTransform.setTransform(mat,box.getP1());
        this->cellListSpaceBox = box;
 
        Initialize(pad,div);
 
        // The nested cell is big div2 + 2*off
 
        size_t div_with_off[dim];
 
        for(size_t i = 0 ; i < dim ; i++)
            div_with_off[i] = div2[i] + 2*off[i];
 
        gr_cell2.setDimensions(div_with_off);
 
        for (size_t i = 0 ; i < dim ; i++)
            this->cellShift.get(i) = cellShift.get(i) - off[i];
    }
 
    inline void setDimensions(const Box<dim,T> & box, const size_t (&div)[dim], const Matrix<dim,T> & mat, const size_t pad)
    {
        pointTransform.setTransform(mat,box.getP1());
        this->cellListSpaceBox = box;
        Initialize(pad,div);
        this->cellShift = 0;
    }
 
 
    inline void setDimensions(const CellDecomposer_sm<dim,T,transform_type> & cd, const Box<dim,size_t> & cell_extension)
    {
        this->cellShift = 0;
 
        // Get the space transformation
 
        pointTransform.setTransform(cd.getMat(),cd.getOrig());
 
        // The domain is equivalent to the old one
        this->cellListSpaceBox = cd.cellListSpaceBox;
 
        // The padding must be calculated
 
        size_t pad = 0;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            if (pad < cell_extension.getLow(i))
                pad = cell_extension.getLow(i);
            else if (pad > cell_extension.getHigh(i))
                pad = cell_extension.getHigh(i);
        }
 
        // We have to give the old division
 
        size_t sz_div[dim];
 
        for (size_t i = 0 ; i < dim ; i++)
            sz_div[i] = cd.cellListGrid.size(i) - 2*cd.off[i];
 
        Initialize(pad,sz_div);
    }
 
    CellDecomposer_sm(const Box<dim,T> & box, const size_t (&div)[dim], Matrix<dim,T> & mat, const size_t pad)
    :pointTransform(Matrix<dim,T>::identity(),box.getP1()),cellListSpaceBox(box),cellListGrid()
    {
        Initialize(pad,div);
    }
 
    CellDecomposer_sm(const Box<dim,T> & box, const size_t (&div)[dim], const size_t pad)
    :pointTransform(Matrix<dim,T>::identity(),box.getP1()),cellListSpaceBox(box),cellListGrid(div)
    {
        Initialize(pad,div);
    }
 
    CellDecomposer_sm(const CellDecomposer_sm<dim,T,transform_type> & cd, Box<dim,size_t> & ext)
    :pointTransform(Matrix<dim,T>::identity(),cd.getOrig())
    {
        setDimensions(cd,ext);
    }
 
 
    CellDecomposer_sm()
    :pointTransform(Matrix<dim,T>::identity(),Point<dim,T>::zero_p()),cellTotalCount(0)
    {
 
    }
 
    inline const Box<dim,T> & getCellBox() const
    {
        return unitCellSpaceBox;
    }
 
    inline const Matrix<dim,T> & getMat() const
    {
        return pointTransform.getMat();
    }
 
    inline const Point<dim,T> & getOrig() const
    {
        return pointTransform.getOrig();
    }
 
    inline Box<dim,long int> convertDomainSpaceIntoCellUnits(const Box<dim,T> & b_d, const size_t (& bc)[dim]) const
    {
        Box<dim,long int> g_box;
        Box<dim,T> b = b_d;
        b -= getOrig();
 
        // Convert b into grid units
        b /= getCellBox().getP2();
 
        // Considering that we are interested in a box decomposition of the space
        // where each box does not intersect any other boxes in the decomposition we include the negative
        // countour and exclude the positive one. So ceilP1 do the job for P1 while ceilP2 - 1
        // do the job for P2
 
        b.floorP1();
        b.ceilP2();
 
        g_box = b;
 
        // Translate the box by the offset
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            g_box.setLow(i,g_box.getLow(i) + off[i]);
            g_box.setHigh(i,g_box.getHigh(i) + off[i]);
        }
 
        // on the other hand with non periodic boundary condition, the positive border of the
        // sub-domain at the edge of the domain must be included
 
        Point<dim,size_t> p_move;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            // we are at the positive border (We are assuming that there are not rounding error in the decomposition)
            if (b_d.getHigh(i) == cellListSpaceBox.getHigh(i))
            {
                if (bc[i] == NON_PERIODIC)
                {
                    // Here the positive boundary is included
                    g_box.setHigh(i,cellListGrid.size(i) - off[i]);
                }
                else
                {
                    // Carefull in periodic cellListGrid is one bigger than the non-periodic
                    // and the positive boundary is excluded
                    g_box.setHigh(i,cellListGrid.size(i)-1 - off[i]);
                }
            }
 
 
            if (b_d.getLow(i) == cellListSpaceBox.getHigh(i))
            {
                if (bc[i] == NON_PERIODIC)
                {
                    // The instruction is the same but the meaning is different
                    // for this reason there is anyway a branch
                    // Here the border is not included
                    g_box.setLow(i,cellListGrid.size(i) - off[i]);
                }
                else
                {
                    // Carefull in periodic cellListGrid is one bigger than the non-periodic
                    // Here the border is included
                    g_box.setLow(i,cellListGrid.size(i) - off[i]);
                }
            }
 
 
            // we are at the positive border (We are assuming that there are not rounding error in the decomposition)
            /* coverity[copy_paste_error] */
            if (b_d.getHigh(i) == cellListSpaceBox.getLow(i))
                    g_box.setHigh(i,off[i]);
 
 
            if (b_d.getLow(i) == cellListSpaceBox.getLow(i))
                g_box.setLow(i,off[i]);
        }
 
        return g_box;
    }
 
 
    inline Box<dim,long int> convertDomainSpaceIntoGridUnits(const Box<dim,T> & b_d, const size_t (& bc)[dim]) const
    {
        Box<dim,long int> g_box;
        Box<dim,T> b = b_d;
        b -= getOrig();
 
        // Convert b into grid units
        b /= getCellBox().getP2();
 
        // Considering that we are interested in a box decomposition of the space
        // where each box does not intersect any other boxes in the decomposition we include the negative
        // countour and exclude the positive one. So ceilP1 do the job for P1 while ceilP2 - 1
        // do the job for P2
 
        b.ceilP1();
 
        // (we do -1 later)
        b.ceilP2();
        for (size_t i = 0 ; i < dim ; i++)  {b.setHigh(i,b.getHigh(i)-1);}
 
        g_box = b;
 
        // on the other hand with non periodic boundary condition, the positive border of the
        // sub-domain at the edge of the domain must be included
 
        Point<dim,size_t> p_move;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            // we are at the positive border (We are assuming that there are not rounding error in the decomposition)
            if (b_d.getHigh(i) == cellListSpaceBox.getHigh(i))
            {
                if (bc[i] == NON_PERIODIC)
                {
                    // Here the positive boundary is included
                    g_box.setHigh(i,cellListGrid.size(i) - off[i]);
                }
                else
                {
                    // Carefull in periodic cellListGrid is one bigger than the non-periodic
                    // and the positive boundary is excluded
                    g_box.setHigh(i,cellListGrid.size(i)-1 - off[i]);
                }
            }
 
 
            if (b_d.getLow(i) == cellListSpaceBox.getHigh(i))
            {
                if (bc[i] == NON_PERIODIC)
                {
                    // The instruction is the same but the meaning is different
                    // for this reason there is anyway a branch
                    // Here the border is not included
                    g_box.setLow(i,cellListGrid.size(i) - off[i]);
                }
                else
                {
                    // Carefull in periodic cellListGrid is one bigger than the non-periodic
                    // Here the border is included
                    g_box.setLow(i,cellListGrid.size(i) - off[i]);
                }
            }
 
 
            // we are at the positive border (We are assuming that there are not rounding error in the decomposition)
            /* coverity[copy_paste_error] */
            if (b_d.getHigh(i) == cellListSpaceBox.getLow(i))
                    g_box.setHigh(i,off[i]);
 
 
            if (b_d.getLow(i) == cellListSpaceBox.getLow(i))
                g_box.setLow(i,off[i]);
        }
 
        return g_box;
    }
 
 
    inline Box<dim,T> convertCellUnitsIntoDomainSpace(const Box<dim,long int> & b_d) const
    {
        Box<dim,T> be;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            if ((long int)cellListGrid.size(i) - (long int)off[i] == b_d.getLow(i))
                be.setLow(i,cellListSpaceBox.getHigh(i));
            else if ((long int)off[i] == b_d.getLow(i))
                be.setLow(i,cellListSpaceBox.getLow(i));
            else
                be.setLow(i,(b_d.getLow(i) - off[i]) * unitCellSpaceBox.getP2()[i] + cellListSpaceBox.getLow(i));
 
            if ((long int)cellListGrid.size(i) - (long int)off[i] == b_d.getHigh(i))
                be.setHigh(i,cellListSpaceBox.getHigh(i));
            else if ((long int)off[i] == b_d.getHigh(i))
                be.setHigh(i,cellListSpaceBox.getLow(i));
            else
                be.setHigh(i,(b_d.getHigh(i) - off[i]) * unitCellSpaceBox.getP2()[i] + cellListSpaceBox.getLow(i));
        }
 
        return be;
    }
 
 
    inline Box<dim,T> convertCellUnitsIntoDomainSpaceMiddle(const Box<dim,long int> & b_d) const
    {
        Box<dim,T> be;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            if ((long int)cellListGrid.size(i) - (long int)off[i] == b_d.getLow(i))
            {be.setLow(i,cellListSpaceBox.getHigh(i));}
            else if ((long int)off[i] == b_d.getLow(i))
            {be.setLow(i,cellListSpaceBox.getLow(i));}
            else
            {be.setLow(i,(b_d.getLow(i) - off[i]) * unitCellSpaceBox.getP2()[i] + cellListSpaceBox.getLow(i) - unitCellSpaceBox.getP2()[i] / 2.0);}
 
            if ((long int)cellListGrid.size(i) - (long int)off[i] == b_d.getHigh(i))
            {be.setHigh(i,cellListSpaceBox.getHigh(i));}
            else if ((long int)off[i] == b_d.getHigh(i))
            {be.setHigh(i,cellListSpaceBox.getLow(i));}
            else
            {be.setHigh(i,(b_d.getHigh(i) - off[i]) * unitCellSpaceBox.getP2()[i] + cellListSpaceBox.getLow(i) + unitCellSpaceBox.getP2()[i] / 2.0);}
        }
 
        return be;
    }
 
    const size_t (& getDiv() const)[dim]
    {
        return cellListGrid.getSize();
    }
 
 
    const size_t (& getDivWP() const)[dim]
    {
        for (size_t i = 0 ; i < dim ; i++)
        {div_wp[i] = cellListGrid.getSize()[i] - 2*getPadding(i);}
 
        return div_wp;
    }
 
    const Box<dim,T> & getDomain() const
    {
        return cellListSpaceBox;
    }
 
    inline void swap(CellDecomposer_sm<dim,T,transform_type> & cd)
    {
        // swap all the members
        p_middle.swap(cd.p_middle);
 
        // Point transformation before get the Cell object (useful for example to shift the cell list)
        transform_type t_t = pointTransform;
        pointTransform = cd.pointTransform;
        cd.pointTransform = t_t;
 
        // Total number of cell
        size_t cellTotalCount_t = cellTotalCount;
        cellTotalCount = cd.cellTotalCount;
        cd.cellTotalCount = cellTotalCount_t;
 
        cellListSpaceBox.swap(cd.cellListSpaceBox);
        unitCellSpaceBox.swap(cd.unitCellSpaceBox);
        cellListGrid.swap(cd.cellListGrid);
        gr_cell2.swap(cd.gr_cell2);
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            size_t off_t = off[i];
            off[i] = cd.off[i];
            cd.off[i] = off_t;
 
            size_t cs_t = cellShift.get(i);
            cellShift.get(i) = cd.cellShift.get(i);
            cd.cellShift.get(i) = cs_t;
        }
    }
 
    inline bool operator==(const CellDecomposer_sm<dim,T,transform_type> & cd)
    {
        if (meta_compare<Point<dim,T>>::meta_compare_f(p_middle,cd.p_middle) == false)
            return false;
 
        if (pointTransform != cd.pointTransform)
            return false;
 
        if (cellTotalCount != cd.cellTotalCount)
            return false;
 
        if (cellListSpaceBox != cd.cellListSpaceBox)
            return false;
 
        if (unitCellSpaceBox != cd.unitCellSpaceBox)
            return false;
 
        if (cellListGrid != cd.cellListGrid)
            return false;
 
        if (gr_cell2 != cd.gr_cell2)
            return false;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            if (off[i] != cd.off[i])
                return false;
 
            if (cellShift.get(i) != cd.cellShift.get(i))
                return false;
        }
 
        return true;
    }
 
    inline bool operator!=(const CellDecomposer_sm<dim,T,transform_type> & cd)
    {
        return ! this->operator==(cd);
    }
 
    size_t getPadding(size_t i) const
    {
        return off[i];
    }
 
    size_t (& getPadding())[dim]
    {
        return off;
    }
 
    grid_key_dx<dim> getStartDomainCell() const
    {
        grid_key_dx<dim> key;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            key.set_d(i, cellShift.get(i));
        }
 
        return key;
    }
 
    grid_key_dx<dim> getStopDomainCell() const
    {
        grid_key_dx<dim> key;
 
        for (size_t i = 0 ; i < dim ; i++)
        {
            key.set_d(i,cellShift.get(i) + gr_cell2.size(i) - 2*getPadding(i) - 1);
        }
 
        return key;
    }
 
    grid_key_dx<dim> getShift() const
    {
        grid_key_dx<dim> k;
 
        for (size_t i = 0 ; i < dim ; i++)
            k.set_d(i,cellShift.get(i));
 
        return k;
    }
 
    const grid_sm<dim,void> & getInternalGrid() const
    {
        return gr_cell2;
    }
};
 
 
#endif /* CELLDECOMPOSER_HPP_ */