src/INTERP_KERNEL/PointLocator3DIntersectorP1P0.txx

   1 // Copyright (C) 2007-2015  CEA/DEN, EDF R&D
   2 //
   3 // This library is free software; you can redistribute it and/or
   4 // modify it under the terms of the GNU Lesser General Public
   5 // License as published by the Free Software Foundation; either
   6 // version 2.1 of the License, or (at your option) any later version.
   7 //
   8 // This library is distributed in the hope that it will be useful,
   9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11 // Lesser General Public License for more details.
  12 //
  13 // You should have received a copy of the GNU Lesser General Public
  14 // License along with this library; if not, write to the Free Software
  15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  16 //
  17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
  18 //
  19 // Author : Anthony Geay (CEA/DEN)
  20 #ifndef __POINTLOCATOR3DINTERSECTORP1P0_TXX__
  21 #define __POINTLOCATOR3DINTERSECTORP1P0_TXX__
  22
  23 #include "PointLocator3DIntersectorP1P0.hxx"
  24 #include "Intersector3DP1P0.txx"
  25 #include "MeshUtils.hxx"
  26
  27 namespace INTERP_KERNEL
  28 {
  29   /**
  30    * @param targetMesh  mesh containing the target elements
  31    * @param srcMesh     mesh containing the source elements
  32    * @param policy      splitting policy to be used
  33    *
  34    * WARNING : in _split attribute, sourceMesh and targetMesh are switched in order to fit intersectCells feature.
  35    */
  36   template<class MyMeshType, class MyMatrix>
  37   PointLocator3DIntersectorP1P0<MyMeshType,MyMatrix>::PointLocator3DIntersectorP1P0(const MyMeshType& targetMesh, const MyMeshType& srcMesh, double precision):Intersector3DP1P0<MyMeshType,MyMatrix>(targetMesh,srcMesh),_precision(precision)
  38   {
  39   }
  40
  41   template<class MyMeshType, class MyMatrix>
  42   PointLocator3DIntersectorP1P0<MyMeshType,MyMatrix>::~PointLocator3DIntersectorP1P0()
  43   {
  44   }
  45
  46   /**
  47    * @param targetCell in C mode.
  48    * @param srcCells in C mode.
  49    *
  50    * WARNING : for all methods on _split object source and target are switched !
  51    */
  52   template<class MyMeshType, class MyMatrix>
  53   void PointLocator3DIntersectorP1P0<MyMeshType,MyMatrix>::intersectCells(ConnType targetCell, const std::vector<ConnType>& srcCells, MyMatrix& res)
  54   {
  55     std::vector<double> CoordsT;
  56     typename MyMatrix::value_type& resRow=res[targetCell];
  57     const double *coordsS=Intersector3DP1P0<MyMeshType,MyMatrix>::_src_mesh.getCoordinatesPtr();
  58     Intersector3DP1P0<MyMeshType,MyMatrix>::getRealTargetCoordinates(OTT<ConnType,numPol>::indFC(targetCell),CoordsT);
  59     double baryT[SPACEDIM];
  60     calculateBarycenterDyn2<SPACEDIM>(&CoordsT[0],CoordsT.size()/SPACEDIM,baryT);
  61     for(typename std::vector<ConnType>::const_iterator iterCellS=srcCells.begin();iterCellS!=srcCells.end();iterCellS++)
  62       {
  63         NormalizedCellType tS=Intersector3DP1P0<MyMeshType,MyMatrix>::_src_mesh.getTypeOfElement(OTT<ConnType,numPol>::indFC(*iterCellS));
  64         if(tS!=NORM_TETRA4)
  65           throw INTERP_KERNEL::Exception("Invalid source cell detected for meshdim==3. Only TETRA4 supported !");
  66         const CellModel& cmTypeS=CellModel::GetCellModel(tS);
  67         std::vector<ConnType> connOfCurCellS;
  68         Intersector3DP1P0<MyMeshType,MyMatrix>::getConnOfSourceCell(OTT<ConnType,numPol>::indFC(*iterCellS),connOfCurCellS);
  69         if( PointLocatorAlgos<MyMeshType>::isElementContainsPointAlg3D(baryT,&connOfCurCellS[0],connOfCurCellS.size(),coordsS,cmTypeS,_precision) )
  70           {
  71             double resLoc[4];
  72             std::vector<double> srcCell;
  73             Intersector3DP1P0<MyMeshType,MyMatrix>::getRealSourceCoordinates(OTT<ConnType,numPol>::indFC(*iterCellS),srcCell);
  74             std::vector<const double*> eap(4);
  75             eap[0]=&srcCell[0]; eap[1]=&srcCell[3]; eap[2]=&srcCell[6]; eap[3]=&srcCell[9];
  76             barycentric_coords(eap,baryT,resLoc);
  77             const ConnType *startOfCellNodeConn=Intersector3DP1P0<MyMeshType,MyMatrix>::getStartConnOfSourceCell(*iterCellS);
  78             for(int nodeIdS=0;nodeIdS<4;nodeIdS++)
  79               {
  80                 if(fabs(resLoc[nodeIdS])>_precision)
  81                   {
  82                     ConnType curNodeSInCmode=OTT<ConnType,numPol>::coo2C(startOfCellNodeConn[nodeIdS]);
  83                     typename MyMatrix::value_type::const_iterator iterRes=resRow.find(OTT<ConnType,numPol>::indFC(curNodeSInCmode));
  84                     if(iterRes==resRow.end())
  85                       resRow.insert(std::make_pair(OTT<ConnType,numPol>::indFC(curNodeSInCmode),resLoc[nodeIdS]));
  86                     else
  87                       {
  88                         double val=(*iterRes).second+resLoc[nodeIdS];
  89                         resRow.erase(OTT<ConnType,numPol>::indFC(curNodeSInCmode));
  90                         resRow.insert(std::make_pair(OTT<ConnType,numPol>::indFC(curNodeSInCmode),val));
  91                       }
  92                   }
  93               }
  94           }
  95       }
  96   }
  97 }
  98
  99 #endif