Salome HOME
orientCorreclty2DCells() -> bug fix: quadratic cell orientation not well handled.
[tools/medcoupling.git] / src / MEDCoupling / MEDCouplingUMesh.cxx
1 // Copyright (C) 2007-2016  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 (EDF R&D)
20
21 #include "MEDCouplingUMesh.txx"
22 #include "MEDCouplingCMesh.hxx"
23 #include "MEDCoupling1GTUMesh.hxx"
24 #include "MEDCouplingFieldDouble.hxx"
25 #include "MEDCouplingSkyLineArray.hxx"
26 #include "CellModel.hxx"
27 #include "VolSurfUser.txx"
28 #include "InterpolationUtils.hxx"
29 #include "PointLocatorAlgos.txx"
30 #include "BBTree.txx"
31 #include "BBTreeDst.txx"
32 #include "SplitterTetra.hxx"
33 #include "DiameterCalculator.hxx"
34 #include "DirectedBoundingBox.hxx"
35 #include "InterpKernelMatrixTools.hxx"
36 #include "InterpKernelMeshQuality.hxx"
37 #include "InterpKernelCellSimplify.hxx"
38 #include "InterpKernelGeo2DEdgeArcCircle.hxx"
39 #include "InterpKernelAutoPtr.hxx"
40 #include "InterpKernelGeo2DNode.hxx"
41 #include "InterpKernelGeo2DEdgeLin.hxx"
42 #include "InterpKernelGeo2DEdgeArcCircle.hxx"
43 #include "InterpKernelGeo2DQuadraticPolygon.hxx"
44 #include "OrientationInverter.hxx"
45 #include "MEDCouplingUMesh_internal.hxx"
46
47 #include <sstream>
48 #include <fstream>
49 #include <numeric>
50 #include <cstring>
51 #include <limits>
52 #include <list>
53
54 using namespace MEDCoupling;
55
56 double MEDCouplingUMesh::EPS_FOR_POLYH_ORIENTATION=1.e-14;
57
58 /// @cond INTERNAL
59 const INTERP_KERNEL::NormalizedCellType MEDCouplingUMesh::MEDMEM_ORDER[N_MEDMEM_ORDER] = { INTERP_KERNEL::NORM_POINT1, INTERP_KERNEL::NORM_SEG2, INTERP_KERNEL::NORM_SEG3, INTERP_KERNEL::NORM_SEG4, INTERP_KERNEL::NORM_POLYL, INTERP_KERNEL::NORM_TRI3, INTERP_KERNEL::NORM_QUAD4, INTERP_KERNEL::NORM_TRI6, INTERP_KERNEL::NORM_TRI7, INTERP_KERNEL::NORM_QUAD8, INTERP_KERNEL::NORM_QUAD9, INTERP_KERNEL::NORM_POLYGON, INTERP_KERNEL::NORM_QPOLYG, INTERP_KERNEL::NORM_TETRA4, INTERP_KERNEL::NORM_PYRA5, INTERP_KERNEL::NORM_PENTA6, INTERP_KERNEL::NORM_HEXA8, INTERP_KERNEL::NORM_HEXGP12, INTERP_KERNEL::NORM_TETRA10, INTERP_KERNEL::NORM_PYRA13, INTERP_KERNEL::NORM_PENTA15, INTERP_KERNEL::NORM_PENTA18, INTERP_KERNEL::NORM_HEXA20, INTERP_KERNEL::NORM_HEXA27, INTERP_KERNEL::NORM_POLYHED };
60 const int MEDCouplingUMesh::MEDCOUPLING2VTKTYPETRADUCER[INTERP_KERNEL::NORM_MAXTYPE+1]={1,3,21,5,9,7,22,34,23,28,-1,-1,-1,-1,10,14,13,-1,12,-1,24,-1,16,27,-1,26,-1,29,32,-1,25,42,36,4};
61 /// @endcond
62
63 MEDCouplingUMesh *MEDCouplingUMesh::New()
64 {
65   return new MEDCouplingUMesh;
66 }
67
68 MEDCouplingUMesh *MEDCouplingUMesh::New(const std::string& meshName, int meshDim)
69 {
70   MEDCouplingUMesh *ret=new MEDCouplingUMesh;
71   ret->setName(meshName);
72   ret->setMeshDimension(meshDim);
73   return ret;
74 }
75
76 /*!
77  * Returns a new MEDCouplingUMesh which is a full copy of \a this one. No data is shared
78  * between \a this and the new mesh.
79  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingMesh. The caller is to
80  *          delete this mesh using decrRef() as it is no more needed.
81  */
82 MEDCouplingUMesh *MEDCouplingUMesh::deepCopy() const
83 {
84   return clone(true);
85 }
86
87
88 /*!
89  * Returns a new MEDCouplingUMesh which is a copy of \a this one.
90  *  \param [in] recDeepCpy - if \a true, the copy is deep, else all data arrays of \a
91  * this mesh are shared by the new mesh.
92  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingMesh. The caller is to
93  *          delete this mesh using decrRef() as it is no more needed.
94  */
95 MEDCouplingUMesh *MEDCouplingUMesh::clone(bool recDeepCpy) const
96 {
97   return new MEDCouplingUMesh(*this,recDeepCpy);
98 }
99
100 /*!
101  * This method behaves mostly like MEDCouplingUMesh::deepCopy method, except that only nodal connectivity arrays are deeply copied.
102  * The coordinates are shared between \a this and the returned instance.
103  *
104  * \return MEDCouplingUMesh * - A new object instance holding the copy of \a this (deep for connectivity, shallow for coordiantes)
105  * \sa MEDCouplingUMesh::deepCopy
106  */
107 MEDCouplingUMesh *MEDCouplingUMesh::deepCopyConnectivityOnly() const
108 {
109   checkConnectivityFullyDefined();
110   MCAuto<MEDCouplingUMesh> ret=clone(false);
111   MCAuto<DataArrayInt> c(getNodalConnectivity()->deepCopy()),ci(getNodalConnectivityIndex()->deepCopy());
112   ret->setConnectivity(c,ci);
113   return ret.retn();
114 }
115
116 void MEDCouplingUMesh::shallowCopyConnectivityFrom(const MEDCouplingPointSet *other)
117 {
118   if(!other)
119     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::shallowCopyConnectivityFrom : input pointer is null !");
120   const MEDCouplingUMesh *otherC=dynamic_cast<const MEDCouplingUMesh *>(other);
121   if(!otherC)
122     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::shallowCopyConnectivityFrom : input pointer is not an MEDCouplingUMesh instance !");
123   MEDCouplingUMesh *otherC2=const_cast<MEDCouplingUMesh *>(otherC);//sorry :(
124   setConnectivity(otherC2->getNodalConnectivity(),otherC2->getNodalConnectivityIndex(),true);
125 }
126
127 std::size_t MEDCouplingUMesh::getHeapMemorySizeWithoutChildren() const
128 {
129   std::size_t ret(MEDCouplingPointSet::getHeapMemorySizeWithoutChildren());
130   return ret;
131 }
132
133 std::vector<const BigMemoryObject *> MEDCouplingUMesh::getDirectChildrenWithNull() const
134 {
135   std::vector<const BigMemoryObject *> ret(MEDCouplingPointSet::getDirectChildrenWithNull());
136   ret.push_back(_nodal_connec);
137   ret.push_back(_nodal_connec_index);
138   return ret;
139 }
140
141 void MEDCouplingUMesh::updateTime() const
142 {
143   MEDCouplingPointSet::updateTime();
144   if(_nodal_connec)
145     {
146       updateTimeWith(*_nodal_connec);
147     }
148   if(_nodal_connec_index)
149     {
150       updateTimeWith(*_nodal_connec_index);
151     }
152 }
153
154 MEDCouplingUMesh::MEDCouplingUMesh():_mesh_dim(-2),_nodal_connec(0),_nodal_connec_index(0)
155 {
156 }
157
158 /*!
159  * Checks if \a this mesh is well defined. If no exception is thrown by this method,
160  * then \a this mesh is most probably is writable, exchangeable and available for most
161  * of algorithms. When a mesh is constructed from scratch, it is a good habit to call
162  * this method to check that all is in order with \a this mesh.
163  *  \throw If the mesh dimension is not set.
164  *  \throw If the coordinates array is not set (if mesh dimension != -1 ).
165  *  \throw If \a this mesh contains elements of dimension different from the mesh dimension.
166  *  \throw If the connectivity data array has more than one component.
167  *  \throw If the connectivity data array has a named component.
168  *  \throw If the connectivity index data array has more than one component.
169  *  \throw If the connectivity index data array has a named component.
170  */
171 void MEDCouplingUMesh::checkConsistencyLight() const
172 {
173   if(_mesh_dim<-1)
174     throw INTERP_KERNEL::Exception("No mesh dimension specified !");
175   if(_mesh_dim!=-1)
176     MEDCouplingPointSet::checkConsistencyLight();
177   for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator iter=_types.begin();iter!=_types.end();iter++)
178     {
179       if((int)INTERP_KERNEL::CellModel::GetCellModel(*iter).getDimension()!=_mesh_dim)
180         {
181           std::ostringstream message;
182           message << "Mesh invalid because dimension is " << _mesh_dim << " and there is presence of cell(s) with type " << (*iter);
183           throw INTERP_KERNEL::Exception(message.str().c_str());
184         }
185     }
186   if(_nodal_connec)
187     {
188       if(_nodal_connec->getNumberOfComponents()!=1)
189         throw INTERP_KERNEL::Exception("Nodal connectivity array is expected to be with number of components set to one !");
190       if(_nodal_connec->getInfoOnComponent(0)!="")
191         throw INTERP_KERNEL::Exception("Nodal connectivity array is expected to have no info on its single component !");
192     }
193   else
194     if(_mesh_dim!=-1)
195       throw INTERP_KERNEL::Exception("Nodal connectivity array is not defined !");
196   if(_nodal_connec_index)
197     {
198       if(_nodal_connec_index->getNumberOfComponents()!=1)
199         throw INTERP_KERNEL::Exception("Nodal connectivity index array is expected to be with number of components set to one !");
200       if(_nodal_connec_index->getInfoOnComponent(0)!="")
201         throw INTERP_KERNEL::Exception("Nodal connectivity index array is expected to have no info on its single component !");
202     }
203   else
204     if(_mesh_dim!=-1)
205       throw INTERP_KERNEL::Exception("Nodal connectivity index array is not defined !");
206 }
207
208 /*!
209  * Checks if \a this mesh is well defined. If no exception is thrown by this method,
210  * then \a this mesh is most probably is writable, exchangeable and available for all
211  * algorithms. <br> In addition to the checks performed by checkConsistencyLight(), this
212  * method thoroughly checks the nodal connectivity.
213  *  \param [in] eps - a not used parameter.
214  *  \throw If the mesh dimension is not set.
215  *  \throw If the coordinates array is not set (if mesh dimension != -1 ).
216  *  \throw If \a this mesh contains elements of dimension different from the mesh dimension.
217  *  \throw If the connectivity data array has more than one component.
218  *  \throw If the connectivity data array has a named component.
219  *  \throw If the connectivity index data array has more than one component.
220  *  \throw If the connectivity index data array has a named component.
221  *  \throw If number of nodes defining an element does not correspond to the type of element.
222  *  \throw If the nodal connectivity includes an invalid node id.
223  */
224 void MEDCouplingUMesh::checkConsistency(double eps) const
225 {
226   checkConsistencyLight();
227   if(_mesh_dim==-1)
228     return ;
229   int meshDim=getMeshDimension();
230   int nbOfNodes=getNumberOfNodes();
231   int nbOfCells=getNumberOfCells();
232   const int *ptr=_nodal_connec->getConstPointer();
233   const int *ptrI=_nodal_connec_index->getConstPointer();
234   for(int i=0;i<nbOfCells;i++)
235     {
236       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)ptr[ptrI[i]]);
237       if((int)cm.getDimension()!=meshDim)
238         {
239           std::ostringstream oss;
240           oss << "MEDCouplingUMesh::checkConsistency : cell << #" << i<< " with type Type " << cm.getRepr() << " in 'this' whereas meshdim == " << meshDim << " !";
241           throw INTERP_KERNEL::Exception(oss.str());
242         }
243       int nbOfNodesInCell=ptrI[i+1]-ptrI[i]-1;
244       if(!cm.isDynamic())
245         if(nbOfNodesInCell!=(int)cm.getNumberOfNodes())
246           {
247             std::ostringstream oss;
248             oss << "MEDCouplingUMesh::checkConsistency : cell #" << i << " with static Type '" << cm.getRepr() << "' has " <<  cm.getNumberOfNodes();
249             oss << " nodes whereas in connectivity there is " << nbOfNodesInCell << " nodes ! Looks very bad !";
250             throw INTERP_KERNEL::Exception(oss.str());
251           }
252       if(cm.isQuadratic() && cm.isDynamic() && meshDim == 2)
253         if (nbOfNodesInCell % 2 || nbOfNodesInCell < 4)
254           {
255             std::ostringstream oss;
256             oss << "MEDCouplingUMesh::checkConsistency : cell #" << i << " with quadratic type '" << cm.getRepr() << "' has " <<  nbOfNodesInCell;
257             oss << " nodes. This should be even, and greater or equal than 4!! Looks very bad!";
258             throw INTERP_KERNEL::Exception(oss.str());
259           }
260       for(const int *w=ptr+ptrI[i]+1;w!=ptr+ptrI[i+1];w++)
261         {
262           int nodeId=*w;
263           if(nodeId>=0)
264             {
265               if(nodeId>=nbOfNodes)
266                 {
267                   std::ostringstream oss; oss << "Cell #" << i << " is built with node #" << nodeId << " whereas there are only " << nbOfNodes << " nodes in the mesh !";
268                   throw INTERP_KERNEL::Exception(oss.str());
269                 }
270             }
271           else if(nodeId<-1)
272             {
273               std::ostringstream oss; oss << "Cell #" << i << " is built with node #" << nodeId << " in connectivity ! sounds bad !";
274               throw INTERP_KERNEL::Exception(oss.str());
275             }
276           else
277             {
278               if((INTERP_KERNEL::NormalizedCellType)(ptr[ptrI[i]])!=INTERP_KERNEL::NORM_POLYHED)
279                 {
280                   std::ostringstream oss; oss << "Cell #" << i << " is built with node #-1 in connectivity ! sounds bad !";
281                   throw INTERP_KERNEL::Exception(oss.str());
282                 }
283             }
284         }
285     }
286 }
287
288 /*!
289  * Sets dimension of \a this mesh. The mesh dimension in general depends on types of
290  * elements contained in the mesh. For more info on the mesh dimension see
291  * \ref MEDCouplingUMeshPage.
292  *  \param [in] meshDim - a new mesh dimension.
293  *  \throw If \a meshDim is invalid. A valid range is <em> -1 <= meshDim <= 3</em>.
294  */
295 void MEDCouplingUMesh::setMeshDimension(int meshDim)
296 {
297   if(meshDim<-1 || meshDim>3)
298     throw INTERP_KERNEL::Exception("Invalid meshDim specified ! Must be greater or equal to -1 and lower or equal to 3 !");
299   _mesh_dim=meshDim;
300   declareAsNew();
301 }
302
303 /*!
304  * Allocates memory to store an estimation of the given number of cells.
305  * The closer the estimation to the number of cells effectively inserted, the less need the library requires
306  * to reallocate memory. If the number of cells to be inserted is not known simply assign 0 to this parameter.
307  * If a nodal connectivity previously existed before the call of this method, it will be reset.
308  *
309  *  \param [in] nbOfCells - estimation of the number of cell \a this mesh will contain.
310  *
311  *  \if ENABLE_EXAMPLES
312  *  \ref medcouplingcppexamplesUmeshStdBuild1 "Here is a C++ example".<br>
313  *  \ref medcouplingpyexamplesUmeshStdBuild1 "Here is a Python example".
314  *  \endif
315  */
316 void MEDCouplingUMesh::allocateCells(int nbOfCells)
317 {
318   if(nbOfCells<0)
319     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::allocateCells : the input number of cells should be >= 0 !");
320   if(_nodal_connec_index)
321     {
322       _nodal_connec_index->decrRef();
323     }
324   if(_nodal_connec)
325     {
326       _nodal_connec->decrRef();
327     }
328   _nodal_connec_index=DataArrayInt::New();
329   _nodal_connec_index->reserve(nbOfCells+1);
330   _nodal_connec_index->pushBackSilent(0);
331   _nodal_connec=DataArrayInt::New();
332   _nodal_connec->reserve(2*nbOfCells);
333   _types.clear();
334   declareAsNew();
335 }
336
337 /*!
338  * Appends a cell to the connectivity array. For deeper understanding what is
339  * happening see \ref MEDCouplingUMeshNodalConnectivity.
340  *  \param [in] type - type of cell to add.
341  *  \param [in] size - number of nodes constituting this cell.
342  *  \param [in] nodalConnOfCell - the connectivity of the cell to add.
343  *
344  *  \if ENABLE_EXAMPLES
345  *  \ref medcouplingcppexamplesUmeshStdBuild1 "Here is a C++ example".<br>
346  *  \ref medcouplingpyexamplesUmeshStdBuild1 "Here is a Python example".
347  *  \endif
348  */
349 void MEDCouplingUMesh::insertNextCell(INTERP_KERNEL::NormalizedCellType type, int size, const int *nodalConnOfCell)
350 {
351   const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(type);
352   if(_nodal_connec_index==0)
353     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::insertNextCell : nodal connectivity not set ! invoke allocateCells before calling insertNextCell !");
354   if((int)cm.getDimension()==_mesh_dim)
355     {
356       if(!cm.isDynamic())
357         if(size!=(int)cm.getNumberOfNodes())
358           {
359             std::ostringstream oss; oss << "MEDCouplingUMesh::insertNextCell : Trying to push a " << cm.getRepr() << " cell with a size of " << size;
360             oss << " ! Expecting " << cm.getNumberOfNodes() << " !";
361             throw INTERP_KERNEL::Exception(oss.str());
362           }
363       int idx=_nodal_connec_index->back();
364       int val=idx+size+1;
365       _nodal_connec_index->pushBackSilent(val);
366       _nodal_connec->writeOnPlace(idx,type,nodalConnOfCell,size);
367       _types.insert(type);
368     }
369   else
370     {
371       std::ostringstream oss; oss << "MEDCouplingUMesh::insertNextCell : cell type " << cm.getRepr() << " has a dimension " << cm.getDimension();
372       oss << " whereas Mesh Dimension of current UMesh instance is set to " << _mesh_dim << " ! Please invoke \"setMeshDimension\" method before or invoke ";
373       oss << "\"MEDCouplingUMesh::New\" static method with 2 parameters name and meshDimension !";
374       throw INTERP_KERNEL::Exception(oss.str());
375     }
376 }
377
378 /*!
379  * Compacts data arrays to release unused memory. This method is to be called after
380  * finishing cell insertion using \a this->insertNextCell().
381  *
382  *  \if ENABLE_EXAMPLES
383  *  \ref medcouplingcppexamplesUmeshStdBuild1 "Here is a C++ example".<br>
384  *  \ref medcouplingpyexamplesUmeshStdBuild1 "Here is a Python example".
385  *  \endif
386  */
387 void MEDCouplingUMesh::finishInsertingCells()
388 {
389   _nodal_connec->pack();
390   _nodal_connec_index->pack();
391   _nodal_connec->declareAsNew();
392   _nodal_connec_index->declareAsNew();
393   updateTime();
394 }
395
396 /*!
397  * Entry point for iteration over cells of this. Warning the returned cell iterator should be deallocated.
398  * Useful for python users.
399  */
400 MEDCouplingUMeshCellIterator *MEDCouplingUMesh::cellIterator()
401 {
402   return new MEDCouplingUMeshCellIterator(this);
403 }
404
405 /*!
406  * Entry point for iteration over cells groups geo types per geotypes. Warning the returned cell iterator should be deallocated.
407  * If \a this is not so that the cells are grouped by geo types, this method will throw an exception.
408  * In this case MEDCouplingUMesh::sortCellsInMEDFileFrmt or MEDCouplingUMesh::rearrange2ConsecutiveCellTypes methods for example can be called before invoking this method.
409  * Useful for python users.
410  */
411 MEDCouplingUMeshCellByTypeEntry *MEDCouplingUMesh::cellsByType()
412 {
413   if(!checkConsecutiveCellTypes())
414     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::cellsByType : this mesh is not sorted by type !");
415   return new MEDCouplingUMeshCellByTypeEntry(this);
416 }
417
418 /*!
419  * Returns a set of all cell types available in \a this mesh.
420  * \return std::set<INTERP_KERNEL::NormalizedCellType> - the set of cell types.
421  * \warning this method does not throw any exception even if \a this is not defined.
422  * \sa MEDCouplingUMesh::getAllGeoTypesSorted
423  */
424 std::set<INTERP_KERNEL::NormalizedCellType> MEDCouplingUMesh::getAllGeoTypes() const
425 {
426   return _types;
427 }
428
429 /*!
430  * This method returns the sorted list of geometric types in \a this.
431  * Sorted means in the same order than the cells in \a this. A single entry in return vector means the maximal chunk of consecutive cells in \a this
432  * having the same geometric type. So a same geometric type can appear more than once if the cells are not sorted per geometric type.
433  *
434  * \throw if connectivity in \a this is not correctly defined.
435  *
436  * \sa MEDCouplingMesh::getAllGeoTypes
437  */
438 std::vector<INTERP_KERNEL::NormalizedCellType> MEDCouplingUMesh::getAllGeoTypesSorted() const
439 {
440   std::vector<INTERP_KERNEL::NormalizedCellType> ret;
441   checkConnectivityFullyDefined();
442   int nbOfCells(getNumberOfCells());
443   if(nbOfCells==0)
444     return ret;
445   if(getNodalConnectivityArrayLen()<1)
446     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getAllGeoTypesSorted : the connectivity in this seems invalid !");
447   const int *c(_nodal_connec->begin()),*ci(_nodal_connec_index->begin());
448   ret.push_back((INTERP_KERNEL::NormalizedCellType)c[*ci++]);
449   for(int i=1;i<nbOfCells;i++,ci++)
450     if(ret.back()!=((INTERP_KERNEL::NormalizedCellType)c[*ci]))
451       ret.push_back((INTERP_KERNEL::NormalizedCellType)c[*ci]);
452   return ret;
453 }
454
455 /*!
456  * This method is a method that compares \a this and \a other.
457  * This method compares \b all attributes, even names and component names.
458  */
459 bool MEDCouplingUMesh::isEqualIfNotWhy(const MEDCouplingMesh *other, double prec, std::string& reason) const
460 {
461   if(!other)
462     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::isEqualIfNotWhy : input other pointer is null !");
463   std::ostringstream oss; oss.precision(15);
464   const MEDCouplingUMesh *otherC=dynamic_cast<const MEDCouplingUMesh *>(other);
465   if(!otherC)
466     {
467       reason="mesh given in input is not castable in MEDCouplingUMesh !";
468       return false;
469     }
470   if(!MEDCouplingPointSet::isEqualIfNotWhy(other,prec,reason))
471     return false;
472   if(_mesh_dim!=otherC->_mesh_dim)
473     {
474       oss << "umesh dimension mismatch : this mesh dimension=" << _mesh_dim << " other mesh dimension=" <<  otherC->_mesh_dim;
475       reason=oss.str();
476       return false;
477     }
478   if(_types!=otherC->_types)
479     {
480       oss << "umesh geometric type mismatch :\nThis geometric types are :";
481       for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator iter=_types.begin();iter!=_types.end();iter++)
482         { const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(*iter); oss << cm.getRepr() << ", "; }
483       oss << "\nOther geometric types are :";
484       for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator iter=otherC->_types.begin();iter!=otherC->_types.end();iter++)
485         { const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(*iter); oss << cm.getRepr() << ", "; }
486       reason=oss.str();
487       return false;
488     }
489   if(_nodal_connec!=0 || otherC->_nodal_connec!=0)
490     if(_nodal_connec==0 || otherC->_nodal_connec==0)
491       {
492         reason="Only one UMesh between the two this and other has its nodal connectivity DataArrayInt defined !";
493         return false;
494       }
495   if(_nodal_connec!=otherC->_nodal_connec)
496     if(!_nodal_connec->isEqualIfNotWhy(*otherC->_nodal_connec,reason))
497       {
498         reason.insert(0,"Nodal connectivity DataArrayInt differ : ");
499         return false;
500       }
501   if(_nodal_connec_index!=0 || otherC->_nodal_connec_index!=0)
502     if(_nodal_connec_index==0 || otherC->_nodal_connec_index==0)
503       {
504         reason="Only one UMesh between the two this and other has its nodal connectivity index DataArrayInt defined !";
505         return false;
506       }
507   if(_nodal_connec_index!=otherC->_nodal_connec_index)
508     if(!_nodal_connec_index->isEqualIfNotWhy(*otherC->_nodal_connec_index,reason))
509       {
510         reason.insert(0,"Nodal connectivity index DataArrayInt differ : ");
511         return false;
512       }
513   return true;
514 }
515
516 /*!
517  * Checks if data arrays of this mesh (node coordinates, nodal
518  * connectivity of cells, etc) of two meshes are same. Textual data like name etc. are
519  * not considered.
520  *  \param [in] other - the mesh to compare with.
521  *  \param [in] prec - precision value used to compare node coordinates.
522  *  \return bool - \a true if the two meshes are same.
523  */
524 bool MEDCouplingUMesh::isEqualWithoutConsideringStr(const MEDCouplingMesh *other, double prec) const
525 {
526   const MEDCouplingUMesh *otherC=dynamic_cast<const MEDCouplingUMesh *>(other);
527   if(!otherC)
528     return false;
529   if(!MEDCouplingPointSet::isEqualWithoutConsideringStr(other,prec))
530     return false;
531   if(_mesh_dim!=otherC->_mesh_dim)
532     return false;
533   if(_types!=otherC->_types)
534     return false;
535   if(_nodal_connec!=0 || otherC->_nodal_connec!=0)
536     if(_nodal_connec==0 || otherC->_nodal_connec==0)
537       return false;
538   if(_nodal_connec!=otherC->_nodal_connec)
539     if(!_nodal_connec->isEqualWithoutConsideringStr(*otherC->_nodal_connec))
540       return false;
541   if(_nodal_connec_index!=0 || otherC->_nodal_connec_index!=0)
542     if(_nodal_connec_index==0 || otherC->_nodal_connec_index==0)
543       return false;
544   if(_nodal_connec_index!=otherC->_nodal_connec_index)
545     if(!_nodal_connec_index->isEqualWithoutConsideringStr(*otherC->_nodal_connec_index))
546       return false;
547   return true;
548 }
549
550 /*!
551  * Checks if \a this and \a other meshes are geometrically equivalent with high
552  * probability, else an exception is thrown. The meshes are considered equivalent if
553  * (1) meshes contain the same number of nodes and the same number of elements of the
554  * same types (2) three cells of the two meshes (first, last and middle) are based
555  * on coincident nodes (with a specified precision).
556  *  \param [in] other - the mesh to compare with.
557  *  \param [in] prec - the precision used to compare nodes of the two meshes.
558  *  \throw If the two meshes do not match.
559  */
560 void MEDCouplingUMesh::checkFastEquivalWith(const MEDCouplingMesh *other, double prec) const
561 {
562   MEDCouplingPointSet::checkFastEquivalWith(other,prec);
563   const MEDCouplingUMesh *otherC=dynamic_cast<const MEDCouplingUMesh *>(other);
564   if(!otherC)
565     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkFastEquivalWith : Two meshes are not not unstructured !");
566 }
567
568 /*!
569  * Returns the reverse nodal connectivity. The reverse nodal connectivity enumerates
570  * cells each node belongs to.
571  * \warning For speed reasons, this method does not check if node ids in the nodal
572  *          connectivity correspond to the size of node coordinates array.
573  * \param [in,out] revNodal - an array holding ids of cells sharing each node.
574  * \param [in,out] revNodalIndx - an array, of length \a this->getNumberOfNodes() + 1,
575  *        dividing cell ids in \a revNodal into groups each referring to one
576  *        node. Its every element (except the last one) is an index pointing to the
577  *         first id of a group of cells. For example cells sharing the node #1 are
578  *        described by following range of indices:
579  *        [ \a revNodalIndx[1], \a revNodalIndx[2] ) and the cell ids are
580  *        \a revNodal[ \a revNodalIndx[1] ], \a revNodal[ \a revNodalIndx[1] + 1], ...
581  *        Number of cells sharing the *i*-th node is
582  *        \a revNodalIndx[ *i*+1 ] - \a revNodalIndx[ *i* ].
583  * \throw If the coordinates array is not set.
584  * \throw If the nodal connectivity of cells is not defined.
585  *
586  * \if ENABLE_EXAMPLES
587  * \ref cpp_mcumesh_getReverseNodalConnectivity "Here is a C++ example".<br>
588  * \ref  py_mcumesh_getReverseNodalConnectivity "Here is a Python example".
589  * \endif
590  */
591 void MEDCouplingUMesh::getReverseNodalConnectivity(DataArrayInt *revNodal, DataArrayInt *revNodalIndx) const
592 {
593   checkFullyDefined();
594   int nbOfNodes(getNumberOfNodes());
595   int *revNodalIndxPtr=(int *)malloc((nbOfNodes+1)*sizeof(int));
596   revNodalIndx->useArray(revNodalIndxPtr,true,DeallocType::C_DEALLOC,nbOfNodes+1,1);
597   std::fill(revNodalIndxPtr,revNodalIndxPtr+nbOfNodes+1,0);
598   const int *conn(_nodal_connec->begin()),*connIndex(_nodal_connec_index->begin());
599   int nbOfCells(getNumberOfCells()),nbOfEltsInRevNodal(0);
600   for(int eltId=0;eltId<nbOfCells;eltId++)
601     {
602       const int *strtNdlConnOfCurCell(conn+connIndex[eltId]+1),*endNdlConnOfCurCell(conn+connIndex[eltId+1]);
603       for(const int *iter=strtNdlConnOfCurCell;iter!=endNdlConnOfCurCell;iter++)
604         if(*iter>=0)//for polyhedrons
605           {
606             nbOfEltsInRevNodal++;
607             revNodalIndxPtr[(*iter)+1]++;
608           }
609     }
610   std::transform(revNodalIndxPtr+1,revNodalIndxPtr+nbOfNodes+1,revNodalIndxPtr,revNodalIndxPtr+1,std::plus<int>());
611   int *revNodalPtr=(int *)malloc((nbOfEltsInRevNodal)*sizeof(int));
612   revNodal->useArray(revNodalPtr,true,DeallocType::C_DEALLOC,nbOfEltsInRevNodal,1);
613   std::fill(revNodalPtr,revNodalPtr+nbOfEltsInRevNodal,-1);
614   for(int eltId=0;eltId<nbOfCells;eltId++)
615     {
616       const int *strtNdlConnOfCurCell=conn+connIndex[eltId]+1;
617       const int *endNdlConnOfCurCell=conn+connIndex[eltId+1];
618       for(const int *iter=strtNdlConnOfCurCell;iter!=endNdlConnOfCurCell;iter++)
619         if(*iter>=0)//for polyhedrons
620           *std::find_if(revNodalPtr+revNodalIndxPtr[*iter],revNodalPtr+revNodalIndxPtr[*iter+1],std::bind2nd(std::equal_to<int>(),-1))=eltId;
621     }
622 }
623
624 /*!
625  * Creates a new MEDCouplingUMesh containing cells, of dimension one less than \a
626  * this->getMeshDimension(), that bound cells of \a this mesh. In addition arrays
627  * describing correspondence between cells of \a this and the result meshes are
628  * returned. The arrays \a desc and \a descIndx (\ref numbering-indirect) describe the descending connectivity,
629  * i.e. enumerate cells of the result mesh bounding each cell of \a this mesh. The
630  * arrays \a revDesc and \a revDescIndx (\ref numbering-indirect) describe the reverse descending connectivity,
631  * i.e. enumerate cells of  \a this mesh bounded by each cell of the result mesh.
632  * \warning For speed reasons, this method does not check if node ids in the nodal
633  *          connectivity correspond to the size of node coordinates array.
634  * \warning Cells of the result mesh are \b not sorted by geometric type, hence,
635  *          to write this mesh to the MED file, its cells must be sorted using
636  *          sortCellsInMEDFileFrmt().
637  *  \param [in,out] desc - the array containing cell ids of the result mesh bounding
638  *         each cell of \a this mesh.
639  *  \param [in,out] descIndx - the array, of length \a this->getNumberOfCells() + 1,
640  *        dividing cell ids in \a desc into groups each referring to one
641  *        cell of \a this mesh. Its every element (except the last one) is an index
642  *        pointing to the first id of a group of cells. For example cells of the
643  *        result mesh bounding the cell #1 of \a this mesh are described by following
644  *        range of indices:
645  *        [ \a descIndx[1], \a descIndx[2] ) and the cell ids are
646  *        \a desc[ \a descIndx[1] ], \a desc[ \a descIndx[1] + 1], ...
647  *        Number of cells of the result mesh sharing the *i*-th cell of \a this mesh is
648  *        \a descIndx[ *i*+1 ] - \a descIndx[ *i* ].
649  *  \param [in,out] revDesc - the array containing cell ids of \a this mesh bounded
650  *         by each cell of the result mesh.
651  *  \param [in,out] revDescIndx - the array, of length one more than number of cells
652  *        in the result mesh,
653  *        dividing cell ids in \a revDesc into groups each referring to one
654  *        cell of the result mesh the same way as \a descIndx divides \a desc.
655  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingUMesh. The caller is to
656  *        delete this mesh using decrRef() as it is no more needed.
657  *  \throw If the coordinates array is not set.
658  *  \throw If the nodal connectivity of cells is node defined.
659  *  \throw If \a desc == NULL || \a descIndx == NULL || \a revDesc == NULL || \a
660  *         revDescIndx == NULL.
661  *
662  *  \if ENABLE_EXAMPLES
663  *  \ref cpp_mcumesh_buildDescendingConnectivity "Here is a C++ example".<br>
664  *  \ref  py_mcumesh_buildDescendingConnectivity "Here is a Python example".
665  *  \endif
666  * \sa buildDescendingConnectivity2()
667  */
668 MEDCouplingUMesh *MEDCouplingUMesh::buildDescendingConnectivity(DataArrayInt *desc, DataArrayInt *descIndx, DataArrayInt *revDesc, DataArrayInt *revDescIndx) const
669 {
670   return buildDescendingConnectivityGen<MinusOneSonsGenerator>(desc,descIndx,revDesc,revDescIndx,MEDCouplingFastNbrer);
671 }
672
673 /*!
674  * \a this has to have a mesh dimension equal to 3. If it is not the case an INTERP_KERNEL::Exception will be thrown.
675  * This behaves exactly as MEDCouplingUMesh::buildDescendingConnectivity does except that this method compute directly the transition from mesh dimension 3 to sub edges (dimension 1)
676  * in one shot. That is to say that this method is equivalent to 2 successive calls to MEDCouplingUMesh::buildDescendingConnectivity.
677  * This method returns 4 arrays and a mesh as MEDCouplingUMesh::buildDescendingConnectivity does.
678  * \sa MEDCouplingUMesh::buildDescendingConnectivity
679  */
680 MEDCouplingUMesh *MEDCouplingUMesh::explode3DMeshTo1D(DataArrayInt *desc, DataArrayInt *descIndx, DataArrayInt *revDesc, DataArrayInt *revDescIndx) const
681 {
682   checkFullyDefined();
683   if(getMeshDimension()!=3)
684     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::explode3DMeshTo1D : This has to have a mesh dimension to 3 !");
685   return buildDescendingConnectivityGen<MinusTwoSonsGenerator>(desc,descIndx,revDesc,revDescIndx,MEDCouplingFastNbrer);
686 }
687
688 /*!
689  * This method computes the micro edges constituting each cell in \a this. Micro edge is an edge for non quadratic cells. Micro edge is an half edge for quadratic cells.
690  * This method works for both meshes with mesh dimension equal to 2 or 3. Dynamical cells are not supported (polygons, polyhedrons...)
691  * 
692  * \sa explode3DMeshTo1D, buildDescendingConnectiviy
693  */
694 MEDCouplingUMesh *MEDCouplingUMesh::explodeMeshIntoMicroEdges(DataArrayInt *desc, DataArrayInt *descIndx, DataArrayInt *revDesc, DataArrayInt *revDescIndx) const
695 {
696    checkFullyDefined();
697    switch(getMeshDimension())
698      {
699      case 2:
700        return buildDescendingConnectivityGen<MicroEdgesGenerator2D>(desc,descIndx,revDesc,revDescIndx,MEDCouplingFastNbrer);
701      case 3:
702        return buildDescendingConnectivityGen<MicroEdgesGenerator2D>(desc,descIndx,revDesc,revDescIndx,MEDCouplingFastNbrer);
703      default:
704        throw INTERP_KERNEL::Exception("MEDCouplingUMesh::explodeMeshIntoMicroEdges : Only 2D and 3D supported !");
705      }
706 }
707
708 /*!
709  * Creates a new MEDCouplingUMesh containing cells, of dimension one less than \a
710  * this->getMeshDimension(), that bound cells of \a this mesh. In
711  * addition arrays describing correspondence between cells of \a this and the result
712  * meshes are returned. The arrays \a desc and \a descIndx (\ref numbering-indirect) describe the descending
713  * connectivity, i.e. enumerate cells of the result mesh bounding each cell of \a this
714  *  mesh. This method differs from buildDescendingConnectivity() in that apart
715  * from cell ids, \a desc returns mutual orientation of cells in \a this and the
716  * result meshes. So a positive id means that order of nodes in corresponding cells
717  * of two meshes is same, and a negative id means a reverse order of nodes. Since a
718  * cell with id #0 can't be negative, the array \a desc returns ids in FORTRAN mode,
719  * i.e. cell ids are one-based.
720  * Arrays \a revDesc and \a revDescIndx (\ref numbering-indirect) describe the reverse descending connectivity,
721  * i.e. enumerate cells of  \a this mesh bounded by each cell of the result mesh.
722  * \warning For speed reasons, this method does not check if node ids in the nodal
723  *          connectivity correspond to the size of node coordinates array.
724  * \warning Cells of the result mesh are \b not sorted by geometric type, hence,
725  *          to write this mesh to the MED file, its cells must be sorted using
726  *          sortCellsInMEDFileFrmt().
727  *  \param [in,out] desc - the array containing cell ids of the result mesh bounding
728  *         each cell of \a this mesh.
729  *  \param [in,out] descIndx - the array, of length \a this->getNumberOfCells() + 1,
730  *        dividing cell ids in \a desc into groups each referring to one
731  *        cell of \a this mesh. Its every element (except the last one) is an index
732  *        pointing to the first id of a group of cells. For example cells of the
733  *        result mesh bounding the cell #1 of \a this mesh are described by following
734  *        range of indices:
735  *        [ \a descIndx[1], \a descIndx[2] ) and the cell ids are
736  *        \a desc[ \a descIndx[1] ], \a desc[ \a descIndx[1] + 1], ...
737  *        Number of cells of the result mesh sharing the *i*-th cell of \a this mesh is
738  *        \a descIndx[ *i*+1 ] - \a descIndx[ *i* ].
739  *  \param [in,out] revDesc - the array containing cell ids of \a this mesh bounded
740  *         by each cell of the result mesh.
741  *  \param [in,out] revDescIndx - the array, of length one more than number of cells
742  *        in the result mesh,
743  *        dividing cell ids in \a revDesc into groups each referring to one
744  *        cell of the result mesh the same way as \a descIndx divides \a desc.
745  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingUMesh. This result mesh
746  *        shares the node coordinates array with \a this mesh. The caller is to
747  *        delete this mesh using decrRef() as it is no more needed.
748  *  \throw If the coordinates array is not set.
749  *  \throw If the nodal connectivity of cells is node defined.
750  *  \throw If \a desc == NULL || \a descIndx == NULL || \a revDesc == NULL || \a
751  *         revDescIndx == NULL.
752  *
753  *  \if ENABLE_EXAMPLES
754  *  \ref cpp_mcumesh_buildDescendingConnectivity2 "Here is a C++ example".<br>
755  *  \ref  py_mcumesh_buildDescendingConnectivity2 "Here is a Python example".
756  *  \endif
757  * \sa buildDescendingConnectivity()
758  */
759 MEDCouplingUMesh *MEDCouplingUMesh::buildDescendingConnectivity2(DataArrayInt *desc, DataArrayInt *descIndx, DataArrayInt *revDesc, DataArrayInt *revDescIndx) const
760 {
761   return buildDescendingConnectivityGen<MinusOneSonsGenerator>(desc,descIndx,revDesc,revDescIndx,MEDCouplingOrientationSensitiveNbrer);
762 }
763
764 /*!
765  * \b WARNING this method do the assumption that connectivity lies on the coordinates set.
766  * For speed reasons no check of this will be done. This method calls
767  * MEDCouplingUMesh::buildDescendingConnectivity to compute the result.
768  * This method lists cell by cell in \b this which are its neighbors. To compute the result
769  * only connectivities are considered.
770  * The neighbor cells of cell having id 'cellId' are neighbors[neighborsIndx[cellId]:neighborsIndx[cellId+1]].
771  * The format of return is hence \ref numbering-indirect.
772  *
773  * \param [out] neighbors is an array storing all the neighbors of all cells in \b this. This array is newly
774  * allocated and should be dealt by the caller. \b neighborsIndx 2nd output
775  * parameter allows to select the right part in this array (\ref numbering-indirect). The number of tuples
776  * is equal to the last values in \b neighborsIndx.
777  * \param [out] neighborsIndx is an array of size this->getNumberOfCells()+1 newly allocated and should be
778  * dealt by the caller. This arrays allow to use the first output parameter \b neighbors (\ref numbering-indirect).
779  */
780 void MEDCouplingUMesh::computeNeighborsOfCells(DataArrayInt *&neighbors, DataArrayInt *&neighborsIndx) const
781 {
782   MCAuto<DataArrayInt> desc=DataArrayInt::New();
783   MCAuto<DataArrayInt> descIndx=DataArrayInt::New();
784   MCAuto<DataArrayInt> revDesc=DataArrayInt::New();
785   MCAuto<DataArrayInt> revDescIndx=DataArrayInt::New();
786   MCAuto<MEDCouplingUMesh> meshDM1=buildDescendingConnectivity(desc,descIndx,revDesc,revDescIndx);
787   meshDM1=0;
788   ComputeNeighborsOfCellsAdv(desc,descIndx,revDesc,revDescIndx,neighbors,neighborsIndx);
789 }
790
791 void MEDCouplingUMesh::computeCellNeighborhoodFromNodesOne(const DataArrayInt *nodeNeigh, const DataArrayInt *nodeNeighI, MCAuto<DataArrayInt>& cellNeigh, MCAuto<DataArrayInt>& cellNeighIndex) const
792 {
793   if(!nodeNeigh || !nodeNeighI)
794     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::computeCellNeighborhoodFromNodesOne : null pointer !");
795   checkConsistencyLight();
796   nodeNeigh->checkAllocated(); nodeNeighI->checkAllocated();
797   nodeNeigh->checkNbOfComps(1,"MEDCouplingUMesh::computeCellNeighborhoodFromNodesOne : node neigh");
798   nodeNeighI->checkNbOfComps(1,"MEDCouplingUMesh::computeCellNeighborhoodFromNodesOne : node neigh index");
799   nodeNeighI->checkNbOfTuples(1+getNumberOfNodes(),"MEDCouplingUMesh::computeCellNeighborhoodFromNodesOne : invalid length");
800   int nbCells(getNumberOfCells());
801   const int *c(_nodal_connec->begin()),*ci(_nodal_connec_index->begin()),*ne(nodeNeigh->begin()),*nei(nodeNeighI->begin());
802   cellNeigh=DataArrayInt::New(); cellNeigh->alloc(0,1); cellNeighIndex=DataArrayInt::New(); cellNeighIndex->alloc(1,1); cellNeighIndex->setIJ(0,0,0);
803   for(int i=0;i<nbCells;i++)
804     {
805       std::set<int> s;
806       for(const int *it=c+ci[i]+1;it!=c+ci[i+1];it++)
807         if(*it>=0)
808           s.insert(ne+nei[*it],ne+nei[*it+1]);
809       s.erase(i);
810       cellNeigh->insertAtTheEnd(s.begin(),s.end());
811       cellNeighIndex->pushBackSilent(cellNeigh->getNumberOfTuples());
812     }
813 }
814
815 /*!
816  * This method is called by MEDCouplingUMesh::computeNeighborsOfCells. This methods performs the algorithm
817  * of MEDCouplingUMesh::computeNeighborsOfCells.
818  * This method is useful for users that want to reduce along a criterion the set of neighbours cell. This is
819  * typically the case to extract a set a neighbours,
820  * excluding a set of meshdim-1 cells in input descending connectivity.
821  * Typically \b desc, \b descIndx, \b revDesc and \b revDescIndx (\ref numbering-indirect) input params are
822  * the result of MEDCouplingUMesh::buildDescendingConnectivity.
823  * This method lists cell by cell in \b this which are its neighbors. To compute the result only connectivities
824  * are considered.
825  * The neighbor cells of cell having id 'cellId' are neighbors[neighborsIndx[cellId]:neighborsIndx[cellId+1]].
826  *
827  * \param [in] desc descending connectivity array.
828  * \param [in] descIndx descending connectivity index array used to walk through \b desc (\ref numbering-indirect).
829  * \param [in] revDesc reverse descending connectivity array.
830  * \param [in] revDescIndx reverse descending connectivity index array used to walk through \b revDesc (\ref numbering-indirect).
831  * \param [out] neighbors is an array storing all the neighbors of all cells in \b this. This array is newly allocated and should be dealt by the caller. \b neighborsIndx 2nd output
832  *                        parameter allows to select the right part in this array. The number of tuples is equal to the last values in \b neighborsIndx.
833  * \param [out] neighborsIndx is an array of size this->getNumberOfCells()+1 newly allocated and should be dealt by the caller. This arrays allow to use the first output parameter \b neighbors.
834  */
835 void MEDCouplingUMesh::ComputeNeighborsOfCellsAdv(const DataArrayInt *desc, const DataArrayInt *descIndx, const DataArrayInt *revDesc, const DataArrayInt *revDescIndx,
836                                                   DataArrayInt *&neighbors, DataArrayInt *&neighborsIndx)
837 {
838   if(!desc || !descIndx || !revDesc || !revDescIndx)
839     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ComputeNeighborsOfCellsAdv some input array is empty !");
840   const int *descPtr=desc->begin();
841   const int *descIPtr=descIndx->begin();
842   const int *revDescPtr=revDesc->begin();
843   const int *revDescIPtr=revDescIndx->begin();
844   //
845   int nbCells=descIndx->getNumberOfTuples()-1;
846   MCAuto<DataArrayInt> out0=DataArrayInt::New();
847   MCAuto<DataArrayInt> out1=DataArrayInt::New(); out1->alloc(nbCells+1,1);
848   int *out1Ptr=out1->getPointer();
849   *out1Ptr++=0;
850   out0->reserve(desc->getNumberOfTuples());
851   for(int i=0;i<nbCells;i++,descIPtr++,out1Ptr++)
852     {
853       for(const int *w1=descPtr+descIPtr[0];w1!=descPtr+descIPtr[1];w1++)
854         {
855           std::set<int> s(revDescPtr+revDescIPtr[*w1],revDescPtr+revDescIPtr[(*w1)+1]);
856           s.erase(i);
857           out0->insertAtTheEnd(s.begin(),s.end());
858         }
859       *out1Ptr=out0->getNumberOfTuples();
860     }
861   neighbors=out0.retn();
862   neighborsIndx=out1.retn();
863 }
864
865 /*!
866  * Explodes \a this into edges whatever its dimension.
867  */
868 MCAuto<MEDCouplingUMesh> MEDCouplingUMesh::explodeIntoEdges(MCAuto<DataArrayInt>& desc, MCAuto<DataArrayInt>& descIndex, MCAuto<DataArrayInt>& revDesc, MCAuto<DataArrayInt>& revDescIndx) const
869 {
870   checkFullyDefined();
871   int mdim(getMeshDimension());
872   desc=DataArrayInt::New(); descIndex=DataArrayInt::New(); revDesc=DataArrayInt::New(); revDescIndx=DataArrayInt::New();
873   MCAuto<MEDCouplingUMesh> mesh1D;
874   switch(mdim)
875   {
876     case 3:
877       {
878         mesh1D=explode3DMeshTo1D(desc,descIndex,revDesc,revDescIndx);
879         break;
880       }
881     case 2:
882       {
883         mesh1D=buildDescendingConnectivity(desc,descIndex,revDesc,revDescIndx);
884         break;
885       }
886     default:
887       {
888         throw INTERP_KERNEL::Exception("MEDCouplingUMesh::computeNeighborsOfNodes : Mesh dimension supported are [3,2] !");
889       }
890   }
891   return mesh1D;
892 }
893
894 /*!
895  * \b WARNING this method do the assumption that connectivity lies on the coordinates set.
896  * For speed reasons no check of this will be done. This method calls
897  * MEDCouplingUMesh::buildDescendingConnectivity to compute the result.
898  * This method lists node by node in \b this which are its neighbors. To compute the result
899  * only connectivities are considered.
900  * The neighbor nodes of node having id 'nodeId' are neighbors[neighborsIndx[cellId]:neighborsIndx[cellId+1]].
901  *
902  * \param [out] neighbors is an array storing all the neighbors of all nodes in \b this. This array
903  * is newly allocated and should be dealt by the caller. \b neighborsIndx 2nd output
904  * parameter allows to select the right part in this array (\ref numbering-indirect).
905  * The number of tuples is equal to the last values in \b neighborsIndx.
906  * \param [out] neighborsIdx is an array of size this->getNumberOfCells()+1 newly allocated and should
907  * be dealt by the caller. This arrays allow to use the first output parameter \b neighbors.
908  *
909  * \sa MEDCouplingUMesh::computeEnlargedNeighborsOfNodes
910  */
911 void MEDCouplingUMesh::computeNeighborsOfNodes(DataArrayInt *&neighbors, DataArrayInt *&neighborsIdx) const
912 {
913   checkFullyDefined();
914   int mdim(getMeshDimension()),nbNodes(getNumberOfNodes());
915   MCAuto<DataArrayInt> desc(DataArrayInt::New()),descIndx(DataArrayInt::New()),revDesc(DataArrayInt::New()),revDescIndx(DataArrayInt::New());
916   MCConstAuto<MEDCouplingUMesh> mesh1D;
917   switch(mdim)
918   {
919     case 3:
920       {
921         mesh1D=explode3DMeshTo1D(desc,descIndx,revDesc,revDescIndx);
922         break;
923       }
924     case 2:
925       {
926         mesh1D=buildDescendingConnectivity(desc,descIndx,revDesc,revDescIndx);
927         break;
928       }
929     case 1:
930       {
931         mesh1D.takeRef(this);
932         break;
933       }
934     default:
935       {
936         throw INTERP_KERNEL::Exception("MEDCouplingUMesh::computeNeighborsOfNodes : Mesh dimension supported are [3,2,1] !");
937       }
938   }
939   desc=DataArrayInt::New(); descIndx=DataArrayInt::New(); revDesc=0; revDescIndx=0;
940   mesh1D->getReverseNodalConnectivity(desc,descIndx);
941   MCAuto<DataArrayInt> ret0(DataArrayInt::New());
942   ret0->alloc(desc->getNumberOfTuples(),1);
943   int *r0Pt(ret0->getPointer());
944   const int *c1DPtr(mesh1D->getNodalConnectivity()->begin()),*rn(desc->begin()),*rni(descIndx->begin());
945   for(int i=0;i<nbNodes;i++,rni++)
946     {
947       for(const int *oneDCellIt=rn+rni[0];oneDCellIt!=rn+rni[1];oneDCellIt++)
948         *r0Pt++=c1DPtr[3*(*oneDCellIt)+1]==i?c1DPtr[3*(*oneDCellIt)+2]:c1DPtr[3*(*oneDCellIt)+1];
949     }
950   neighbors=ret0.retn();
951   neighborsIdx=descIndx.retn();
952 }
953
954 /*!
955  * Computes enlarged neighbors for each nodes in \a this. The behavior of this method is close to MEDCouplingUMesh::computeNeighborsOfNodes except that the neighborhood of each node is wider here.
956  * A node j is considered to be in the neighborhood of i if and only if there is a cell in \a this containing in its nodal connectivity both i and j.
957  * This method is useful to find ghost cells of a part of a mesh with a code based on fields on nodes.
958  *
959  * \sa MEDCouplingUMesh::computeNeighborsOfNodes
960  */
961 void MEDCouplingUMesh::computeEnlargedNeighborsOfNodes(MCAuto<DataArrayInt> &neighbors, MCAuto<DataArrayInt>& neighborsIdx) const
962 {
963   checkFullyDefined();
964   int nbOfNodes(getNumberOfNodes());
965   const int *conn(_nodal_connec->begin()),*connIndex(_nodal_connec_index->begin());
966   int nbOfCells(getNumberOfCells());
967   std::vector< std::set<int> > st0(nbOfNodes);
968   for(int eltId=0;eltId<nbOfCells;eltId++)
969     {
970       const int *strtNdlConnOfCurCell(conn+connIndex[eltId]+1),*endNdlConnOfCurCell(conn+connIndex[eltId+1]);
971       std::set<int> s(strtNdlConnOfCurCell,endNdlConnOfCurCell); s.erase(-1); //for polyhedrons
972       for(std::set<int>::const_iterator iter2=s.begin();iter2!=s.end();iter2++)
973         st0[*iter2].insert(s.begin(),s.end());
974     }
975   neighborsIdx=DataArrayInt::New(); neighborsIdx->alloc(nbOfNodes+1,1); neighborsIdx->setIJ(0,0,0);
976   {
977     int *neighIdx(neighborsIdx->getPointer());
978     for(std::vector< std::set<int> >::const_iterator it=st0.begin();it!=st0.end();it++,neighIdx++)
979       {
980         if ((*it).empty())
981           neighIdx[1]=neighIdx[0];
982         else
983           neighIdx[1]=neighIdx[0]+(*it).size()-1;
984       }
985   }
986   neighbors=DataArrayInt::New(); neighbors->alloc(neighborsIdx->back(),1);
987   {
988     const int *neighIdx(neighborsIdx->begin());
989     int *neigh(neighbors->getPointer()),nodeId(0);
990     for(std::vector< std::set<int> >::const_iterator it=st0.begin();it!=st0.end();it++,neighIdx++,nodeId++)
991       {
992         std::set<int> s(*it); s.erase(nodeId);
993         std::copy(s.begin(),s.end(),neigh+*neighIdx);
994       }
995   }
996 }
997
998 /*!
999  * Converts specified cells to either polygons (if \a this is a 2D mesh) or
1000  * polyhedrons (if \a this is a 3D mesh). The cells to convert are specified by an
1001  * array of cell ids. Pay attention that after conversion all algorithms work slower
1002  * with \a this mesh than before conversion. <br> If an exception is thrown during the
1003  * conversion due presence of invalid ids in the array of cells to convert, as a
1004  * result \a this mesh contains some already converted elements. In this case the 2D
1005  * mesh remains valid but 3D mesh becomes \b inconsistent!
1006  *  \warning This method can significantly modify the order of geometric types in \a this,
1007  *          hence, to write this mesh to the MED file, its cells must be sorted using
1008  *          sortCellsInMEDFileFrmt().
1009  *  \param [in] cellIdsToConvertBg - the array holding ids of cells to convert.
1010  *  \param [in] cellIdsToConvertEnd - a pointer to the last-plus-one-th element of \a
1011  *         cellIdsToConvertBg.
1012  *  \throw If the coordinates array is not set.
1013  *  \throw If the nodal connectivity of cells is node defined.
1014  *  \throw If dimension of \a this mesh is not either 2 or 3.
1015  *
1016  *  \if ENABLE_EXAMPLES
1017  *  \ref cpp_mcumesh_convertToPolyTypes "Here is a C++ example".<br>
1018  *  \ref  py_mcumesh_convertToPolyTypes "Here is a Python example".
1019  *  \endif
1020  */
1021 void MEDCouplingUMesh::convertToPolyTypes(const int *cellIdsToConvertBg, const int *cellIdsToConvertEnd)
1022 {
1023   checkFullyDefined();
1024   int dim=getMeshDimension();
1025   if(dim<2 || dim>3)
1026     throw INTERP_KERNEL::Exception("Invalid mesh dimension : must be 2 or 3 !");
1027   int nbOfCells(getNumberOfCells());
1028   if(dim==2)
1029     {
1030       const int *connIndex=_nodal_connec_index->begin();
1031       int *conn=_nodal_connec->getPointer();
1032       for(const int *iter=cellIdsToConvertBg;iter!=cellIdsToConvertEnd;iter++)
1033         {
1034           if(*iter>=0 && *iter<nbOfCells)
1035             {
1036               const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[connIndex[*iter]]);
1037               if(!cm.isQuadratic())
1038                 conn[connIndex[*iter]]=INTERP_KERNEL::NORM_POLYGON;
1039               else
1040                 conn[connIndex[*iter]]=INTERP_KERNEL::NORM_QPOLYG;
1041             }
1042           else
1043             {
1044               std::ostringstream oss; oss << "MEDCouplingUMesh::convertToPolyTypes : On rank #" << std::distance(cellIdsToConvertBg,iter) << " value is " << *iter << " which is not";
1045               oss << " in range [0," << nbOfCells << ") !";
1046               throw INTERP_KERNEL::Exception(oss.str());
1047             }
1048         }
1049     }
1050   else
1051     {
1052       int *connIndex(_nodal_connec_index->getPointer());
1053       const int *connOld(_nodal_connec->getConstPointer());
1054       MCAuto<DataArrayInt> connNew(DataArrayInt::New()),connNewI(DataArrayInt::New()); connNew->alloc(0,1); connNewI->alloc(1,1); connNewI->setIJ(0,0,0);
1055       std::vector<bool> toBeDone(nbOfCells,false);
1056       for(const int *iter=cellIdsToConvertBg;iter!=cellIdsToConvertEnd;iter++)
1057         {
1058           if(*iter>=0 && *iter<nbOfCells)
1059             toBeDone[*iter]=true;
1060           else
1061             {
1062               std::ostringstream oss; oss << "MEDCouplingUMesh::convertToPolyTypes : On rank #" << std::distance(cellIdsToConvertBg,iter) << " value is " << *iter << " which is not";
1063               oss << " in range [0," << nbOfCells << ") !";
1064               throw INTERP_KERNEL::Exception(oss.str());
1065             }
1066         }
1067       for(int cellId=0;cellId<nbOfCells;cellId++)
1068         {
1069           int pos(connIndex[cellId]),posP1(connIndex[cellId+1]);
1070           int lgthOld(posP1-pos-1);
1071           if(toBeDone[cellId])
1072             {
1073               const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)connOld[pos]);
1074               unsigned nbOfFaces(cm.getNumberOfSons2(connOld+pos+1,lgthOld));
1075               int *tmp(new int[nbOfFaces*lgthOld+1]);
1076               int *work=tmp; *work++=INTERP_KERNEL::NORM_POLYHED;
1077               for(unsigned j=0;j<nbOfFaces;j++)
1078                 {
1079                   INTERP_KERNEL::NormalizedCellType type;
1080                   unsigned offset=cm.fillSonCellNodalConnectivity2(j,connOld+pos+1,lgthOld,work,type);
1081                   work+=offset;
1082                   *work++=-1;
1083                 }
1084               std::size_t newLgth(std::distance(tmp,work)-1);//-1 for last -1
1085               connNew->pushBackValsSilent(tmp,tmp+newLgth);
1086               connNewI->pushBackSilent(connNewI->back()+(int)newLgth);
1087               delete [] tmp;
1088             }
1089           else
1090             {
1091               connNew->pushBackValsSilent(connOld+pos,connOld+posP1);
1092               connNewI->pushBackSilent(connNewI->back()+posP1-pos);
1093             }
1094         }
1095       setConnectivity(connNew,connNewI,false);//false because computeTypes called just behind.
1096     }
1097   computeTypes();
1098 }
1099
1100 /*!
1101  * Converts all cells to either polygons (if \a this is a 2D mesh) or
1102  * polyhedrons (if \a this is a 3D mesh).
1103  *  \warning As this method is purely for user-friendliness and no optimization is
1104  *          done to avoid construction of a useless vector, this method can be costly
1105  *          in memory.
1106  *  \throw If the coordinates array is not set.
1107  *  \throw If the nodal connectivity of cells is node defined.
1108  *  \throw If dimension of \a this mesh is not either 2 or 3.
1109  */
1110 void MEDCouplingUMesh::convertAllToPoly()
1111 {
1112   int nbOfCells=getNumberOfCells();
1113   std::vector<int> cellIds(nbOfCells);
1114   for(int i=0;i<nbOfCells;i++)
1115     cellIds[i]=i;
1116   convertToPolyTypes(&cellIds[0],&cellIds[0]+cellIds.size());
1117 }
1118
1119 /*!
1120  * Fixes nodal connectivity of invalid cells of type NORM_POLYHED. This method
1121  * expects that all NORM_POLYHED cells have connectivity similar to that of prismatic
1122  * volumes like NORM_HEXA8, NORM_PENTA6 etc., i.e. the first half of nodes describes a
1123  * base facet of the volume and the second half of nodes describes an opposite facet
1124  * having the same number of nodes as the base one. This method converts such
1125  * connectivity to a valid polyhedral format where connectivity of each facet is
1126  * explicitly described and connectivity of facets are separated by -1. If \a this mesh
1127  * contains a NORM_POLYHED cell with a valid connectivity, or an invalid connectivity is
1128  * not as expected, an exception is thrown and the mesh remains unchanged. Care of
1129  * a correct orientation of the first facet of a polyhedron, else orientation of a
1130  * corrected cell is reverse.<br>
1131  * This method is useful to build an extruded unstructured mesh with polyhedrons as
1132  * it releases the user from boring description of polyhedra connectivity in the valid
1133  * format.
1134  *  \throw If \a this->getMeshDimension() != 3.
1135  *  \throw If \a this->getSpaceDimension() != 3.
1136  *  \throw If the nodal connectivity of cells is not defined.
1137  *  \throw If the coordinates array is not set.
1138  *  \throw If \a this mesh contains polyhedrons with the valid connectivity.
1139  *  \throw If \a this mesh contains polyhedrons with odd number of nodes.
1140  *
1141  *  \if ENABLE_EXAMPLES
1142  *  \ref cpp_mcumesh_arePolyhedronsNotCorrectlyOriented "Here is a C++ example".<br>
1143  *  \ref  py_mcumesh_arePolyhedronsNotCorrectlyOriented "Here is a Python example".
1144  *  \endif
1145  */
1146 void MEDCouplingUMesh::convertExtrudedPolyhedra()
1147 {
1148   checkFullyDefined();
1149   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
1150     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertExtrudedPolyhedra works on umeshes with meshdim equal to 3 and spaceDim equal to 3 too!");
1151   int nbOfCells=getNumberOfCells();
1152   MCAuto<DataArrayInt> newCi=DataArrayInt::New();
1153   newCi->alloc(nbOfCells+1,1);
1154   int *newci=newCi->getPointer();
1155   const int *ci=_nodal_connec_index->getConstPointer();
1156   const int *c=_nodal_connec->getConstPointer();
1157   newci[0]=0;
1158   for(int i=0;i<nbOfCells;i++)
1159     {
1160       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)c[ci[i]];
1161       if(type==INTERP_KERNEL::NORM_POLYHED)
1162         {
1163           if(std::count(c+ci[i]+1,c+ci[i+1],-1)!=0)
1164             {
1165               std::ostringstream oss; oss << "MEDCouplingUMesh::convertExtrudedPolyhedra : cell # " << i << " is a polhedron BUT it has NOT exactly 1 face !";
1166               throw INTERP_KERNEL::Exception(oss.str());
1167             }
1168           std::size_t n2=std::distance(c+ci[i]+1,c+ci[i+1]);
1169           if(n2%2!=0)
1170             {
1171               std::ostringstream oss; oss << "MEDCouplingUMesh::convertExtrudedPolyhedra : cell # " << i << " is a polhedron with 1 face but there is a mismatch of number of nodes in face should be even !";
1172               throw INTERP_KERNEL::Exception(oss.str());
1173             }
1174           int n1=(int)(n2/2);
1175           newci[i+1]=7*n1+2+newci[i];//6*n1 (nodal length) + n1+2 (number of faces) - 1 (number of '-1' separator is equal to number of faces -1) + 1 (for cell type)
1176         }
1177       else
1178         newci[i+1]=(ci[i+1]-ci[i])+newci[i];
1179     }
1180   MCAuto<DataArrayInt> newC=DataArrayInt::New();
1181   newC->alloc(newci[nbOfCells],1);
1182   int *newc=newC->getPointer();
1183   for(int i=0;i<nbOfCells;i++)
1184     {
1185       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)c[ci[i]];
1186       if(type==INTERP_KERNEL::NORM_POLYHED)
1187         {
1188           std::size_t n1=std::distance(c+ci[i]+1,c+ci[i+1])/2;
1189           newc=std::copy(c+ci[i],c+ci[i]+n1+1,newc);
1190           *newc++=-1;
1191           for(std::size_t j=0;j<n1;j++)
1192             {
1193               newc[j]=c[ci[i]+1+n1+(n1-j)%n1];
1194               newc[n1+5*j]=-1;
1195               newc[n1+5*j+1]=c[ci[i]+1+j];
1196               newc[n1+5*j+2]=c[ci[i]+1+j+n1];
1197               newc[n1+5*j+3]=c[ci[i]+1+(j+1)%n1+n1];
1198               newc[n1+5*j+4]=c[ci[i]+1+(j+1)%n1];
1199             }
1200           newc+=n1*6;
1201         }
1202       else
1203         newc=std::copy(c+ci[i],c+ci[i+1],newc);
1204     }
1205   _nodal_connec_index->decrRef(); _nodal_connec_index=newCi.retn();
1206   _nodal_connec->decrRef(); _nodal_connec=newC.retn();
1207 }
1208
1209
1210 /*!
1211  * Converts all polygons (if \a this is a 2D mesh) or polyhedrons (if \a this is a 3D
1212  * mesh) to cells of classical types. This method is opposite to convertToPolyTypes().
1213  * \warning Cells of the result mesh are \b not sorted by geometric type, hence,
1214  *          to write this mesh to the MED file, its cells must be sorted using
1215  *          sortCellsInMEDFileFrmt().
1216  * \warning Cells (and most notably polyhedrons) must be correctly oriented for this to work
1217  *          properly. See orientCorrectlyPolyhedrons() and arePolyhedronsNotCorrectlyOriented().
1218  * \return \c true if at least one cell has been converted, \c false else. In the
1219  *         last case the nodal connectivity remains unchanged.
1220  * \throw If the coordinates array is not set.
1221  * \throw If the nodal connectivity of cells is not defined.
1222  * \throw If \a this->getMeshDimension() < 0.
1223  */
1224 bool MEDCouplingUMesh::unPolyze()
1225 {
1226   checkFullyDefined();
1227   int mdim=getMeshDimension();
1228   if(mdim<0)
1229     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::unPolyze works on umeshes with meshdim equals to 0, 1 2 or 3 !");
1230   if(mdim<=1)
1231     return false;
1232   int nbOfCells=getNumberOfCells();
1233   if(nbOfCells<1)
1234     return false;
1235   int initMeshLgth=getNodalConnectivityArrayLen();
1236   int *conn=_nodal_connec->getPointer();
1237   int *index=_nodal_connec_index->getPointer();
1238   int posOfCurCell=0;
1239   int newPos=0;
1240   int lgthOfCurCell;
1241   bool ret=false;
1242   for(int i=0;i<nbOfCells;i++)
1243     {
1244       lgthOfCurCell=index[i+1]-posOfCurCell;
1245       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)conn[posOfCurCell];
1246       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(type);
1247       INTERP_KERNEL::NormalizedCellType newType=INTERP_KERNEL::NORM_ERROR;
1248       int newLgth;
1249       if(cm.isDynamic())
1250         {
1251           switch(cm.getDimension())
1252           {
1253             case 2:
1254               {
1255                 INTERP_KERNEL::AutoPtr<int> tmp=new int[lgthOfCurCell-1];
1256                 std::copy(conn+posOfCurCell+1,conn+posOfCurCell+lgthOfCurCell,(int *)tmp);
1257                 newType=INTERP_KERNEL::CellSimplify::tryToUnPoly2D(cm.isQuadratic(),tmp,lgthOfCurCell-1,conn+newPos+1,newLgth);
1258                 break;
1259               }
1260             case 3:
1261               {
1262                 int nbOfFaces,lgthOfPolyhConn;
1263                 INTERP_KERNEL::AutoPtr<int> zipFullReprOfPolyh=INTERP_KERNEL::CellSimplify::getFullPolyh3DCell(type,conn+posOfCurCell+1,lgthOfCurCell-1,nbOfFaces,lgthOfPolyhConn);
1264                 newType=INTERP_KERNEL::CellSimplify::tryToUnPoly3D(zipFullReprOfPolyh,nbOfFaces,lgthOfPolyhConn,conn+newPos+1,newLgth);
1265                 break;
1266               }
1267             case 1:
1268               {
1269                 newType=(lgthOfCurCell==3)?INTERP_KERNEL::NORM_SEG2:INTERP_KERNEL::NORM_POLYL;
1270                 break;
1271               }
1272           }
1273           ret=ret || (newType!=type);
1274           conn[newPos]=newType;
1275           newPos+=newLgth+1;
1276           posOfCurCell=index[i+1];
1277           index[i+1]=newPos;
1278         }
1279       else
1280         {
1281           std::copy(conn+posOfCurCell,conn+posOfCurCell+lgthOfCurCell,conn+newPos);
1282           newPos+=lgthOfCurCell;
1283           posOfCurCell+=lgthOfCurCell;
1284           index[i+1]=newPos;
1285         }
1286     }
1287   if(newPos!=initMeshLgth)
1288     _nodal_connec->reAlloc(newPos);
1289   if(ret)
1290     computeTypes();
1291   return ret;
1292 }
1293
1294 /*!
1295  * This method expects that spaceDimension is equal to 3 and meshDimension equal to 3.
1296  * This method performs operation only on polyhedrons in \b this. If no polyhedrons exists in \b this, \b this remains unchanged.
1297  * This method allows to merge if any coplanar 3DSurf cells that may appear in some polyhedrons cells.
1298  *
1299  * \param [in] eps is a relative precision that allows to establish if some 3D plane are coplanar or not. This epsilon is used to recenter around origin to have maximal
1300  *             precision.
1301  */
1302 void MEDCouplingUMesh::simplifyPolyhedra(double eps)
1303 {
1304   checkFullyDefined();
1305   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
1306     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::simplifyPolyhedra : works on meshdimension 3 and spaceDimension 3 !");
1307   MCAuto<DataArrayDouble> coords=getCoords()->deepCopy();
1308   coords->recenterForMaxPrecision(eps);
1309   //
1310   int nbOfCells=getNumberOfCells();
1311   const int *conn=_nodal_connec->getConstPointer();
1312   const int *index=_nodal_connec_index->getConstPointer();
1313   MCAuto<DataArrayInt> connINew=DataArrayInt::New();
1314   connINew->alloc(nbOfCells+1,1);
1315   int *connINewPtr=connINew->getPointer(); *connINewPtr++=0;
1316   MCAuto<DataArrayInt> connNew=DataArrayInt::New(); connNew->alloc(0,1);
1317   MCAuto<DataArrayInt> E_Fi(DataArrayInt::New()), E_F(DataArrayInt::New()), F_Ei(DataArrayInt::New()), F_E(DataArrayInt::New());
1318   MCAuto<MEDCouplingUMesh> m_faces(buildDescendingConnectivity(E_F, E_Fi, F_E, F_Ei));
1319   bool changed=false;
1320   for(int i=0;i<nbOfCells;i++,connINewPtr++)
1321     {
1322       if(conn[index[i]]==(int)INTERP_KERNEL::NORM_POLYHED)
1323         {
1324           SimplifyPolyhedronCell(eps,coords, i,connNew, m_faces, E_Fi, E_F, F_Ei, F_E);
1325           changed=true;
1326         }
1327       else
1328         connNew->insertAtTheEnd(conn+index[i],conn+index[i+1]);
1329       *connINewPtr=connNew->getNumberOfTuples();
1330     }
1331   if(changed)
1332     setConnectivity(connNew,connINew,false);
1333 }
1334
1335 /*!
1336  * This method returns all node ids used in the connectivity of \b this. The data array returned has to be dealt by the caller.
1337  * The returned node ids are sorted ascendingly. This method is close to MEDCouplingUMesh::getNodeIdsInUse except
1338  * the format of the returned DataArrayInt instance.
1339  *
1340  * \return a newly allocated DataArrayInt sorted ascendingly of fetched node ids.
1341  * \sa MEDCouplingUMesh::getNodeIdsInUse, areAllNodesFetched
1342  */
1343 DataArrayInt *MEDCouplingUMesh::computeFetchedNodeIds() const
1344 {
1345   checkConnectivityFullyDefined();
1346   const int *maxEltPt(std::max_element(_nodal_connec->begin(),_nodal_connec->end()));
1347   int maxElt(maxEltPt==_nodal_connec->end()?0:std::abs(*maxEltPt)+1);
1348   std::vector<bool> retS(maxElt,false);
1349   computeNodeIdsAlg(retS);
1350   return DataArrayInt::BuildListOfSwitchedOn(retS);
1351 }
1352
1353 /*!
1354  * \param [in,out] nodeIdsInUse an array of size typically equal to nbOfNodes.
1355  * \sa MEDCouplingUMesh::getNodeIdsInUse, areAllNodesFetched
1356  */
1357 void MEDCouplingUMesh::computeNodeIdsAlg(std::vector<bool>& nodeIdsInUse) const
1358 {
1359   int nbOfNodes((int)nodeIdsInUse.size()),nbOfCells(getNumberOfCells());
1360   const int *connIndex(_nodal_connec_index->getConstPointer()),*conn(_nodal_connec->getConstPointer());
1361   for(int i=0;i<nbOfCells;i++)
1362     for(int j=connIndex[i]+1;j<connIndex[i+1];j++)
1363       if(conn[j]>=0)
1364         {
1365           if(conn[j]<nbOfNodes)
1366             nodeIdsInUse[conn[j]]=true;
1367           else
1368             {
1369               std::ostringstream oss; oss << "MEDCouplingUMesh::computeNodeIdsAlg : In cell #" << i  << " presence of node id " <<  conn[j] << " not in [0," << nbOfNodes << ") !";
1370               throw INTERP_KERNEL::Exception(oss.str());
1371             }
1372         }
1373 }
1374
1375 /// @cond INTERNAL
1376
1377 struct MEDCouplingAccVisit
1378 {
1379   MEDCouplingAccVisit():_new_nb_of_nodes(0) { }
1380   int operator()(int val) { if(val!=-1) return _new_nb_of_nodes++; else return -1; }
1381   int _new_nb_of_nodes;
1382 };
1383
1384 /// @endcond
1385
1386 /*!
1387  * Finds nodes not used in any cell and returns an array giving a new id to every node
1388  * by excluding the unused nodes, for which the array holds -1. The result array is
1389  * a mapping in "Old to New" mode.
1390  *  \param [out] nbrOfNodesInUse - number of node ids present in the nodal connectivity.
1391  *  \return DataArrayInt * - a new instance of DataArrayInt. Its length is \a
1392  *          this->getNumberOfNodes(). It holds for each node of \a this mesh either -1
1393  *          if the node is unused or a new id else. The caller is to delete this
1394  *          array using decrRef() as it is no more needed.
1395  *  \throw If the coordinates array is not set.
1396  *  \throw If the nodal connectivity of cells is not defined.
1397  *  \throw If the nodal connectivity includes an invalid id.
1398  *
1399  *  \if ENABLE_EXAMPLES
1400  *  \ref cpp_mcumesh_getNodeIdsInUse "Here is a C++ example".<br>
1401  *  \ref  py_mcumesh_getNodeIdsInUse "Here is a Python example".
1402  *  \endif
1403  * \sa computeFetchedNodeIds, computeNodeIdsAlg()
1404  */
1405 DataArrayInt *MEDCouplingUMesh::getNodeIdsInUse(int& nbrOfNodesInUse) const
1406 {
1407   nbrOfNodesInUse=-1;
1408   int nbOfNodes(getNumberOfNodes());
1409   MCAuto<DataArrayInt> ret=DataArrayInt::New();
1410   ret->alloc(nbOfNodes,1);
1411   int *traducer=ret->getPointer();
1412   std::fill(traducer,traducer+nbOfNodes,-1);
1413   int nbOfCells=getNumberOfCells();
1414   const int *connIndex=_nodal_connec_index->getConstPointer();
1415   const int *conn=_nodal_connec->getConstPointer();
1416   for(int i=0;i<nbOfCells;i++)
1417     for(int j=connIndex[i]+1;j<connIndex[i+1];j++)
1418       if(conn[j]>=0)
1419         {
1420           if(conn[j]<nbOfNodes)
1421             traducer[conn[j]]=1;
1422           else
1423             {
1424               std::ostringstream oss; oss << "MEDCouplingUMesh::getNodeIdsInUse : In cell #" << i  << " presence of node id " <<  conn[j] << " not in [0," << nbOfNodes << ") !";
1425               throw INTERP_KERNEL::Exception(oss.str());
1426             }
1427         }
1428   nbrOfNodesInUse=(int)std::count(traducer,traducer+nbOfNodes,1);
1429   std::transform(traducer,traducer+nbOfNodes,traducer,MEDCouplingAccVisit());
1430   return ret.retn();
1431 }
1432
1433 /*!
1434  * This method returns a newly allocated array containing this->getNumberOfCells() tuples and 1 component.
1435  * For each cell in \b this the number of nodes constituting cell is computed.
1436  * For each polyhedron cell, the sum of the number of nodes of each face constituting polyhedron cell is returned.
1437  * So for pohyhedrons some nodes can be counted several times in the returned result.
1438  *
1439  * \return a newly allocated array
1440  * \sa MEDCouplingUMesh::computeEffectiveNbOfNodesPerCell
1441  */
1442 DataArrayInt *MEDCouplingUMesh::computeNbOfNodesPerCell() const
1443 {
1444   checkConnectivityFullyDefined();
1445   int nbOfCells=getNumberOfCells();
1446   MCAuto<DataArrayInt> ret=DataArrayInt::New();
1447   ret->alloc(nbOfCells,1);
1448   int *retPtr=ret->getPointer();
1449   const int *conn=getNodalConnectivity()->getConstPointer();
1450   const int *connI=getNodalConnectivityIndex()->getConstPointer();
1451   for(int i=0;i<nbOfCells;i++,retPtr++)
1452     {
1453       if(conn[connI[i]]!=(int)INTERP_KERNEL::NORM_POLYHED)
1454         *retPtr=connI[i+1]-connI[i]-1;
1455       else
1456         *retPtr=connI[i+1]-connI[i]-1-std::count(conn+connI[i]+1,conn+connI[i+1],-1);
1457     }
1458   return ret.retn();
1459 }
1460
1461 /*!
1462  * This method computes effective number of nodes per cell. That is to say nodes appearing several times in nodal connectivity of a cell,
1463  * will be counted only once here whereas it will be counted several times in MEDCouplingUMesh::computeNbOfNodesPerCell method.
1464  *
1465  * \return DataArrayInt * - new object to be deallocated by the caller.
1466  * \sa MEDCouplingUMesh::computeNbOfNodesPerCell
1467  */
1468 DataArrayInt *MEDCouplingUMesh::computeEffectiveNbOfNodesPerCell() const
1469 {
1470   checkConnectivityFullyDefined();
1471   int nbOfCells=getNumberOfCells();
1472   MCAuto<DataArrayInt> ret=DataArrayInt::New();
1473   ret->alloc(nbOfCells,1);
1474   int *retPtr=ret->getPointer();
1475   const int *conn=getNodalConnectivity()->getConstPointer();
1476   const int *connI=getNodalConnectivityIndex()->getConstPointer();
1477   for(int i=0;i<nbOfCells;i++,retPtr++)
1478     {
1479       std::set<int> s(conn+connI[i]+1,conn+connI[i+1]);
1480       if(conn[connI[i]]!=(int)INTERP_KERNEL::NORM_POLYHED)
1481         *retPtr=(int)s.size();
1482       else
1483         {
1484           s.erase(-1);
1485           *retPtr=(int)s.size();
1486         }
1487     }
1488   return ret.retn();
1489 }
1490
1491 /*!
1492  * This method returns a newly allocated array containing this->getNumberOfCells() tuples and 1 component.
1493  * For each cell in \b this the number of faces constituting (entity of dimension this->getMeshDimension()-1) cell is computed.
1494  *
1495  * \return a newly allocated array
1496  */
1497 DataArrayInt *MEDCouplingUMesh::computeNbOfFacesPerCell() const
1498 {
1499   checkConnectivityFullyDefined();
1500   int nbOfCells=getNumberOfCells();
1501   MCAuto<DataArrayInt> ret=DataArrayInt::New();
1502   ret->alloc(nbOfCells,1);
1503   int *retPtr=ret->getPointer();
1504   const int *conn=getNodalConnectivity()->getConstPointer();
1505   const int *connI=getNodalConnectivityIndex()->getConstPointer();
1506   for(int i=0;i<nbOfCells;i++,retPtr++,connI++)
1507     {
1508       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[*connI]);
1509       *retPtr=cm.getNumberOfSons2(conn+connI[0]+1,connI[1]-connI[0]-1);
1510     }
1511   return ret.retn();
1512 }
1513
1514 /*!
1515  * Removes unused nodes (the node coordinates array is shorten) and returns an array
1516  * mapping between new and old node ids in "Old to New" mode. -1 values in the returned
1517  * array mean that the corresponding old node is no more used.
1518  *  \return DataArrayInt * - a new instance of DataArrayInt of length \a
1519  *           this->getNumberOfNodes() before call of this method. The caller is to
1520  *           delete this array using decrRef() as it is no more needed.
1521  *  \throw If the coordinates array is not set.
1522  *  \throw If the nodal connectivity of cells is not defined.
1523  *  \throw If the nodal connectivity includes an invalid id.
1524  *  \sa areAllNodesFetched
1525  *
1526  *  \if ENABLE_EXAMPLES
1527  *  \ref cpp_mcumesh_zipCoordsTraducer "Here is a C++ example".<br>
1528  *  \ref  py_mcumesh_zipCoordsTraducer "Here is a Python example".
1529  *  \endif
1530  */
1531 DataArrayInt *MEDCouplingUMesh::zipCoordsTraducer()
1532 {
1533   return MEDCouplingPointSet::zipCoordsTraducer();
1534 }
1535
1536 /*!
1537  * This method stands if 'cell1' and 'cell2' are equals regarding 'compType' policy.
1538  * The semantic of 'compType' is specified in MEDCouplingPointSet::zipConnectivityTraducer method.
1539  */
1540 int MEDCouplingUMesh::AreCellsEqual(const int *conn, const int *connI, int cell1, int cell2, int compType)
1541 {
1542   switch(compType)
1543   {
1544     case 0:
1545       return AreCellsEqualPolicy0(conn,connI,cell1,cell2);
1546     case 1:
1547       return AreCellsEqualPolicy1(conn,connI,cell1,cell2);
1548     case 2:
1549       return AreCellsEqualPolicy2(conn,connI,cell1,cell2);
1550     case 3:
1551       return AreCellsEqualPolicy2NoType(conn,connI,cell1,cell2);
1552     case 7:
1553       return AreCellsEqualPolicy7(conn,connI,cell1,cell2);
1554   }
1555   throw INTERP_KERNEL::Exception("Unknown comparison asked ! Must be in 0,1,2,3 or 7.");
1556 }
1557
1558 /*!
1559  * This method is the last step of the MEDCouplingPointSet::zipConnectivityTraducer with policy 0.
1560  */
1561 int MEDCouplingUMesh::AreCellsEqualPolicy0(const int *conn, const int *connI, int cell1, int cell2)
1562 {
1563   if(connI[cell1+1]-connI[cell1]==connI[cell2+1]-connI[cell2])
1564     return std::equal(conn+connI[cell1]+1,conn+connI[cell1+1],conn+connI[cell2]+1)?1:0;
1565   return 0;
1566 }
1567
1568 /*!
1569  * This method is the last step of the MEDCouplingPointSet::zipConnectivityTraducer with policy 1.
1570  */
1571 int MEDCouplingUMesh::AreCellsEqualPolicy1(const int *conn, const int *connI, int cell1, int cell2)
1572 {
1573   int sz=connI[cell1+1]-connI[cell1];
1574   if(sz==connI[cell2+1]-connI[cell2])
1575     {
1576       if(conn[connI[cell1]]==conn[connI[cell2]])
1577         {
1578           const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[connI[cell1]]);
1579           unsigned dim=cm.getDimension();
1580           if(dim!=3)
1581             {
1582               if(dim!=1)
1583                 {
1584                   int sz1=2*(sz-1);
1585                   INTERP_KERNEL::AutoPtr<int> tmp=new int[sz1];
1586                   int *work=std::copy(conn+connI[cell1]+1,conn+connI[cell1+1],(int *)tmp);
1587                   std::copy(conn+connI[cell1]+1,conn+connI[cell1+1],work);
1588                   work=std::search((int *)tmp,(int *)tmp+sz1,conn+connI[cell2]+1,conn+connI[cell2+1]);
1589                   return work!=tmp+sz1?1:0;
1590                 }
1591               else
1592                 return std::equal(conn+connI[cell1]+1,conn+connI[cell1+1],conn+connI[cell2]+1)?1:0;//case of SEG2 and SEG3
1593             }
1594           else
1595             throw INTERP_KERNEL::Exception("MEDCouplingUMesh::AreCellsEqualPolicy1 : not implemented yet for meshdim == 3 !");
1596         }
1597     }
1598   return 0;
1599 }
1600
1601 /*!
1602  * This method is the last step of the MEDCouplingPointSet::zipConnectivityTraducer with policy 2.
1603  */
1604 int MEDCouplingUMesh::AreCellsEqualPolicy2(const int *conn, const int *connI, int cell1, int cell2)
1605 {
1606   if(connI[cell1+1]-connI[cell1]==connI[cell2+1]-connI[cell2])
1607     {
1608       if(conn[connI[cell1]]==conn[connI[cell2]])
1609         {
1610           std::set<int> s1(conn+connI[cell1]+1,conn+connI[cell1+1]);
1611           std::set<int> s2(conn+connI[cell2]+1,conn+connI[cell2+1]);
1612           return s1==s2?1:0;
1613         }
1614     }
1615   return 0;
1616 }
1617
1618 /*!
1619  * This method is less restrictive than AreCellsEqualPolicy2. Here the geometric type is absolutely not taken into account !
1620  */
1621 int MEDCouplingUMesh::AreCellsEqualPolicy2NoType(const int *conn, const int *connI, int cell1, int cell2)
1622 {
1623   if(connI[cell1+1]-connI[cell1]==connI[cell2+1]-connI[cell2])
1624     {
1625       std::set<int> s1(conn+connI[cell1]+1,conn+connI[cell1+1]);
1626       std::set<int> s2(conn+connI[cell2]+1,conn+connI[cell2+1]);
1627       return s1==s2?1:0;
1628     }
1629   return 0;
1630 }
1631
1632 /*!
1633  * This method is the last step of the MEDCouplingPointSet::zipConnectivityTraducer with policy 7.
1634  */
1635 int MEDCouplingUMesh::AreCellsEqualPolicy7(const int *conn, const int *connI, int cell1, int cell2)
1636 {
1637   int sz=connI[cell1+1]-connI[cell1];
1638   if(sz==connI[cell2+1]-connI[cell2])
1639     {
1640       if(conn[connI[cell1]]==conn[connI[cell2]])
1641         {
1642           const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[connI[cell1]]);
1643           unsigned dim=cm.getDimension();
1644           if(dim!=3)
1645             {
1646               if(dim!=1)
1647                 {
1648                   int sz1=2*(sz-1);
1649                   INTERP_KERNEL::AutoPtr<int> tmp=new int[sz1];
1650                   int *work=std::copy(conn+connI[cell1]+1,conn+connI[cell1+1],(int *)tmp);
1651                   std::copy(conn+connI[cell1]+1,conn+connI[cell1+1],work);
1652                   work=std::search((int *)tmp,(int *)tmp+sz1,conn+connI[cell2]+1,conn+connI[cell2+1]);
1653                   if(work!=tmp+sz1)
1654                     return 1;
1655                   else
1656                     {
1657                       std::reverse_iterator<int *> it1((int *)tmp+sz1);
1658                       std::reverse_iterator<int *> it2((int *)tmp);
1659                       if(std::search(it1,it2,conn+connI[cell2]+1,conn+connI[cell2+1])!=it2)
1660                         return 2;
1661                       else
1662                         return 0;
1663                     }
1664
1665                   return work!=tmp+sz1?1:0;
1666                 }
1667               else
1668                 {//case of SEG2 and SEG3
1669                   if(std::equal(conn+connI[cell1]+1,conn+connI[cell1+1],conn+connI[cell2]+1))
1670                     return 1;
1671                   if(!cm.isQuadratic())
1672                     {
1673                       std::reverse_iterator<const int *> it1(conn+connI[cell1+1]);
1674                       std::reverse_iterator<const int *> it2(conn+connI[cell1]+1);
1675                       if(std::equal(it1,it2,conn+connI[cell2]+1))
1676                         return 2;
1677                       return 0;
1678                     }
1679                   else
1680                     {
1681                       if(conn[connI[cell1]+1]==conn[connI[cell2]+2] && conn[connI[cell1]+2]==conn[connI[cell2]+1] && conn[connI[cell1]+3]==conn[connI[cell2]+3])
1682                         return 2;
1683                       return 0;
1684                     }
1685                 }
1686             }
1687           else
1688             throw INTERP_KERNEL::Exception("MEDCouplingUMesh::AreCellsEqualPolicy7 : not implemented yet for meshdim == 3 !");
1689         }
1690     }
1691   return 0;
1692 }
1693
1694
1695 /*!
1696  * This method find cells that are equal (regarding \a compType) in \a this. The comparison is specified
1697  * by \a compType.
1698  * This method keeps the coordiantes of \a this. This method is time consuming.
1699  *
1700  * \param [in] compType input specifying the technique used to compare cells each other.
1701  *   - 0 : exactly. A cell is detected to be the same if and only if the connectivity is exactly the same without permutation and types same too. This is the strongest policy.
1702  *   - 1 : permutation same orientation. cell1 and cell2 are considered equal if the connectivity of cell2 can be deduced by those of cell1 by direct permutation (with exactly the same orientation)
1703  * and their type equal. For 1D mesh the policy 1 is equivalent to 0.
1704  *   - 2 : nodal. cell1 and cell2 are equal if and only if cell1 and cell2 have same type and have the same nodes constituting connectivity. This is the laziest policy. This policy
1705  * can be used for users not sensitive to orientation of cell
1706  * \param [in] startCellId specifies the cellId starting from which the equality computation will be carried out. By default it is 0, which it means that all cells in \a this will be scanned.
1707  * \param [out] commonCellsArr common cells ids (\ref numbering-indirect)
1708  * \param [out] commonCellsIArr common cells ids (\ref numbering-indirect)
1709  * \return the correspondence array old to new in a newly allocated array.
1710  *
1711  */
1712 void MEDCouplingUMesh::findCommonCells(int compType, int startCellId, DataArrayInt *& commonCellsArr, DataArrayInt *& commonCellsIArr) const
1713 {
1714   MCAuto<DataArrayInt> revNodal=DataArrayInt::New(),revNodalI=DataArrayInt::New();
1715   getReverseNodalConnectivity(revNodal,revNodalI);
1716   FindCommonCellsAlg(compType,startCellId,_nodal_connec,_nodal_connec_index,revNodal,revNodalI,commonCellsArr,commonCellsIArr);
1717 }
1718
1719 void MEDCouplingUMesh::FindCommonCellsAlg(int compType, int startCellId, const DataArrayInt *nodal, const DataArrayInt *nodalI, const DataArrayInt *revNodal, const DataArrayInt *revNodalI,
1720                                           DataArrayInt *& commonCellsArr, DataArrayInt *& commonCellsIArr)
1721 {
1722   MCAuto<DataArrayInt> commonCells=DataArrayInt::New(),commonCellsI=DataArrayInt::New(); commonCells->alloc(0,1);
1723   int nbOfCells=nodalI->getNumberOfTuples()-1;
1724   commonCellsI->reserve(1); commonCellsI->pushBackSilent(0);
1725   const int *revNodalPtr=revNodal->getConstPointer(),*revNodalIPtr=revNodalI->getConstPointer();
1726   const int *connPtr=nodal->getConstPointer(),*connIPtr=nodalI->getConstPointer();
1727   std::vector<bool> isFetched(nbOfCells,false);
1728   if(startCellId==0)
1729     {
1730       for(int i=0;i<nbOfCells;i++)
1731         {
1732           if(!isFetched[i])
1733             {
1734               const int *connOfNode=std::find_if(connPtr+connIPtr[i]+1,connPtr+connIPtr[i+1],std::bind2nd(std::not_equal_to<int>(),-1));
1735               std::vector<int> v,v2;
1736               if(connOfNode!=connPtr+connIPtr[i+1])
1737                 {
1738                   const int *locRevNodal=std::find(revNodalPtr+revNodalIPtr[*connOfNode],revNodalPtr+revNodalIPtr[*connOfNode+1],i);
1739                   v2.insert(v2.end(),locRevNodal,revNodalPtr+revNodalIPtr[*connOfNode+1]);
1740                   connOfNode++;
1741                 }
1742               for(;connOfNode!=connPtr+connIPtr[i+1] && v2.size()>1;connOfNode++)
1743                 if(*connOfNode>=0)
1744                   {
1745                     v=v2;
1746                     const int *locRevNodal=std::find(revNodalPtr+revNodalIPtr[*connOfNode],revNodalPtr+revNodalIPtr[*connOfNode+1],i);
1747                     std::vector<int>::iterator it=std::set_intersection(v.begin(),v.end(),locRevNodal,revNodalPtr+revNodalIPtr[*connOfNode+1],v2.begin());
1748                     v2.resize(std::distance(v2.begin(),it));
1749                   }
1750               if(v2.size()>1)
1751                 {
1752                   if(AreCellsEqualInPool(v2,compType,connPtr,connIPtr,commonCells))
1753                     {
1754                       int pos=commonCellsI->back();
1755                       commonCellsI->pushBackSilent(commonCells->getNumberOfTuples());
1756                       for(const int *it=commonCells->begin()+pos;it!=commonCells->end();it++)
1757                         isFetched[*it]=true;
1758                     }
1759                 }
1760             }
1761         }
1762     }
1763   else
1764     {
1765       for(int i=startCellId;i<nbOfCells;i++)
1766         {
1767           if(!isFetched[i])
1768             {
1769               const int *connOfNode=std::find_if(connPtr+connIPtr[i]+1,connPtr+connIPtr[i+1],std::bind2nd(std::not_equal_to<int>(),-1));
1770               std::vector<int> v,v2;
1771               if(connOfNode!=connPtr+connIPtr[i+1])
1772                 {
1773                   v2.insert(v2.end(),revNodalPtr+revNodalIPtr[*connOfNode],revNodalPtr+revNodalIPtr[*connOfNode+1]);
1774                   connOfNode++;
1775                 }
1776               for(;connOfNode!=connPtr+connIPtr[i+1] && v2.size()>1;connOfNode++)
1777                 if(*connOfNode>=0)
1778                   {
1779                     v=v2;
1780                     std::vector<int>::iterator it=std::set_intersection(v.begin(),v.end(),revNodalPtr+revNodalIPtr[*connOfNode],revNodalPtr+revNodalIPtr[*connOfNode+1],v2.begin());
1781                     v2.resize(std::distance(v2.begin(),it));
1782                   }
1783               if(v2.size()>1)
1784                 {
1785                   if(AreCellsEqualInPool(v2,compType,connPtr,connIPtr,commonCells))
1786                     {
1787                       int pos=commonCellsI->back();
1788                       commonCellsI->pushBackSilent(commonCells->getNumberOfTuples());
1789                       for(const int *it=commonCells->begin()+pos;it!=commonCells->end();it++)
1790                         isFetched[*it]=true;
1791                     }
1792                 }
1793             }
1794         }
1795     }
1796   commonCellsArr=commonCells.retn();
1797   commonCellsIArr=commonCellsI.retn();
1798 }
1799
1800 /*!
1801  * Checks if \a this mesh includes all cells of an \a other mesh, and returns an array
1802  * giving for each cell of the \a other an id of a cell in \a this mesh. A value larger
1803  * than \a this->getNumberOfCells() in the returned array means that there is no
1804  * corresponding cell in \a this mesh.
1805  * It is expected that \a this and \a other meshes share the same node coordinates
1806  * array, if it is not so an exception is thrown.
1807  *  \param [in] other - the mesh to compare with.
1808  *  \param [in] compType - specifies a cell comparison technique. For meaning of its
1809  *         valid values [0,1,2], see zipConnectivityTraducer().
1810  *  \param [out] arr - a new instance of DataArrayInt returning correspondence
1811  *         between cells of the two meshes. It contains \a other->getNumberOfCells()
1812  *         values. The caller is to delete this array using
1813  *         decrRef() as it is no more needed.
1814  *  \return bool - \c true if all cells of \a other mesh are present in the \a this
1815  *         mesh.
1816  *
1817  *  \if ENABLE_EXAMPLES
1818  *  \ref cpp_mcumesh_areCellsIncludedIn "Here is a C++ example".<br>
1819  *  \ref  py_mcumesh_areCellsIncludedIn "Here is a Python example".
1820  *  \endif
1821  *  \sa checkDeepEquivalOnSameNodesWith()
1822  *  \sa checkGeoEquivalWith()
1823  */
1824 bool MEDCouplingUMesh::areCellsIncludedIn(const MEDCouplingUMesh *other, int compType, DataArrayInt *& arr) const
1825 {
1826   MCAuto<MEDCouplingUMesh> mesh=MergeUMeshesOnSameCoords(this,other);
1827   int nbOfCells=getNumberOfCells();
1828   static const int possibleCompType[]={0,1,2};
1829   if(std::find(possibleCompType,possibleCompType+sizeof(possibleCompType)/sizeof(int),compType)==possibleCompType+sizeof(possibleCompType)/sizeof(int))
1830     {
1831       std::ostringstream oss; oss << "MEDCouplingUMesh::areCellsIncludedIn : only following policies are possible : ";
1832       std::copy(possibleCompType,possibleCompType+sizeof(possibleCompType)/sizeof(int),std::ostream_iterator<int>(oss," "));
1833       oss << " !";
1834       throw INTERP_KERNEL::Exception(oss.str());
1835     }
1836   MCAuto<DataArrayInt> o2n=mesh->zipConnectivityTraducer(compType,nbOfCells);
1837   arr=o2n->subArray(nbOfCells);
1838   arr->setName(other->getName());
1839   int tmp;
1840   if(other->getNumberOfCells()==0)
1841     return true;
1842   return arr->getMaxValue(tmp)<nbOfCells;
1843 }
1844
1845 /*!
1846  * This method makes the assumption that \a this and \a other share the same coords. If not an exception will be thrown !
1847  * This method tries to determine if \b other is fully included in \b this.
1848  * The main difference is that this method is not expected to throw exception.
1849  * This method has two outputs :
1850  *
1851  * \param other other mesh
1852  * \param arr is an output parameter that returns a \b newly created instance. This array is of size 'other->getNumberOfCells()'.
1853  * \return If \a other is fully included in 'this 'true is returned. If not false is returned.
1854  */
1855 bool MEDCouplingUMesh::areCellsIncludedInPolicy7(const MEDCouplingUMesh *other, DataArrayInt *& arr) const
1856 {
1857   MCAuto<MEDCouplingUMesh> mesh=MergeUMeshesOnSameCoords(this,other);
1858   DataArrayInt *commonCells=0,*commonCellsI=0;
1859   int thisNbCells=getNumberOfCells();
1860   mesh->findCommonCells(7,thisNbCells,commonCells,commonCellsI);
1861   MCAuto<DataArrayInt> commonCellsTmp(commonCells),commonCellsITmp(commonCellsI);
1862   const int *commonCellsPtr=commonCells->getConstPointer(),*commonCellsIPtr=commonCellsI->getConstPointer();
1863   int otherNbCells=other->getNumberOfCells();
1864   MCAuto<DataArrayInt> arr2=DataArrayInt::New();
1865   arr2->alloc(otherNbCells,1);
1866   arr2->fillWithZero();
1867   int *arr2Ptr=arr2->getPointer();
1868   int nbOfCommon=commonCellsI->getNumberOfTuples()-1;
1869   for(int i=0;i<nbOfCommon;i++)
1870     {
1871       int start=commonCellsPtr[commonCellsIPtr[i]];
1872       if(start<thisNbCells)
1873         {
1874           for(int j=commonCellsIPtr[i]+1;j!=commonCellsIPtr[i+1];j++)
1875             {
1876               int sig=commonCellsPtr[j]>0?1:-1;
1877               int val=std::abs(commonCellsPtr[j])-1;
1878               if(val>=thisNbCells)
1879                 arr2Ptr[val-thisNbCells]=sig*(start+1);
1880             }
1881         }
1882     }
1883   arr2->setName(other->getName());
1884   if(arr2->presenceOfValue(0))
1885     return false;
1886   arr=arr2.retn();
1887   return true;
1888 }
1889
1890 MEDCouplingUMesh *MEDCouplingUMesh::mergeMyselfWithOnSameCoords(const MEDCouplingPointSet *other) const
1891 {
1892   if(!other)
1893     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::mergeMyselfWithOnSameCoords : input other is null !");
1894   const MEDCouplingUMesh *otherC=dynamic_cast<const MEDCouplingUMesh *>(other);
1895   if(!otherC)
1896     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::mergeMyselfWithOnSameCoords : the input other mesh is not of type unstructured !");
1897   std::vector<const MEDCouplingUMesh *> ms(2);
1898   ms[0]=this;
1899   ms[1]=otherC;
1900   return MergeUMeshesOnSameCoords(ms);
1901 }
1902
1903 /*!
1904  * Build a sub part of \b this lying or not on the same coordinates than \b this (regarding value of \b keepCoords).
1905  * By default coordinates are kept. This method is close to MEDCouplingUMesh::buildPartOfMySelf except that here input
1906  * cellIds is not given explicitly but by a range python like.
1907  *
1908  * \param start
1909  * \param end
1910  * \param step
1911  * \param keepCoords that specifies if you want or not to keep coords as this or zip it (see MEDCoupling::MEDCouplingUMesh::zipCoords). If true zipCoords is \b NOT called, if false, zipCoords is called.
1912  * \return a newly allocated
1913  *
1914  * \warning This method modifies can generate an unstructured mesh whose cells are not sorted by geometric type order.
1915  * In view of the MED file writing, a renumbering of cells of returned unstructured mesh (using MEDCouplingUMesh::sortCellsInMEDFileFrmt) should be necessary.
1916  */
1917 MEDCouplingUMesh *MEDCouplingUMesh::buildPartOfMySelfSlice(int start, int end, int step, bool keepCoords) const
1918 {
1919   if(getMeshDimension()!=-1)
1920     return static_cast<MEDCouplingUMesh *>(MEDCouplingPointSet::buildPartOfMySelfSlice(start,end,step,keepCoords));
1921   else
1922     {
1923       int newNbOfCells=DataArray::GetNumberOfItemGivenBESRelative(start,end,step,"MEDCouplingUMesh::buildPartOfMySelfSlice for -1 dimension mesh ");
1924       if(newNbOfCells!=1)
1925         throw INTERP_KERNEL::Exception("-1D mesh has only one cell !");
1926       if(start!=0)
1927         throw INTERP_KERNEL::Exception("-1D mesh has only one cell : 0 !");
1928       incrRef();
1929       return const_cast<MEDCouplingUMesh *>(this);
1930     }
1931 }
1932
1933 /*!
1934  * Creates a new MEDCouplingUMesh containing specified cells of \a this mesh.
1935  * The result mesh shares or not the node coordinates array with \a this mesh depending
1936  * on \a keepCoords parameter.
1937  *  \warning Cells of the result mesh can be \b not sorted by geometric type, hence,
1938  *           to write this mesh to the MED file, its cells must be sorted using
1939  *           sortCellsInMEDFileFrmt().
1940  *  \param [in] begin - an array of cell ids to include to the new mesh.
1941  *  \param [in] end - a pointer to last-plus-one-th element of \a begin.
1942  *  \param [in] keepCoords - if \c true, the result mesh shares the node coordinates
1943  *         array of \a this mesh, else "free" nodes are removed from the result mesh
1944  *         by calling zipCoords().
1945  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingUMesh. The caller is
1946  *         to delete this mesh using decrRef() as it is no more needed.
1947  *  \throw If the coordinates array is not set.
1948  *  \throw If the nodal connectivity of cells is not defined.
1949  *  \throw If any cell id in the array \a begin is not valid.
1950  *
1951  *  \if ENABLE_EXAMPLES
1952  *  \ref cpp_mcumesh_buildPartOfMySelf "Here is a C++ example".<br>
1953  *  \ref  py_mcumesh_buildPartOfMySelf "Here is a Python example".
1954  *  \endif
1955  */
1956 MEDCouplingUMesh *MEDCouplingUMesh::buildPartOfMySelf(const int *begin, const int *end, bool keepCoords) const
1957 {
1958   if(getMeshDimension()!=-1)
1959     return static_cast<MEDCouplingUMesh *>(MEDCouplingPointSet::buildPartOfMySelf(begin,end,keepCoords));
1960   else
1961     {
1962       if(end-begin!=1)
1963         throw INTERP_KERNEL::Exception("-1D mesh has only one cell !");
1964       if(begin[0]!=0)
1965         throw INTERP_KERNEL::Exception("-1D mesh has only one cell : 0 !");
1966       incrRef();
1967       return const_cast<MEDCouplingUMesh *>(this);
1968     }
1969 }
1970
1971 /*!
1972  * This method operates only on nodal connectivity on \b this. Coordinates of \b this is completely ignored here.
1973  *
1974  * This method allows to partially modify some cells in \b this (whose list is specified by [ \b cellIdsBg, \b cellIdsEnd ) ) with cells coming in \b otherOnSameCoordsThanThis.
1975  * Size of [ \b cellIdsBg, \b cellIdsEnd ) ) must be equal to the number of cells of otherOnSameCoordsThanThis.
1976  * The number of cells of \b this will remain the same with this method.
1977  *
1978  * \param [in] cellIdsBg begin of cell ids (included) of cells in this to assign
1979  * \param [in] cellIdsEnd end of cell ids (excluded) of cells in this to assign
1980  * \param [in] otherOnSameCoordsThanThis an another mesh with same meshdimension than \b this with exactly the same number of cells than cell ids list in [\b cellIdsBg, \b cellIdsEnd ).
1981  *             Coordinate pointer of \b this and those of \b otherOnSameCoordsThanThis must be the same
1982  */
1983 void MEDCouplingUMesh::setPartOfMySelf(const int *cellIdsBg, const int *cellIdsEnd, const MEDCouplingUMesh& otherOnSameCoordsThanThis)
1984 {
1985   checkConnectivityFullyDefined();
1986   otherOnSameCoordsThanThis.checkConnectivityFullyDefined();
1987   if(getCoords()!=otherOnSameCoordsThanThis.getCoords())
1988     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::setPartOfMySelf : coordinates pointer are not the same ! Invoke setCoords or call tryToShareSameCoords method !");
1989   if(getMeshDimension()!=otherOnSameCoordsThanThis.getMeshDimension())
1990     {
1991       std::ostringstream oss; oss << "MEDCouplingUMesh::setPartOfMySelf : Mismatch of meshdimensions ! this is equal to " << getMeshDimension();
1992       oss << ", whereas other mesh dimension is set equal to " << otherOnSameCoordsThanThis.getMeshDimension() << " !";
1993       throw INTERP_KERNEL::Exception(oss.str());
1994     }
1995   std::size_t nbOfCellsToModify(std::distance(cellIdsBg,cellIdsEnd));
1996   if(nbOfCellsToModify!=otherOnSameCoordsThanThis.getNumberOfCells())
1997     {
1998       std::ostringstream oss; oss << "MEDCouplingUMesh::setPartOfMySelf : cells ids length (" <<  nbOfCellsToModify << ") do not match the number of cells of other mesh (" << otherOnSameCoordsThanThis.getNumberOfCells() << ") !";
1999       throw INTERP_KERNEL::Exception(oss.str());
2000     }
2001   std::size_t nbOfCells(getNumberOfCells());
2002   bool easyAssign(true);
2003   const int *connI(_nodal_connec_index->begin());
2004   const int *connIOther=otherOnSameCoordsThanThis._nodal_connec_index->begin();
2005   for(const int *it=cellIdsBg;it!=cellIdsEnd && easyAssign;it++,connIOther++)
2006     {
2007       if(*it>=0 && *it<(int)nbOfCells)
2008         {
2009           easyAssign=(connIOther[1]-connIOther[0])==(connI[*it+1]-connI[*it]);
2010         }
2011       else
2012         {
2013           std::ostringstream oss; oss << "MEDCouplingUMesh::setPartOfMySelf : On pos #" << std::distance(cellIdsBg,it) << " id is equal to " << *it << " which is not in [0," << nbOfCells << ") !";
2014           throw INTERP_KERNEL::Exception(oss.str());
2015         }
2016     }
2017   if(easyAssign)
2018     {
2019       MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx(cellIdsBg,cellIdsEnd,_nodal_connec,_nodal_connec_index,otherOnSameCoordsThanThis._nodal_connec,otherOnSameCoordsThanThis._nodal_connec_index);
2020       computeTypes();
2021     }
2022   else
2023     {
2024       DataArrayInt *arrOut=0,*arrIOut=0;
2025       MEDCouplingUMesh::SetPartOfIndexedArrays(cellIdsBg,cellIdsEnd,_nodal_connec,_nodal_connec_index,otherOnSameCoordsThanThis._nodal_connec,otherOnSameCoordsThanThis._nodal_connec_index,
2026                                                arrOut,arrIOut);
2027       MCAuto<DataArrayInt> arrOutAuto(arrOut),arrIOutAuto(arrIOut);
2028       setConnectivity(arrOut,arrIOut,true);
2029     }
2030 }
2031
2032 void MEDCouplingUMesh::setPartOfMySelfSlice(int start, int end, int step, const MEDCouplingUMesh& otherOnSameCoordsThanThis)
2033 {
2034   checkConnectivityFullyDefined();
2035   otherOnSameCoordsThanThis.checkConnectivityFullyDefined();
2036   if(getCoords()!=otherOnSameCoordsThanThis.getCoords())
2037     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::setPartOfMySelfSlice : coordinates pointer are not the same ! Invoke setCoords or call tryToShareSameCoords method !");
2038   if(getMeshDimension()!=otherOnSameCoordsThanThis.getMeshDimension())
2039     {
2040       std::ostringstream oss; oss << "MEDCouplingUMesh::setPartOfMySelfSlice : Mismatch of meshdimensions ! this is equal to " << getMeshDimension();
2041       oss << ", whereas other mesh dimension is set equal to " << otherOnSameCoordsThanThis.getMeshDimension() << " !";
2042       throw INTERP_KERNEL::Exception(oss.str());
2043     }
2044   int nbOfCellsToModify=DataArray::GetNumberOfItemGivenBESRelative(start,end,step,"MEDCouplingUMesh::setPartOfMySelfSlice : ");
2045   if(nbOfCellsToModify!=(int)otherOnSameCoordsThanThis.getNumberOfCells())
2046     {
2047       std::ostringstream oss; oss << "MEDCouplingUMesh::setPartOfMySelfSlice : cells ids length (" <<  nbOfCellsToModify << ") do not match the number of cells of other mesh (" << otherOnSameCoordsThanThis.getNumberOfCells() << ") !";
2048       throw INTERP_KERNEL::Exception(oss.str());
2049     }
2050   int nbOfCells=getNumberOfCells();
2051   bool easyAssign=true;
2052   const int *connI=_nodal_connec_index->getConstPointer();
2053   const int *connIOther=otherOnSameCoordsThanThis._nodal_connec_index->getConstPointer();
2054   int it=start;
2055   for(int i=0;i<nbOfCellsToModify && easyAssign;i++,it+=step,connIOther++)
2056     {
2057       if(it>=0 && it<nbOfCells)
2058         {
2059           easyAssign=(connIOther[1]-connIOther[0])==(connI[it+1]-connI[it]);
2060         }
2061       else
2062         {
2063           std::ostringstream oss; oss << "MEDCouplingUMesh::setPartOfMySelfSlice : On pos #" << i << " id is equal to " << it << " which is not in [0," << nbOfCells << ") !";
2064           throw INTERP_KERNEL::Exception(oss.str());
2065         }
2066     }
2067   if(easyAssign)
2068     {
2069       MEDCouplingUMesh::SetPartOfIndexedArraysSameIdxSlice(start,end,step,_nodal_connec,_nodal_connec_index,otherOnSameCoordsThanThis._nodal_connec,otherOnSameCoordsThanThis._nodal_connec_index);
2070       computeTypes();
2071     }
2072   else
2073     {
2074       DataArrayInt *arrOut=0,*arrIOut=0;
2075       MEDCouplingUMesh::SetPartOfIndexedArraysSlice(start,end,step,_nodal_connec,_nodal_connec_index,otherOnSameCoordsThanThis._nodal_connec,otherOnSameCoordsThanThis._nodal_connec_index,
2076                                                 arrOut,arrIOut);
2077       MCAuto<DataArrayInt> arrOutAuto(arrOut),arrIOutAuto(arrIOut);
2078       setConnectivity(arrOut,arrIOut,true);
2079     }
2080 }
2081
2082
2083 /*!
2084  * Creates a new MEDCouplingUMesh containing cells, of dimension one less than \a
2085  * this->getMeshDimension(), that bound some cells of \a this mesh.
2086  * The cells of lower dimension to include to the result mesh are selected basing on
2087  * specified node ids and the value of \a fullyIn parameter. If \a fullyIn ==\c true, a
2088  * cell is copied if its all nodes are in the array \a begin of node ids. If \a fullyIn
2089  * ==\c false, a cell is copied if any its node is in the array of node ids. The
2090  * created mesh shares the node coordinates array with \a this mesh.
2091  *  \param [in] begin - the array of node ids.
2092  *  \param [in] end - a pointer to the (last+1)-th element of \a begin.
2093  *  \param [in] fullyIn - if \c true, then cells whose all nodes are in the
2094  *         array \a begin are added, else cells whose any node is in the
2095  *         array \a begin are added.
2096  *  \return MEDCouplingUMesh * - new instance of MEDCouplingUMesh. The caller is
2097  *         to delete this mesh using decrRef() as it is no more needed.
2098  *  \throw If the coordinates array is not set.
2099  *  \throw If the nodal connectivity of cells is not defined.
2100  *  \throw If any node id in \a begin is not valid.
2101  *
2102  *  \if ENABLE_EXAMPLES
2103  *  \ref cpp_mcumesh_buildFacePartOfMySelfNode "Here is a C++ example".<br>
2104  *  \ref  py_mcumesh_buildFacePartOfMySelfNode "Here is a Python example".
2105  *  \endif
2106  */
2107 MEDCouplingUMesh *MEDCouplingUMesh::buildFacePartOfMySelfNode(const int *begin, const int *end, bool fullyIn) const
2108 {
2109   MCAuto<DataArrayInt> desc,descIndx,revDesc,revDescIndx;
2110   desc=DataArrayInt::New(); descIndx=DataArrayInt::New(); revDesc=DataArrayInt::New(); revDescIndx=DataArrayInt::New();
2111   MCAuto<MEDCouplingUMesh> subMesh=buildDescendingConnectivity(desc,descIndx,revDesc,revDescIndx);
2112   desc=0; descIndx=0; revDesc=0; revDescIndx=0;
2113   return static_cast<MEDCouplingUMesh*>(subMesh->buildPartOfMySelfNode(begin,end,fullyIn));
2114 }
2115
2116 /*!
2117  * Creates a new MEDCouplingUMesh containing cells, of dimension one less than \a
2118  * this->getMeshDimension(), which bound only one cell of \a this mesh.
2119  *  \param [in] keepCoords - if \c true, the result mesh shares the node coordinates
2120  *         array of \a this mesh, else "free" nodes are removed from the result mesh
2121  *         by calling zipCoords().
2122  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingUMesh. The caller is
2123  *         to delete this mesh using decrRef() as it is no more needed.
2124  *  \throw If the coordinates array is not set.
2125  *  \throw If the nodal connectivity of cells is not defined.
2126  *
2127  *  \if ENABLE_EXAMPLES
2128  *  \ref cpp_mcumesh_buildBoundaryMesh "Here is a C++ example".<br>
2129  *  \ref  py_mcumesh_buildBoundaryMesh "Here is a Python example".
2130  *  \endif
2131  */
2132 MEDCouplingUMesh *MEDCouplingUMesh::buildBoundaryMesh(bool keepCoords) const
2133 {
2134   DataArrayInt *desc=DataArrayInt::New();
2135   DataArrayInt *descIndx=DataArrayInt::New();
2136   DataArrayInt *revDesc=DataArrayInt::New();
2137   DataArrayInt *revDescIndx=DataArrayInt::New();
2138   //
2139   MCAuto<MEDCouplingUMesh> meshDM1=buildDescendingConnectivity(desc,descIndx,revDesc,revDescIndx);
2140   revDesc->decrRef();
2141   desc->decrRef();
2142   descIndx->decrRef();
2143   int nbOfCells=meshDM1->getNumberOfCells();
2144   const int *revDescIndxC=revDescIndx->getConstPointer();
2145   std::vector<int> boundaryCells;
2146   for(int i=0;i<nbOfCells;i++)
2147     if(revDescIndxC[i+1]-revDescIndxC[i]==1)
2148       boundaryCells.push_back(i);
2149   revDescIndx->decrRef();
2150   MEDCouplingUMesh *ret=meshDM1->buildPartOfMySelf(&boundaryCells[0],&boundaryCells[0]+boundaryCells.size(),keepCoords);
2151   return ret;
2152 }
2153
2154 /*!
2155  * This method returns a newly created DataArrayInt instance containing ids of cells located in boundary.
2156  * A cell is detected to be on boundary if it contains one or more than one face having only one father.
2157  * This method makes the assumption that \a this is fully defined (coords,connectivity). If not an exception will be thrown.
2158  */
2159 DataArrayInt *MEDCouplingUMesh::findCellIdsOnBoundary() const
2160 {
2161   checkFullyDefined();
2162   MCAuto<DataArrayInt> desc=DataArrayInt::New();
2163   MCAuto<DataArrayInt> descIndx=DataArrayInt::New();
2164   MCAuto<DataArrayInt> revDesc=DataArrayInt::New();
2165   MCAuto<DataArrayInt> revDescIndx=DataArrayInt::New();
2166   //
2167   buildDescendingConnectivity(desc,descIndx,revDesc,revDescIndx)->decrRef();
2168   desc=(DataArrayInt*)0; descIndx=(DataArrayInt*)0;
2169   //
2170   MCAuto<DataArrayInt> tmp=revDescIndx->deltaShiftIndex();
2171   MCAuto<DataArrayInt> faceIds=tmp->findIdsEqual(1); tmp=(DataArrayInt*)0;
2172   const int *revDescPtr=revDesc->getConstPointer();
2173   const int *revDescIndxPtr=revDescIndx->getConstPointer();
2174   int nbOfCells=getNumberOfCells();
2175   std::vector<bool> ret1(nbOfCells,false);
2176   int sz=0;
2177   for(const int *pt=faceIds->begin();pt!=faceIds->end();pt++)
2178     if(!ret1[revDescPtr[revDescIndxPtr[*pt]]])
2179       { ret1[revDescPtr[revDescIndxPtr[*pt]]]=true; sz++; }
2180   //
2181   DataArrayInt *ret2=DataArrayInt::New();
2182   ret2->alloc(sz,1);
2183   int *ret2Ptr=ret2->getPointer();
2184   sz=0;
2185   for(std::vector<bool>::const_iterator it=ret1.begin();it!=ret1.end();it++,sz++)
2186     if(*it)
2187       *ret2Ptr++=sz;
2188   ret2->setName("BoundaryCells");
2189   return ret2;
2190 }
2191
2192 /*!
2193  * This method finds in \b this the cell ids that lie on mesh \b otherDimM1OnSameCoords.
2194  * \b this and \b otherDimM1OnSameCoords have to lie on the same coordinate array pointer. The coherency of that coords array with connectivity
2195  * of \b this and \b otherDimM1OnSameCoords is not important here because this method works only on connectivity.
2196  * this->getMeshDimension() - 1 must be equal to otherDimM1OnSameCoords.getMeshDimension()
2197  *
2198  * s0 is the cell ids set in \b this lying on at least one node in the fetched nodes in \b otherDimM1OnSameCoords.
2199  * This method also returns the cells ids set s1 which contains the cell ids in \b this for which one of the dim-1 constituent
2200  * equals a cell in \b otherDimM1OnSameCoords.
2201  *
2202  * \throw if \b otherDimM1OnSameCoords is not part of constituent of \b this, or if coordinate pointer of \b this and \b otherDimM1OnSameCoords
2203  *        are not same, or if this->getMeshDimension()-1!=otherDimM1OnSameCoords.getMeshDimension()
2204  *
2205  * \param [in] otherDimM1OnSameCoords
2206  * \param [out] cellIdsRk0 a newly allocated array containing the cell ids of s0 (which are cell ids of \b this) in the above algorithm.
2207  * \param [out] cellIdsRk1 a newly allocated array containing the cell ids of s1 \b indexed into the \b cellIdsRk0 subset. To get the absolute ids of s1, simply invoke
2208  *              cellIdsRk1->transformWithIndArr(cellIdsRk0->begin(),cellIdsRk0->end());
2209  */
2210 void MEDCouplingUMesh::findCellIdsLyingOn(const MEDCouplingUMesh& otherDimM1OnSameCoords, DataArrayInt *&cellIdsRk0, DataArrayInt *&cellIdsRk1) const
2211 {
2212   if(getCoords()!=otherDimM1OnSameCoords.getCoords())
2213     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::findCellIdsLyingOn : coordinates pointer are not the same ! Use tryToShareSameCoords method !");
2214   checkConnectivityFullyDefined();
2215   otherDimM1OnSameCoords.checkConnectivityFullyDefined();
2216   if(getMeshDimension()-1!=otherDimM1OnSameCoords.getMeshDimension())
2217     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::findCellIdsLyingOn : invalid mesh dimension of input mesh regarding meshdimesion of this !");
2218   MCAuto<DataArrayInt> fetchedNodeIds1=otherDimM1OnSameCoords.computeFetchedNodeIds();
2219   MCAuto<DataArrayInt> s0arr=getCellIdsLyingOnNodes(fetchedNodeIds1->begin(),fetchedNodeIds1->end(),false);
2220   MCAuto<MEDCouplingUMesh> thisPart=static_cast<MEDCouplingUMesh *>(buildPartOfMySelf(s0arr->begin(),s0arr->end(),true));
2221   MCAuto<DataArrayInt> descThisPart=DataArrayInt::New(),descIThisPart=DataArrayInt::New(),revDescThisPart=DataArrayInt::New(),revDescIThisPart=DataArrayInt::New();
2222   MCAuto<MEDCouplingUMesh> thisPartConsti=thisPart->buildDescendingConnectivity(descThisPart,descIThisPart,revDescThisPart,revDescIThisPart);
2223   const int *revDescThisPartPtr=revDescThisPart->getConstPointer(),*revDescIThisPartPtr=revDescIThisPart->getConstPointer();
2224   DataArrayInt *idsOtherInConsti=0;
2225   bool b=thisPartConsti->areCellsIncludedIn(&otherDimM1OnSameCoords,2,idsOtherInConsti);
2226   MCAuto<DataArrayInt> idsOtherInConstiAuto(idsOtherInConsti);
2227   if(!b)
2228     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::findCellIdsLyingOn : the given mdim-1 mesh in other is not a constituent of this !");
2229   std::set<int> s1;
2230   for(const int *idOther=idsOtherInConsti->begin();idOther!=idsOtherInConsti->end();idOther++)
2231     s1.insert(revDescThisPartPtr+revDescIThisPartPtr[*idOther],revDescThisPartPtr+revDescIThisPartPtr[*idOther+1]);
2232   MCAuto<DataArrayInt> s1arr_renum1=DataArrayInt::New(); s1arr_renum1->alloc((int)s1.size(),1); std::copy(s1.begin(),s1.end(),s1arr_renum1->getPointer());
2233   s1arr_renum1->sort();
2234   cellIdsRk0=s0arr.retn();
2235   //cellIdsRk1=s_renum1.retn();
2236   cellIdsRk1=s1arr_renum1.retn();
2237 }
2238
2239 /*!
2240  * This method computes the skin of \b this. That is to say the consituting meshdim-1 mesh is built and only the boundary subpart is
2241  * returned. This subpart of meshdim-1 mesh is built using meshdim-1 cells in it shared only one cell in \b this.
2242  *
2243  * \return a newly allocated mesh lying on the same coordinates than \b this. The caller has to deal with returned mesh.
2244  */
2245 MEDCouplingUMesh *MEDCouplingUMesh::computeSkin() const
2246 {
2247   MCAuto<DataArrayInt> desc=DataArrayInt::New();
2248   MCAuto<DataArrayInt> descIndx=DataArrayInt::New();
2249   MCAuto<DataArrayInt> revDesc=DataArrayInt::New();
2250   MCAuto<DataArrayInt> revDescIndx=DataArrayInt::New();
2251   //
2252   MCAuto<MEDCouplingUMesh> meshDM1=buildDescendingConnectivity(desc,descIndx,revDesc,revDescIndx);
2253   revDesc=0; desc=0; descIndx=0;
2254   MCAuto<DataArrayInt> revDescIndx2=revDescIndx->deltaShiftIndex();
2255   MCAuto<DataArrayInt> part=revDescIndx2->findIdsEqual(1);
2256   return static_cast<MEDCouplingUMesh *>(meshDM1->buildPartOfMySelf(part->begin(),part->end(),true));
2257 }
2258
2259 /*!
2260  * Finds nodes lying on the boundary of \a this mesh.
2261  *  \return DataArrayInt * - a new instance of DataArrayInt holding ids of found
2262  *          nodes. The caller is to delete this array using decrRef() as it is no
2263  *          more needed.
2264  *  \throw If the coordinates array is not set.
2265  *  \throw If the nodal connectivity of cells is node defined.
2266  *
2267  *  \if ENABLE_EXAMPLES
2268  *  \ref cpp_mcumesh_findBoundaryNodes "Here is a C++ example".<br>
2269  *  \ref  py_mcumesh_findBoundaryNodes "Here is a Python example".
2270  *  \endif
2271  */
2272 DataArrayInt *MEDCouplingUMesh::findBoundaryNodes() const
2273 {
2274   MCAuto<MEDCouplingUMesh> skin=computeSkin();
2275   return skin->computeFetchedNodeIds();
2276 }
2277
2278 MEDCouplingUMesh *MEDCouplingUMesh::buildUnstructured() const
2279 {
2280   incrRef();
2281   return const_cast<MEDCouplingUMesh *>(this);
2282 }
2283
2284 /*!
2285  * This method expects that \b this and \b otherDimM1OnSameCoords share the same coordinates array.
2286  * otherDimM1OnSameCoords->getMeshDimension() is expected to be equal to this->getMeshDimension()-1.
2287  * This method searches for nodes needed to be duplicated. These nodes are nodes fetched by \b otherDimM1OnSameCoords which are not part of the boundary of \b otherDimM1OnSameCoords.
2288  * If a node is in the boundary of \b this \b and in the boundary of \b otherDimM1OnSameCoords this node is considered as needed to be duplicated.
2289  * When the set of node ids \b nodeIdsToDuplicate is computed, cell ids in \b this is searched so that their connectivity includes at least 1 node in \b nodeIdsToDuplicate.
2290  *
2291  * \param [in] otherDimM1OnSameCoords a mesh lying on the same coords than \b this and with a mesh dimension equal to those of \b this minus 1. WARNING this input
2292  *             parameter is altered during the call.
2293  * \param [out] nodeIdsToDuplicate node ids needed to be duplicated following the algorithm explain above.
2294  * \param [out] cellIdsNeededToBeRenum cell ids in \b this in which the renumber of nodes should be performed.
2295  * \param [out] cellIdsNotModified cell ids int \b this that lies on \b otherDimM1OnSameCoords mesh whose connectivity do \b not need to be modified as it is the case for \b cellIdsNeededToBeRenum.
2296  *
2297  * \warning This method modifies param \b otherDimM1OnSameCoords (for speed reasons).
2298  */
2299 void MEDCouplingUMesh::findNodesToDuplicate(const MEDCouplingUMesh& otherDimM1OnSameCoords, DataArrayInt *& nodeIdsToDuplicate,
2300                                             DataArrayInt *& cellIdsNeededToBeRenum, DataArrayInt *& cellIdsNotModified) const
2301 {
2302   typedef MCAuto<DataArrayInt> DAInt;
2303   typedef MCAuto<MEDCouplingUMesh> MCUMesh;
2304
2305   checkFullyDefined();
2306   otherDimM1OnSameCoords.checkFullyDefined();
2307   if(getCoords()!=otherDimM1OnSameCoords.getCoords())
2308     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::findNodesToDuplicate : meshes do not share the same coords array !");
2309   if(otherDimM1OnSameCoords.getMeshDimension()!=getMeshDimension()-1)
2310     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::findNodesToDuplicate : the mesh given in other parameter must have this->getMeshDimension()-1 !");
2311
2312   // Checking star-shaped M1 group:
2313   DAInt dt0=DataArrayInt::New(),dit0=DataArrayInt::New(),rdt0=DataArrayInt::New(),rdit0=DataArrayInt::New();
2314   MCUMesh meshM2 = otherDimM1OnSameCoords.buildDescendingConnectivity(dt0, dit0, rdt0, rdit0);
2315   DAInt dsi = rdit0->deltaShiftIndex();
2316   DAInt idsTmp0 = dsi->findIdsNotInRange(-1, 3);
2317   if(idsTmp0->getNumberOfTuples())
2318     throw INTERP_KERNEL::Exception("MEDFileUMesh::buildInnerBoundaryAlongM1Group: group is too complex: some points (or edges) have more than two connected segments (or faces)!");
2319   dt0=0; dit0=0; rdt0=0; rdit0=0; idsTmp0=0;
2320
2321   // Get extreme nodes from the group (they won't be duplicated), ie nodes belonging to boundary cells of M1
2322   DAInt xtremIdsM2 = dsi->findIdsEqual(1); dsi = 0;
2323   MCUMesh meshM2Part = static_cast<MEDCouplingUMesh *>(meshM2->buildPartOfMySelf(xtremIdsM2->begin(), xtremIdsM2->end(),true));
2324   DAInt xtrem = meshM2Part->computeFetchedNodeIds();
2325   // Remove from the list points on the boundary of the M0 mesh (those need duplication!)
2326   dt0=DataArrayInt::New(),dit0=DataArrayInt::New(),rdt0=DataArrayInt::New(),rdit0=DataArrayInt::New();
2327   MCUMesh m0desc = buildDescendingConnectivity(dt0, dit0, rdt0, rdit0); dt0=0; dit0=0; rdt0=0;
2328   dsi = rdit0->deltaShiftIndex();
2329   DAInt boundSegs = dsi->findIdsEqual(1);   // boundary segs/faces of the M0 mesh
2330   MCUMesh m0descSkin = static_cast<MEDCouplingUMesh *>(m0desc->buildPartOfMySelf(boundSegs->begin(),boundSegs->end(), true));
2331   DAInt fNodes = m0descSkin->computeFetchedNodeIds();
2332   // In 3D, some points on the boundary of M0 still need duplication:
2333   DAInt notDup = 0;
2334   if (getMeshDimension() == 3)
2335     {
2336       DAInt dnu1=DataArrayInt::New(), dnu2=DataArrayInt::New(), dnu3=DataArrayInt::New(), dnu4=DataArrayInt::New();
2337       MCUMesh m0descSkinDesc = m0descSkin->buildDescendingConnectivity(dnu1, dnu2, dnu3, dnu4);
2338       dnu1=0;dnu2=0;dnu3=0;dnu4=0;
2339       DataArrayInt * corresp=0;
2340       meshM2->areCellsIncludedIn(m0descSkinDesc,2,corresp);
2341       DAInt validIds = corresp->findIdsInRange(0, meshM2->getNumberOfCells());
2342       corresp->decrRef();
2343       if (validIds->getNumberOfTuples())
2344         {
2345           MCUMesh m1IntersecSkin = static_cast<MEDCouplingUMesh *>(m0descSkinDesc->buildPartOfMySelf(validIds->begin(), validIds->end(), true));
2346           DAInt notDuplSkin = m1IntersecSkin->findBoundaryNodes();
2347           DAInt fNodes1 = fNodes->buildSubstraction(notDuplSkin);
2348           notDup = xtrem->buildSubstraction(fNodes1);
2349         }
2350       else
2351         notDup = xtrem->buildSubstraction(fNodes);
2352     }
2353   else
2354     notDup = xtrem->buildSubstraction(fNodes);
2355
2356   // Now compute cells around group (i.e. cells where we will do the propagation to identify the two sub-sets delimited by the group)
2357   DAInt m1Nodes = otherDimM1OnSameCoords.computeFetchedNodeIds();
2358   DAInt dupl = m1Nodes->buildSubstraction(notDup);
2359   DAInt cellsAroundGroup = getCellIdsLyingOnNodes(dupl->begin(), dupl->end(), false);  // false= take cell in, even if not all nodes are in notDup
2360
2361   //
2362   MCUMesh m0Part2=static_cast<MEDCouplingUMesh *>(buildPartOfMySelf(cellsAroundGroup->begin(),cellsAroundGroup->end(),true));
2363   int nCells2 = m0Part2->getNumberOfCells();
2364   DAInt desc00=DataArrayInt::New(),descI00=DataArrayInt::New(),revDesc00=DataArrayInt::New(),revDescI00=DataArrayInt::New();
2365   MCUMesh m01=m0Part2->buildDescendingConnectivity(desc00,descI00,revDesc00,revDescI00);
2366
2367   // Neighbor information of the mesh without considering the crack (serves to count how many connex pieces it is made of)
2368   DataArrayInt *tmp00=0,*tmp11=0;
2369   MEDCouplingUMesh::ComputeNeighborsOfCellsAdv(desc00,descI00,revDesc00,revDescI00, tmp00, tmp11);
2370   DAInt neighInit00(tmp00);
2371   DAInt neighIInit00(tmp11);
2372   // Neighbor information of the mesh WITH the crack (some neighbors are removed):
2373   DataArrayInt *idsTmp=0;
2374   m01->areCellsIncludedIn(&otherDimM1OnSameCoords,2,idsTmp);
2375   DAInt ids(idsTmp);
2376   // In the neighbor information remove the connection between high dimension cells and its low level constituents which are part
2377   // of the frontier given in parameter (i.e. the cells of low dimension from the group delimiting the crack):
2378   MEDCouplingUMesh::RemoveIdsFromIndexedArrays(ids->begin(),ids->end(),desc00,descI00);
2379   DataArrayInt *tmp0=0,*tmp1=0;
2380   // Compute the neighbor of each cell in m0Part2, taking into account the broken link above. Two
2381   // cells on either side of the crack (defined by the mesh of low dimension) are not neighbor anymore.
2382   ComputeNeighborsOfCellsAdv(desc00,descI00,revDesc00,revDescI00,tmp0,tmp1);
2383   DAInt neigh00(tmp0);
2384   DAInt neighI00(tmp1);
2385
2386   // For each initial connex part of the sub-mesh (or said differently for each independent crack):
2387   int seed = 0, nIter = 0;
2388   int nIterMax = nCells2+1; // Safety net for the loop
2389   DAInt hitCells = DataArrayInt::New(); hitCells->alloc(nCells2);
2390   hitCells->fillWithValue(-1);
2391   DAInt cellsToModifyConn0_torenum = DataArrayInt::New();
2392   cellsToModifyConn0_torenum->alloc(0,1);
2393   while (nIter < nIterMax)
2394     {
2395       DAInt t = hitCells->findIdsEqual(-1);
2396       if (!t->getNumberOfTuples())
2397         break;
2398       // Connex zone without the crack (to compute the next seed really)
2399       int dnu;
2400       DAInt connexCheck = MEDCouplingUMesh::ComputeSpreadZoneGraduallyFromSeed(&seed, &seed+1, neighInit00,neighIInit00, -1, dnu);
2401       std::size_t cnt(0);
2402       for (int * ptr = connexCheck->getPointer(); cnt < connexCheck->getNumberOfTuples(); ptr++, cnt++)
2403         hitCells->setIJ(*ptr,0,1);
2404       // Connex zone WITH the crack (to identify cells lying on either part of the crack)
2405       DAInt spreadZone = MEDCouplingUMesh::ComputeSpreadZoneGraduallyFromSeed(&seed, &seed+1, neigh00,neighI00, -1, dnu);
2406       cellsToModifyConn0_torenum = DataArrayInt::Aggregate(cellsToModifyConn0_torenum, spreadZone, 0);
2407       // Compute next seed, i.e. a cell in another connex part, which was not covered by the previous iterations
2408       DAInt comple = cellsToModifyConn0_torenum->buildComplement(nCells2);
2409       DAInt nonHitCells = hitCells->findIdsEqual(-1);
2410       DAInt intersec = nonHitCells->buildIntersection(comple);
2411       if (intersec->getNumberOfTuples())
2412         { seed = intersec->getIJ(0,0); }
2413       else
2414         { break; }
2415       nIter++;
2416     }
2417   if (nIter >= nIterMax)
2418     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::findNodesToDuplicate(): internal error - too many iterations.");
2419
2420   DAInt cellsToModifyConn1_torenum=cellsToModifyConn0_torenum->buildComplement(neighI00->getNumberOfTuples()-1);
2421   cellsToModifyConn0_torenum->transformWithIndArr(cellsAroundGroup->begin(),cellsAroundGroup->end());
2422   cellsToModifyConn1_torenum->transformWithIndArr(cellsAroundGroup->begin(),cellsAroundGroup->end());
2423   //
2424   cellIdsNeededToBeRenum=cellsToModifyConn0_torenum.retn();
2425   cellIdsNotModified=cellsToModifyConn1_torenum.retn();
2426   nodeIdsToDuplicate=dupl.retn();
2427 }
2428
2429 /*!
2430  * This method operates a modification of the connectivity and coords in \b this.
2431  * Every time that a node id in [ \b nodeIdsToDuplicateBg, \b nodeIdsToDuplicateEnd ) will append in nodal connectivity of \b this
2432  * its ids will be modified to id this->getNumberOfNodes()+std::distance(nodeIdsToDuplicateBg,std::find(nodeIdsToDuplicateBg,nodeIdsToDuplicateEnd,id)).
2433  * More explicitly the renumber array in nodes is not explicitly given in old2new to avoid to build a big array of renumbering whereas typically few node ids needs to be
2434  * renumbered. The node id nodeIdsToDuplicateBg[0] will have id this->getNumberOfNodes()+0, node id nodeIdsToDuplicateBg[1] will have id this->getNumberOfNodes()+1,
2435  * node id nodeIdsToDuplicateBg[2] will have id this->getNumberOfNodes()+2...
2436  *
2437  * As a consequence nodal connectivity array length will remain unchanged by this method, and nodal connectivity index array will remain unchanged by this method.
2438  *
2439  * \param [in] nodeIdsToDuplicateBg begin of node ids (included) to be duplicated in connectivity only
2440  * \param [in] nodeIdsToDuplicateEnd end of node ids (excluded) to be duplicated in connectivity only
2441  */
2442 void MEDCouplingUMesh::duplicateNodes(const int *nodeIdsToDuplicateBg, const int *nodeIdsToDuplicateEnd)
2443 {
2444   int nbOfNodes=getNumberOfNodes();
2445   duplicateNodesInCoords(nodeIdsToDuplicateBg,nodeIdsToDuplicateEnd);
2446   duplicateNodesInConn(nodeIdsToDuplicateBg,nodeIdsToDuplicateEnd,nbOfNodes);
2447 }
2448
2449 /*!
2450  * This method renumbers only nodal connectivity in \a this. The renumbering is only an offset applied. So this method is a specialization of
2451  * \a renumberNodesInConn. \b WARNING, this method does not check that the resulting node ids in the nodal connectivity is in a valid range !
2452  *
2453  * \param [in] offset - specifies the offset to be applied on each element of connectivity.
2454  *
2455  * \sa renumberNodesInConn
2456  */
2457 void MEDCouplingUMesh::renumberNodesWithOffsetInConn(int offset)
2458 {
2459   checkConnectivityFullyDefined();
2460   int *conn(getNodalConnectivity()->getPointer());
2461   const int *connIndex(getNodalConnectivityIndex()->getConstPointer());
2462   int nbOfCells(getNumberOfCells());
2463   for(int i=0;i<nbOfCells;i++)
2464     for(int iconn=connIndex[i]+1;iconn!=connIndex[i+1];iconn++)
2465       {
2466         int& node=conn[iconn];
2467         if(node>=0)//avoid polyhedron separator
2468           {
2469             node+=offset;
2470           }
2471       }
2472   _nodal_connec->declareAsNew();
2473   updateTime();
2474 }
2475
2476 /*!
2477  *  Same than renumberNodesInConn(const int *) except that here the format of old-to-new traducer is using map instead
2478  *  of array. This method is dedicated for renumbering from a big set of nodes the a tiny set of nodes which is the case during extraction
2479  *  of a big mesh.
2480  */
2481 void MEDCouplingUMesh::renumberNodesInConn(const INTERP_KERNEL::HashMap<int,int>& newNodeNumbersO2N)
2482 {
2483   this->renumberNodesInConnT< INTERP_KERNEL::HashMap<int,int> >(newNodeNumbersO2N);
2484 }
2485
2486 /*!
2487  *  Same than renumberNodesInConn(const int *) except that here the format of old-to-new traducer is using map instead
2488  *  of array. This method is dedicated for renumbering from a big set of nodes the a tiny set of nodes which is the case during extraction
2489  *  of a big mesh.
2490  */
2491 void MEDCouplingUMesh::renumberNodesInConn(const std::map<int,int>& newNodeNumbersO2N)
2492 {
2493   this->renumberNodesInConnT< std::map<int,int> >(newNodeNumbersO2N);
2494 }
2495
2496 /*!
2497  * Changes ids of nodes within the nodal connectivity arrays according to a permutation
2498  * array in "Old to New" mode. The node coordinates array is \b not changed by this method.
2499  * This method is a generalization of shiftNodeNumbersInConn().
2500  *  \warning This method performs no check of validity of new ids. **Use it with care !**
2501  *  \param [in] newNodeNumbersO2N - a permutation array, of length \a
2502  *         this->getNumberOfNodes(), in "Old to New" mode.
2503  *         See \ref numbering for more info on renumbering modes.
2504  *  \throw If the nodal connectivity of cells is not defined.
2505  *
2506  *  \if ENABLE_EXAMPLES
2507  *  \ref cpp_mcumesh_renumberNodesInConn "Here is a C++ example".<br>
2508  *  \ref  py_mcumesh_renumberNodesInConn "Here is a Python example".
2509  *  \endif
2510  */
2511 void MEDCouplingUMesh::renumberNodesInConn(const int *newNodeNumbersO2N)
2512 {
2513   checkConnectivityFullyDefined();
2514   int *conn=getNodalConnectivity()->getPointer();
2515   const int *connIndex=getNodalConnectivityIndex()->getConstPointer();
2516   int nbOfCells(getNumberOfCells());
2517   for(int i=0;i<nbOfCells;i++)
2518     for(int iconn=connIndex[i]+1;iconn!=connIndex[i+1];iconn++)
2519       {
2520         int& node=conn[iconn];
2521         if(node>=0)//avoid polyhedron separator
2522           {
2523             node=newNodeNumbersO2N[node];
2524           }
2525       }
2526   _nodal_connec->declareAsNew();
2527   updateTime();
2528 }
2529
2530 /*!
2531  * This method renumbers nodes \b in \b connectivity \b only \b without \b any \b reference \b to \b coords.
2532  * This method performs no check on the fact that new coordinate ids are valid. \b Use \b it \b with \b care !
2533  * This method is an specialization of \ref MEDCoupling::MEDCouplingUMesh::renumberNodesInConn "renumberNodesInConn method".
2534  *
2535  * \param [in] delta specifies the shift size applied to nodeId in nodal connectivity in \b this.
2536  */
2537 void MEDCouplingUMesh::shiftNodeNumbersInConn(int delta)
2538 {
2539   checkConnectivityFullyDefined();
2540   int *conn=getNodalConnectivity()->getPointer();
2541   const int *connIndex=getNodalConnectivityIndex()->getConstPointer();
2542   int nbOfCells=getNumberOfCells();
2543   for(int i=0;i<nbOfCells;i++)
2544     for(int iconn=connIndex[i]+1;iconn!=connIndex[i+1];iconn++)
2545       {
2546         int& node=conn[iconn];
2547         if(node>=0)//avoid polyhedron separator
2548           {
2549             node+=delta;
2550           }
2551       }
2552   _nodal_connec->declareAsNew();
2553   updateTime();
2554 }
2555
2556 /*!
2557  * This method operates a modification of the connectivity in \b this.
2558  * Coordinates are \b NOT considered here and will remain unchanged by this method. this->_coords can ever been null for the needs of this method.
2559  * Every time that a node id in [ \b nodeIdsToDuplicateBg, \b nodeIdsToDuplicateEnd ) will append in nodal connectivity of \b this
2560  * its ids will be modified to id offset+std::distance(nodeIdsToDuplicateBg,std::find(nodeIdsToDuplicateBg,nodeIdsToDuplicateEnd,id)).
2561  * More explicitly the renumber array in nodes is not explicitly given in old2new to avoid to build a big array of renumbering whereas typically few node ids needs to be
2562  * renumbered. The node id nodeIdsToDuplicateBg[0] will have id offset+0, node id nodeIdsToDuplicateBg[1] will have id offset+1,
2563  * node id nodeIdsToDuplicateBg[2] will have id offset+2...
2564  *
2565  * As a consequence nodal connectivity array length will remain unchanged by this method, and nodal connectivity index array will remain unchanged by this method.
2566  * As an another consequense after the call of this method \b this can be transiently non cohrent.
2567  *
2568  * \param [in] nodeIdsToDuplicateBg begin of node ids (included) to be duplicated in connectivity only
2569  * \param [in] nodeIdsToDuplicateEnd end of node ids (excluded) to be duplicated in connectivity only
2570  * \param [in] offset the offset applied to all node ids in connectivity that are in [ \a nodeIdsToDuplicateBg, \a nodeIdsToDuplicateEnd ).
2571  */
2572 void MEDCouplingUMesh::duplicateNodesInConn(const int *nodeIdsToDuplicateBg, const int *nodeIdsToDuplicateEnd, int offset)
2573 {
2574   checkConnectivityFullyDefined();
2575   std::map<int,int> m;
2576   int val=offset;
2577   for(const int *work=nodeIdsToDuplicateBg;work!=nodeIdsToDuplicateEnd;work++,val++)
2578     m[*work]=val;
2579   int *conn=getNodalConnectivity()->getPointer();
2580   const int *connIndex=getNodalConnectivityIndex()->getConstPointer();
2581   int nbOfCells=getNumberOfCells();
2582   for(int i=0;i<nbOfCells;i++)
2583     for(int iconn=connIndex[i]+1;iconn!=connIndex[i+1];iconn++)
2584       {
2585         int& node=conn[iconn];
2586         if(node>=0)//avoid polyhedron separator
2587           {
2588             std::map<int,int>::iterator it=m.find(node);
2589             if(it!=m.end())
2590               node=(*it).second;
2591           }
2592       }
2593   updateTime();
2594 }
2595
2596 /*!
2597  * This method renumbers cells of \a this using the array specified by [old2NewBg;old2NewBg+getNumberOfCells())
2598  *
2599  * Contrary to MEDCouplingPointSet::renumberNodes, this method makes a permutation without any fuse of cell.
2600  * After the call of this method the number of cells remains the same as before.
2601  *
2602  * If 'check' equals true the method will check that any elements in [ \a old2NewBg; \a old2NewEnd ) is unique ; if not
2603  * an INTERP_KERNEL::Exception will be thrown. When 'check' equals true [ \a old2NewBg ; \a old2NewEnd ) is not expected to
2604  * be strictly in [0;this->getNumberOfCells()).
2605  *
2606  * If 'check' equals false the method will not check the content of [ \a old2NewBg ; \a old2NewEnd ).
2607  * To avoid any throw of SIGSEGV when 'check' equals false, the elements in [ \a old2NewBg ; \a old2NewEnd ) should be unique and
2608  * should be contained in[0;this->getNumberOfCells()).
2609  *
2610  * \param [in] old2NewBg is expected to be a dynamically allocated pointer of size at least equal to this->getNumberOfCells()
2611  * \param check
2612  */
2613 void MEDCouplingUMesh::renumberCells(const int *old2NewBg, bool check)
2614 {
2615   checkConnectivityFullyDefined();
2616   int nbCells=getNumberOfCells();
2617   const int *array=old2NewBg;
2618   if(check)
2619     array=DataArrayInt::CheckAndPreparePermutation(old2NewBg,old2NewBg+nbCells);
2620   //
2621   const int *conn=_nodal_connec->getConstPointer();
2622   const int *connI=_nodal_connec_index->getConstPointer();
2623   MCAuto<DataArrayInt> o2n=DataArrayInt::New(); o2n->useArray(array,false,DeallocType::C_DEALLOC,nbCells,1);
2624   MCAuto<DataArrayInt> n2o=o2n->invertArrayO2N2N2O(nbCells);
2625   const int *n2oPtr=n2o->begin();
2626   MCAuto<DataArrayInt> newConn=DataArrayInt::New();
2627   newConn->alloc(_nodal_connec->getNumberOfTuples(),_nodal_connec->getNumberOfComponents());
2628   newConn->copyStringInfoFrom(*_nodal_connec);
2629   MCAuto<DataArrayInt> newConnI=DataArrayInt::New();
2630   newConnI->alloc(_nodal_connec_index->getNumberOfTuples(),_nodal_connec_index->getNumberOfComponents());
2631   newConnI->copyStringInfoFrom(*_nodal_connec_index);
2632   //
2633   int *newC=newConn->getPointer();
2634   int *newCI=newConnI->getPointer();
2635   int loc=0;
2636   newCI[0]=loc;
2637   for(int i=0;i<nbCells;i++)
2638     {
2639       int pos=n2oPtr[i];
2640       int nbOfElts=connI[pos+1]-connI[pos];
2641       newC=std::copy(conn+connI[pos],conn+connI[pos+1],newC);
2642       loc+=nbOfElts;
2643       newCI[i+1]=loc;
2644     }
2645   //
2646   setConnectivity(newConn,newConnI);
2647   if(check)
2648     free(const_cast<int *>(array));
2649 }
2650
2651 /*!
2652  * Finds cells whose bounding boxes intersect a given bounding box.
2653  *  \param [in] bbox - an array defining the bounding box via coordinates of its
2654  *         extremum points in "no interlace" mode, i.e. xMin, xMax, yMin, yMax, zMin,
2655  *         zMax (if in 3D).
2656  *  \param [in] eps - a factor used to increase size of the bounding box of cell
2657  *         before comparing it with \a bbox. This factor is multiplied by the maximal
2658  *         extent of the bounding box of cell to produce an addition to this bounding box.
2659  *  \return DataArrayInt * - a new instance of DataArrayInt holding ids for found
2660  *         cells. The caller is to delete this array using decrRef() as it is no more
2661  *         needed.
2662  *  \throw If the coordinates array is not set.
2663  *  \throw If the nodal connectivity of cells is not defined.
2664  *
2665  *  \if ENABLE_EXAMPLES
2666  *  \ref cpp_mcumesh_getCellsInBoundingBox "Here is a C++ example".<br>
2667  *  \ref  py_mcumesh_getCellsInBoundingBox "Here is a Python example".
2668  *  \endif
2669  */
2670 DataArrayInt *MEDCouplingUMesh::getCellsInBoundingBox(const double *bbox, double eps) const
2671 {
2672   MCAuto<DataArrayInt> elems=DataArrayInt::New(); elems->alloc(0,1);
2673   if(getMeshDimension()==-1)
2674     {
2675       elems->pushBackSilent(0);
2676       return elems.retn();
2677     }
2678   int dim=getSpaceDimension();
2679   INTERP_KERNEL::AutoPtr<double> elem_bb=new double[2*dim];
2680   const int* conn      = getNodalConnectivity()->getConstPointer();
2681   const int* conn_index= getNodalConnectivityIndex()->getConstPointer();
2682   const double* coords = getCoords()->getConstPointer();
2683   int nbOfCells=getNumberOfCells();
2684   for ( int ielem=0; ielem<nbOfCells;ielem++ )
2685     {
2686       for (int i=0; i<dim; i++)
2687         {
2688           elem_bb[i*2]=std::numeric_limits<double>::max();
2689           elem_bb[i*2+1]=-std::numeric_limits<double>::max();
2690         }
2691
2692       for (int inode=conn_index[ielem]+1; inode<conn_index[ielem+1]; inode++)//+1 due to offset of cell type.
2693         {
2694           int node= conn[inode];
2695           if(node>=0)//avoid polyhedron separator
2696             {
2697               for (int idim=0; idim<dim; idim++)
2698                 {
2699                   if ( coords[node*dim+idim] < elem_bb[idim*2] )
2700                     {
2701                       elem_bb[idim*2] = coords[node*dim+idim] ;
2702                     }
2703                   if ( coords[node*dim+idim] > elem_bb[idim*2+1] )
2704                     {
2705                       elem_bb[idim*2+1] = coords[node*dim+idim] ;
2706                     }
2707                 }
2708             }
2709         }
2710       if (intersectsBoundingBox(elem_bb, bbox, dim, eps))
2711         elems->pushBackSilent(ielem);
2712     }
2713   return elems.retn();
2714 }
2715
2716 /*!
2717  * Given a boundary box 'bbox' returns elements 'elems' contained in this 'bbox' or touching 'bbox' (within 'eps' distance).
2718  * Warning 'elems' is incremented during the call so if elems is not empty before call returned elements will be
2719  * added in 'elems' parameter.
2720  */
2721 DataArrayInt *MEDCouplingUMesh::getCellsInBoundingBox(const INTERP_KERNEL::DirectedBoundingBox& bbox, double eps)
2722 {
2723   MCAuto<DataArrayInt> elems=DataArrayInt::New(); elems->alloc(0,1);
2724   if(getMeshDimension()==-1)
2725     {
2726       elems->pushBackSilent(0);
2727       return elems.retn();
2728     }
2729   int dim=getSpaceDimension();
2730   INTERP_KERNEL::AutoPtr<double> elem_bb=new double[2*dim];
2731   const int* conn      = getNodalConnectivity()->getConstPointer();
2732   const int* conn_index= getNodalConnectivityIndex()->getConstPointer();
2733   const double* coords = getCoords()->getConstPointer();
2734   int nbOfCells=getNumberOfCells();
2735   for ( int ielem=0; ielem<nbOfCells;ielem++ )
2736     {
2737       for (int i=0; i<dim; i++)
2738         {
2739           elem_bb[i*2]=std::numeric_limits<double>::max();
2740           elem_bb[i*2+1]=-std::numeric_limits<double>::max();
2741         }
2742
2743       for (int inode=conn_index[ielem]+1; inode<conn_index[ielem+1]; inode++)//+1 due to offset of cell type.
2744         {
2745           int node= conn[inode];
2746           if(node>=0)//avoid polyhedron separator
2747             {
2748               for (int idim=0; idim<dim; idim++)
2749                 {
2750                   if ( coords[node*dim+idim] < elem_bb[idim*2] )
2751                     {
2752                       elem_bb[idim*2] = coords[node*dim+idim] ;
2753                     }
2754                   if ( coords[node*dim+idim] > elem_bb[idim*2+1] )
2755                     {
2756                       elem_bb[idim*2+1] = coords[node*dim+idim] ;
2757                     }
2758                 }
2759             }
2760         }
2761       if(intersectsBoundingBox(bbox, elem_bb, dim, eps))
2762         elems->pushBackSilent(ielem);
2763     }
2764   return elems.retn();
2765 }
2766
2767 /*!
2768  * Returns a type of a cell by its id.
2769  *  \param [in] cellId - the id of the cell of interest.
2770  *  \return INTERP_KERNEL::NormalizedCellType - enumeration item describing the cell type.
2771  *  \throw If \a cellId is invalid. Valid range is [0, \a this->getNumberOfCells() ).
2772  */
2773 INTERP_KERNEL::NormalizedCellType MEDCouplingUMesh::getTypeOfCell(std::size_t cellId) const
2774 {
2775   const int *ptI(_nodal_connec_index->begin()),*pt(_nodal_connec->begin());
2776   if(cellId<_nodal_connec_index->getNbOfElems()-1)
2777     return (INTERP_KERNEL::NormalizedCellType) pt[ptI[cellId]];
2778   else
2779     {
2780       std::ostringstream oss; oss << "MEDCouplingUMesh::getTypeOfCell : Requesting type of cell #" << cellId << " but it should be in [0," << _nodal_connec_index->getNbOfElems()-1 << ") !";
2781       throw INTERP_KERNEL::Exception(oss.str());
2782     }
2783 }
2784
2785 /*!
2786  * This method returns a newly allocated array containing cell ids (ascendingly sorted) whose geometric type are equal to type.
2787  * This method does not throw exception if geometric type \a type is not in \a this.
2788  * This method throws an INTERP_KERNEL::Exception if meshdimension of \b this is not equal to those of \b type.
2789  * The coordinates array is not considered here.
2790  *
2791  * \param [in] type the geometric type
2792  * \return cell ids in this having geometric type \a type.
2793  */
2794 DataArrayInt *MEDCouplingUMesh::giveCellsWithType(INTERP_KERNEL::NormalizedCellType type) const
2795 {
2796
2797   MCAuto<DataArrayInt> ret=DataArrayInt::New();
2798   ret->alloc(0,1);
2799   checkConnectivityFullyDefined();
2800   int nbCells=getNumberOfCells();
2801   int mdim=getMeshDimension();
2802   const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(type);
2803   if(mdim!=(int)cm.getDimension())
2804     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::giveCellsWithType : Mismatch between mesh dimension and dimension of the cell !");
2805   const int *ptI=_nodal_connec_index->getConstPointer();
2806   const int *pt=_nodal_connec->getConstPointer();
2807   for(int i=0;i<nbCells;i++)
2808     {
2809       if((INTERP_KERNEL::NormalizedCellType)pt[ptI[i]]==type)
2810         ret->pushBackSilent(i);
2811     }
2812   return ret.retn();
2813 }
2814
2815 /*!
2816  * Returns nb of cells having the geometric type \a type. No throw if no cells in \a this has the geometric type \a type.
2817  */
2818 std::size_t MEDCouplingUMesh::getNumberOfCellsWithType(INTERP_KERNEL::NormalizedCellType type) const
2819 {
2820   const int *ptI(_nodal_connec_index->begin()),*pt(_nodal_connec->begin());
2821   std::size_t nbOfCells(getNumberOfCells()),ret(0);
2822   for(std::size_t i=0;i<nbOfCells;i++)
2823     if((INTERP_KERNEL::NormalizedCellType) pt[ptI[i]]==type)
2824       ret++;
2825   return ret;
2826 }
2827
2828 /*!
2829  * Returns the nodal connectivity of a given cell.
2830  * The separator of faces within polyhedron connectivity (-1) is not returned, thus
2831  * all returned node ids can be used in getCoordinatesOfNode().
2832  *  \param [in] cellId - an id of the cell of interest.
2833  *  \param [in,out] conn - a vector where the node ids are appended. It is not
2834  *         cleared before the appending.
2835  *  \throw If \a cellId is invalid. Valid range is [0, \a this->getNumberOfCells() ).
2836  */
2837 void MEDCouplingUMesh::getNodeIdsOfCell(std::size_t cellId, std::vector<int>& conn) const
2838 {
2839   const int *ptI(_nodal_connec_index->begin()),*pt(_nodal_connec->begin());
2840   for(const int *w=pt+ptI[cellId]+1;w!=pt+ptI[cellId+1];w++)
2841     if(*w>=0)
2842       conn.push_back(*w);
2843 }
2844
2845 std::string MEDCouplingUMesh::simpleRepr() const
2846 {
2847   static const char msg0[]="No coordinates specified !";
2848   std::ostringstream ret;
2849   ret << "Unstructured mesh with name : \"" << getName() << "\"\n";
2850   ret << "Description of mesh : \"" << getDescription() << "\"\n";
2851   int tmpp1,tmpp2;
2852   double tt=getTime(tmpp1,tmpp2);
2853   ret << "Time attached to the mesh [unit] : " << tt << " [" << getTimeUnit() << "]\n";
2854   ret << "Iteration : " << tmpp1  << " Order : " << tmpp2 << "\n";
2855   if(_mesh_dim>=-1)
2856     { ret << "Mesh dimension : " << _mesh_dim << "\nSpace dimension : "; }
2857   else
2858     { ret << " Mesh dimension has not been set or is invalid !"; }
2859   if(_coords!=0)
2860     {
2861       const int spaceDim=getSpaceDimension();
2862       ret << spaceDim << "\nInfo attached on space dimension : ";
2863       for(int i=0;i<spaceDim;i++)
2864         ret << "\"" << _coords->getInfoOnComponent(i) << "\" ";
2865       ret << "\n";
2866     }
2867   else
2868     ret << msg0 << "\n";
2869   ret << "Number of nodes : ";
2870   if(_coords!=0)
2871     ret << getNumberOfNodes() << "\n";
2872   else
2873     ret << msg0 << "\n";
2874   ret << "Number of cells : ";
2875   if(_nodal_connec!=0 && _nodal_connec_index!=0)
2876     ret << getNumberOfCells() << "\n";
2877   else
2878     ret << "No connectivity specified !" << "\n";
2879   ret << "Cell types present : ";
2880   for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator iter=_types.begin();iter!=_types.end();iter++)
2881     {
2882       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(*iter);
2883       ret << cm.getRepr() << " ";
2884     }
2885   ret << "\n";
2886   return ret.str();
2887 }
2888
2889 std::string MEDCouplingUMesh::advancedRepr() const
2890 {
2891   std::ostringstream ret;
2892   ret << simpleRepr();
2893   ret << "\nCoordinates array : \n___________________\n\n";
2894   if(_coords)
2895     _coords->reprWithoutNameStream(ret);
2896   else
2897     ret << "No array set !\n";
2898   ret << "\n\nConnectivity arrays : \n_____________________\n\n";
2899   reprConnectivityOfThisLL(ret);
2900   return ret.str();
2901 }
2902
2903 /*!
2904  * This method returns a C++ code that is a dump of \a this.
2905  * This method will throw if this is not fully defined.
2906  */
2907 std::string MEDCouplingUMesh::cppRepr() const
2908 {
2909   static const char coordsName[]="coords";
2910   static const char connName[]="conn";
2911   static const char connIName[]="connI";
2912   checkFullyDefined();
2913   std::ostringstream ret; ret << "// coordinates" << std::endl;
2914   _coords->reprCppStream(coordsName,ret); ret << std::endl << "// connectivity" << std::endl;
2915   _nodal_connec->reprCppStream(connName,ret); ret << std::endl;
2916   _nodal_connec_index->reprCppStream(connIName,ret); ret << std::endl;
2917   ret << "MEDCouplingUMesh *mesh=MEDCouplingUMesh::New(\"" << getName() << "\"," << getMeshDimension() << ");" << std::endl;
2918   ret << "mesh->setCoords(" << coordsName << ");" << std::endl;
2919   ret << "mesh->setConnectivity(" << connName << "," << connIName << ",true);" << std::endl;
2920   ret << coordsName << "->decrRef(); " << connName << "->decrRef(); " << connIName << "->decrRef();" << std::endl;
2921   return ret.str();
2922 }
2923
2924 std::string MEDCouplingUMesh::reprConnectivityOfThis() const
2925 {
2926   std::ostringstream ret;
2927   reprConnectivityOfThisLL(ret);
2928   return ret.str();
2929 }
2930
2931 /*!
2932  * This method builds a newly allocated instance (with the same name than \a this) that the caller has the responsibility to deal with.
2933  * This method returns an instance with all arrays allocated (connectivity, connectivity index, coordinates)
2934  * but with length of these arrays set to 0. It allows to define an "empty" mesh (with nor cells nor nodes but compliant with
2935  * some algos).
2936  *
2937  * This method expects that \a this has a mesh dimension set and higher or equal to 0. If not an exception will be thrown.
2938  * This method analyzes the 3 arrays of \a this. For each the following behaviour is done : if the array is null a newly one is created
2939  * with number of tuples set to 0, if not the array is taken as this in the returned instance.
2940  */
2941 MEDCouplingUMesh *MEDCouplingUMesh::buildSetInstanceFromThis(int spaceDim) const
2942 {
2943   int mdim=getMeshDimension();
2944   if(mdim<0)
2945     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSetInstanceFromThis : invalid mesh dimension ! Should be >= 0 !");
2946   MCAuto<MEDCouplingUMesh> ret=MEDCouplingUMesh::New(getName(),mdim);
2947   MCAuto<DataArrayInt> tmp1,tmp2;
2948   bool needToCpyCT=true;
2949   if(!_nodal_connec)
2950     {
2951       tmp1=DataArrayInt::New(); tmp1->alloc(0,1);
2952       needToCpyCT=false;
2953     }
2954   else
2955     {
2956       tmp1=_nodal_connec;
2957       tmp1->incrRef();
2958     }
2959   if(!_nodal_connec_index)
2960     {
2961       tmp2=DataArrayInt::New(); tmp2->alloc(1,1); tmp2->setIJ(0,0,0);
2962       needToCpyCT=false;
2963     }
2964   else
2965     {
2966       tmp2=_nodal_connec_index;
2967       tmp2->incrRef();
2968     }
2969   ret->setConnectivity(tmp1,tmp2,false);
2970   if(needToCpyCT)
2971     ret->_types=_types;
2972   if(!_coords)
2973     {
2974       MCAuto<DataArrayDouble> coords=DataArrayDouble::New(); coords->alloc(0,spaceDim);
2975       ret->setCoords(coords);
2976     }
2977   else
2978     ret->setCoords(_coords);
2979   return ret.retn();
2980 }
2981
2982 int MEDCouplingUMesh::getNumberOfNodesInCell(int cellId) const
2983 {
2984   const int *ptI=_nodal_connec_index->getConstPointer();
2985   const int *pt=_nodal_connec->getConstPointer();
2986   if(pt[ptI[cellId]]!=INTERP_KERNEL::NORM_POLYHED)
2987     return ptI[cellId+1]-ptI[cellId]-1;
2988   else
2989     return (int)std::count_if(pt+ptI[cellId]+1,pt+ptI[cellId+1],std::bind2nd(std::not_equal_to<int>(),-1));
2990 }
2991
2992 /*!
2993  * Returns types of cells of the specified part of \a this mesh.
2994  * This method avoids computing sub-mesh explicitly to get its types.
2995  *  \param [in] begin - an array of cell ids of interest.
2996  *  \param [in] end - the end of \a begin, i.e. a pointer to its (last+1)-th element.
2997  *  \return std::set<INTERP_KERNEL::NormalizedCellType> - a set of enumeration items
2998  *         describing the cell types.
2999  *  \throw If the coordinates array is not set.
3000  *  \throw If the nodal connectivity of cells is not defined.
3001  *  \sa getAllGeoTypes()
3002  */
3003 std::set<INTERP_KERNEL::NormalizedCellType> MEDCouplingUMesh::getTypesOfPart(const int *begin, const int *end) const
3004 {
3005   checkFullyDefined();
3006   std::set<INTERP_KERNEL::NormalizedCellType> ret;
3007   const int *conn=_nodal_connec->getConstPointer();
3008   const int *connIndex=_nodal_connec_index->getConstPointer();
3009   for(const int *w=begin;w!=end;w++)
3010     ret.insert((INTERP_KERNEL::NormalizedCellType)conn[connIndex[*w]]);
3011   return ret;
3012 }
3013
3014 /*!
3015  * Defines the nodal connectivity using given connectivity arrays in \ref numbering-indirect format.
3016  * Optionally updates
3017  * a set of types of cells constituting \a this mesh.
3018  * This method is for advanced users having prepared their connectivity before. For
3019  * more info on using this method see \ref MEDCouplingUMeshAdvBuild.
3020  *  \param [in] conn - the nodal connectivity array.
3021  *  \param [in] connIndex - the nodal connectivity index array.
3022  *  \param [in] isComputingTypes - if \c true, the set of types constituting \a this
3023  *         mesh is updated.
3024  */
3025 void MEDCouplingUMesh::setConnectivity(DataArrayInt *conn, DataArrayInt *connIndex, bool isComputingTypes)
3026 {
3027   DataArrayInt::SetArrayIn(conn,_nodal_connec);
3028   DataArrayInt::SetArrayIn(connIndex,_nodal_connec_index);
3029   if(isComputingTypes)
3030     computeTypes();
3031   declareAsNew();
3032 }
3033
3034 /*!
3035  * Copy constructor. If 'deepCopy' is false \a this is a shallow copy of other.
3036  * If 'deeCpy' is true all arrays (coordinates and connectivities) are deeply copied.
3037  */
3038 MEDCouplingUMesh::MEDCouplingUMesh(const MEDCouplingUMesh& other, bool deepCpy):MEDCouplingPointSet(other,deepCpy),_mesh_dim(other._mesh_dim),
3039     _nodal_connec(0),_nodal_connec_index(0),
3040     _types(other._types)
3041 {
3042   if(other._nodal_connec)
3043     _nodal_connec=other._nodal_connec->performCopyOrIncrRef(deepCpy);
3044   if(other._nodal_connec_index)
3045     _nodal_connec_index=other._nodal_connec_index->performCopyOrIncrRef(deepCpy);
3046 }
3047
3048 MEDCouplingUMesh::~MEDCouplingUMesh()
3049 {
3050   if(_nodal_connec)
3051     _nodal_connec->decrRef();
3052   if(_nodal_connec_index)
3053     _nodal_connec_index->decrRef();
3054 }
3055
3056 /*!
3057  * Recomputes a set of cell types of \a this mesh. For more info see
3058  * \ref MEDCouplingUMeshNodalConnectivity.
3059  */
3060 void MEDCouplingUMesh::computeTypes()
3061 {
3062   ComputeAllTypesInternal(_types,_nodal_connec,_nodal_connec_index);
3063 }
3064
3065
3066 /*!
3067  * Returns a number of cells constituting \a this mesh.
3068  *  \return int - the number of cells in \a this mesh.
3069  *  \throw If the nodal connectivity of cells is not defined.
3070  */
3071 std::size_t MEDCouplingUMesh::getNumberOfCells() const
3072 {
3073   if(_nodal_connec_index)
3074     return _nodal_connec_index->getNumberOfTuples()-1;
3075   else
3076     if(_mesh_dim==-1)
3077       return 1;
3078     else
3079       throw INTERP_KERNEL::Exception("Unable to get number of cells because no connectivity specified !");
3080 }
3081
3082 /*!
3083  * Returns a dimension of \a this mesh, i.e. a dimension of cells constituting \a this
3084  * mesh. For more info see \ref meshes.
3085  *  \return int - the dimension of \a this mesh.
3086  *  \throw If the mesh dimension is not defined using setMeshDimension().
3087  */
3088 int MEDCouplingUMesh::getMeshDimension() const
3089 {
3090   if(_mesh_dim<-1)
3091     throw INTERP_KERNEL::Exception("No mesh dimension specified !");
3092   return _mesh_dim;
3093 }
3094
3095 /*!
3096  * Returns a length of the nodal connectivity array.
3097  * This method is for test reason. Normally the integer returned is not useable by
3098  * user.  For more info see \ref MEDCouplingUMeshNodalConnectivity.
3099  *  \return int - the length of the nodal connectivity array.
3100  */
3101 int MEDCouplingUMesh::getNodalConnectivityArrayLen() const
3102 {
3103   return _nodal_connec->getNbOfElems();
3104 }
3105
3106 /*!
3107  * First step of serialization process. Used by ParaMEDMEM and MEDCouplingCorba to transfert data between process.
3108  */
3109 void MEDCouplingUMesh::getTinySerializationInformation(std::vector<double>& tinyInfoD, std::vector<int>& tinyInfo, std::vector<std::string>& littleStrings) const
3110 {
3111   MEDCouplingPointSet::getTinySerializationInformation(tinyInfoD,tinyInfo,littleStrings);
3112   tinyInfo.push_back(getMeshDimension());
3113   tinyInfo.push_back(getNumberOfCells());
3114   if(_nodal_connec)
3115     tinyInfo.push_back(getNodalConnectivityArrayLen());
3116   else
3117     tinyInfo.push_back(-1);
3118 }
3119
3120 /*!
3121  * First step of unserialization process.
3122  */
3123 bool MEDCouplingUMesh::isEmptyMesh(const std::vector<int>& tinyInfo) const
3124 {
3125   return tinyInfo[6]<=0;
3126 }
3127
3128 /*!
3129  * Second step of serialization process.
3130  * \param tinyInfo must be equal to the result given by getTinySerializationInformation method.
3131  * \param a1
3132  * \param a2
3133  * \param littleStrings
3134  */
3135 void MEDCouplingUMesh::resizeForUnserialization(const std::vector<int>& tinyInfo, DataArrayInt *a1, DataArrayDouble *a2, std::vector<std::string>& littleStrings) const
3136 {
3137   MEDCouplingPointSet::resizeForUnserialization(tinyInfo,a1,a2,littleStrings);
3138   if(tinyInfo[5]!=-1)
3139     a1->alloc(tinyInfo[7]+tinyInfo[6]+1,1);
3140 }
3141
3142 /*!
3143  * Third and final step of serialization process.
3144  */
3145 void MEDCouplingUMesh::serialize(DataArrayInt *&a1, DataArrayDouble *&a2) const
3146 {
3147   MEDCouplingPointSet::serialize(a1,a2);
3148   if(getMeshDimension()>-1)
3149     {
3150       a1=DataArrayInt::New();
3151       a1->alloc(getNodalConnectivityArrayLen()+getNumberOfCells()+1,1);
3152       int *ptA1=a1->getPointer();
3153       const int *conn=getNodalConnectivity()->getConstPointer();
3154       const int *index=getNodalConnectivityIndex()->getConstPointer();
3155       ptA1=std::copy(index,index+getNumberOfCells()+1,ptA1);
3156       std::copy(conn,conn+getNodalConnectivityArrayLen(),ptA1);
3157     }
3158   else
3159     a1=0;
3160 }
3161
3162 /*!
3163  * Second and final unserialization process.
3164  * \param tinyInfo must be equal to the result given by getTinySerializationInformation method.
3165  */
3166 void MEDCouplingUMesh::unserialization(const std::vector<double>& tinyInfoD, const std::vector<int>& tinyInfo, const DataArrayInt *a1, DataArrayDouble *a2, const std::vector<std::string>& littleStrings)
3167 {
3168   MEDCouplingPointSet::unserialization(tinyInfoD,tinyInfo,a1,a2,littleStrings);
3169   setMeshDimension(tinyInfo[5]);
3170   if(tinyInfo[7]!=-1)
3171     {
3172       // Connectivity
3173       const int *recvBuffer=a1->getConstPointer();
3174       MCAuto<DataArrayInt> myConnecIndex=DataArrayInt::New();
3175       myConnecIndex->alloc(tinyInfo[6]+1,1);
3176       std::copy(recvBuffer,recvBuffer+tinyInfo[6]+1,myConnecIndex->getPointer());
3177       MCAuto<DataArrayInt> myConnec=DataArrayInt::New();
3178       myConnec->alloc(tinyInfo[7],1);
3179       std::copy(recvBuffer+tinyInfo[6]+1,recvBuffer+tinyInfo[6]+1+tinyInfo[7],myConnec->getPointer());
3180       setConnectivity(myConnec, myConnecIndex);
3181     }
3182 }
3183
3184
3185
3186 /*!
3187  * Returns a new MEDCouplingFieldDouble containing volumes of cells constituting \a this
3188  * mesh.<br>
3189  * For 1D cells, the returned field contains lengths.<br>
3190  * For 2D cells, the returned field contains areas.<br>
3191  * For 3D cells, the returned field contains volumes.
3192  *  \param [in] isAbs - if \c true, the computed cell volume does not reflect cell
3193  *         orientation, i.e. the volume is always positive.
3194  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on cells
3195  *         and one time . The caller is to delete this field using decrRef() as it is no
3196  *         more needed.
3197  */
3198 MEDCouplingFieldDouble *MEDCouplingUMesh::getMeasureField(bool isAbs) const
3199 {
3200   std::string name="MeasureOfMesh_";
3201   name+=getName();
3202   int nbelem=getNumberOfCells();
3203   MCAuto<MEDCouplingFieldDouble> field=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
3204   field->setName(name);
3205   MCAuto<DataArrayDouble> array=DataArrayDouble::New();
3206   array->alloc(nbelem,1);
3207   double *area_vol=array->getPointer();
3208   field->setArray(array) ; array=0;
3209   field->setMesh(const_cast<MEDCouplingUMesh *>(this));
3210   field->synchronizeTimeWithMesh();
3211   if(getMeshDimension()!=-1)
3212     {
3213       int ipt;
3214       INTERP_KERNEL::NormalizedCellType type;
3215       int dim_space=getSpaceDimension();
3216       const double *coords=getCoords()->getConstPointer();
3217       const int *connec=getNodalConnectivity()->getConstPointer();
3218       const int *connec_index=getNodalConnectivityIndex()->getConstPointer();
3219       for(int iel=0;iel<nbelem;iel++)
3220         {
3221           ipt=connec_index[iel];
3222           type=(INTERP_KERNEL::NormalizedCellType)connec[ipt];
3223           area_vol[iel]=INTERP_KERNEL::computeVolSurfOfCell2<int,INTERP_KERNEL::ALL_C_MODE>(type,connec+ipt+1,connec_index[iel+1]-ipt-1,coords,dim_space);
3224         }
3225       if(isAbs)
3226         std::transform(area_vol,area_vol+nbelem,area_vol,std::ptr_fun<double,double>(fabs));
3227     }
3228   else
3229     {
3230       area_vol[0]=std::numeric_limits<double>::max();
3231     }
3232   return field.retn();
3233 }
3234
3235 /*!
3236  * Returns a new DataArrayDouble containing volumes of specified cells of \a this
3237  * mesh.<br>
3238  * For 1D cells, the returned array contains lengths.<br>
3239  * For 2D cells, the returned array contains areas.<br>
3240  * For 3D cells, the returned array contains volumes.
3241  * This method avoids building explicitly a part of \a this mesh to perform the work.
3242  *  \param [in] isAbs - if \c true, the computed cell volume does not reflect cell
3243  *         orientation, i.e. the volume is always positive.
3244  *  \param [in] begin - an array of cell ids of interest.
3245  *  \param [in] end - the end of \a begin, i.e. a pointer to its (last+1)-th element.
3246  *  \return DataArrayDouble * - a new instance of DataArrayDouble. The caller is to
3247  *          delete this array using decrRef() as it is no more needed.
3248  *
3249  *  \if ENABLE_EXAMPLES
3250  *  \ref cpp_mcumesh_getPartMeasureField "Here is a C++ example".<br>
3251  *  \ref  py_mcumesh_getPartMeasureField "Here is a Python example".
3252  *  \endif
3253  *  \sa getMeasureField()
3254  */
3255 DataArrayDouble *MEDCouplingUMesh::getPartMeasureField(bool isAbs, const int *begin, const int *end) const
3256 {
3257   std::string name="PartMeasureOfMesh_";
3258   name+=getName();
3259   int nbelem=(int)std::distance(begin,end);
3260   MCAuto<DataArrayDouble> array=DataArrayDouble::New();
3261   array->setName(name);
3262   array->alloc(nbelem,1);
3263   double *area_vol=array->getPointer();
3264   if(getMeshDimension()!=-1)
3265     {
3266       int ipt;
3267       INTERP_KERNEL::NormalizedCellType type;
3268       int dim_space=getSpaceDimension();
3269       const double *coords=getCoords()->getConstPointer();
3270       const int *connec=getNodalConnectivity()->getConstPointer();
3271       const int *connec_index=getNodalConnectivityIndex()->getConstPointer();
3272       for(const int *iel=begin;iel!=end;iel++)
3273         {
3274           ipt=connec_index[*iel];
3275           type=(INTERP_KERNEL::NormalizedCellType)connec[ipt];
3276           *area_vol++=INTERP_KERNEL::computeVolSurfOfCell2<int,INTERP_KERNEL::ALL_C_MODE>(type,connec+ipt+1,connec_index[*iel+1]-ipt-1,coords,dim_space);
3277         }
3278       if(isAbs)
3279         std::transform(array->getPointer(),area_vol,array->getPointer(),std::ptr_fun<double,double>(fabs));
3280     }
3281   else
3282     {
3283       area_vol[0]=std::numeric_limits<double>::max();
3284     }
3285   return array.retn();
3286 }
3287
3288 /*!
3289  * Returns a new MEDCouplingFieldDouble containing volumes of cells of a dual mesh of
3290  * \a this one. The returned field contains the dual cell volume for each corresponding
3291  * node in \a this mesh. In other words, the field returns the getMeasureField() of
3292  *  the dual mesh in P1 sens of \a this.<br>
3293  * For 1D cells, the returned field contains lengths.<br>
3294  * For 2D cells, the returned field contains areas.<br>
3295  * For 3D cells, the returned field contains volumes.
3296  * This method is useful to check "P1*" conservative interpolators.
3297  *  \param [in] isAbs - if \c true, the computed cell volume does not reflect cell
3298  *         orientation, i.e. the volume is always positive.
3299  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
3300  *          nodes and one time. The caller is to delete this array using decrRef() as
3301  *          it is no more needed.
3302  */
3303 MEDCouplingFieldDouble *MEDCouplingUMesh::getMeasureFieldOnNode(bool isAbs) const
3304 {
3305   MCAuto<MEDCouplingFieldDouble> tmp=getMeasureField(isAbs);
3306   std::string name="MeasureOnNodeOfMesh_";
3307   name+=getName();
3308   int nbNodes=getNumberOfNodes();
3309   MCAuto<DataArrayDouble> nnpc;
3310   {
3311     MCAuto<DataArrayInt> tmp(computeNbOfNodesPerCell());
3312     nnpc=tmp->convertToDblArr();
3313   }
3314   std::for_each(nnpc->rwBegin(),nnpc->rwEnd(),[](double& v) { v=1./v; });
3315   const double *nnpcPtr(nnpc->begin());
3316   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_NODES);
3317   MCAuto<DataArrayDouble> array=DataArrayDouble::New();
3318   array->alloc(nbNodes,1);
3319   double *valsToFill=array->getPointer();
3320   std::fill(valsToFill,valsToFill+nbNodes,0.);
3321   const double *values=tmp->getArray()->getConstPointer();
3322   MCAuto<DataArrayInt> da=DataArrayInt::New();
3323   MCAuto<DataArrayInt> daInd=DataArrayInt::New();
3324   getReverseNodalConnectivity(da,daInd);
3325   const int *daPtr=da->getConstPointer();
3326   const int *daIPtr=daInd->getConstPointer();
3327   for(int i=0;i<nbNodes;i++)
3328     for(const int *cell=daPtr+daIPtr[i];cell!=daPtr+daIPtr[i+1];cell++)
3329       valsToFill[i]+=nnpcPtr[*cell]*values[*cell];
3330   ret->setMesh(this);
3331   ret->setArray(array);
3332   return ret.retn();
3333 }
3334
3335 /*!
3336  * Returns a new MEDCouplingFieldDouble holding normal vectors to cells of \a this
3337  * mesh. The returned normal vectors to each cell have a norm2 equal to 1.
3338  * The computed vectors have <em> this->getMeshDimension()+1 </em> components
3339  * and are normalized.
3340  * <br> \a this can be either
3341  * - a  2D mesh in 2D or 3D space or
3342  * - an 1D mesh in 2D space.
3343  *
3344  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
3345  *          cells and one time. The caller is to delete this field using decrRef() as
3346  *          it is no more needed.
3347  *  \throw If the nodal connectivity of cells is not defined.
3348  *  \throw If the coordinates array is not set.
3349  *  \throw If the mesh dimension is not set.
3350  *  \throw If the mesh and space dimension is not as specified above.
3351  */
3352 MEDCouplingFieldDouble *MEDCouplingUMesh::buildOrthogonalField() const
3353 {
3354   if((getMeshDimension()!=2) && (getMeshDimension()!=1 || getSpaceDimension()!=2))
3355     throw INTERP_KERNEL::Exception("Expected a umesh with ( meshDim == 2 spaceDim == 2 or 3 ) or ( meshDim == 1 spaceDim == 2 ) !");
3356   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
3357   MCAuto<DataArrayDouble> array=DataArrayDouble::New();
3358   int nbOfCells=getNumberOfCells();
3359   int nbComp=getMeshDimension()+1;
3360   array->alloc(nbOfCells,nbComp);
3361   double *vals=array->getPointer();
3362   const int *connI=_nodal_connec_index->getConstPointer();
3363   const int *conn=_nodal_connec->getConstPointer();
3364   const double *coords=_coords->getConstPointer();
3365   if(getMeshDimension()==2)
3366     {
3367       if(getSpaceDimension()==3)
3368         {
3369           MCAuto<DataArrayDouble> loc=computeCellCenterOfMass();
3370           const double *locPtr=loc->getConstPointer();
3371           for(int i=0;i<nbOfCells;i++,vals+=3)
3372             {
3373               int offset=connI[i];
3374               INTERP_KERNEL::crossprod<3>(locPtr+3*i,coords+3*conn[offset+1],coords+3*conn[offset+2],vals);
3375               double n=INTERP_KERNEL::norm<3>(vals);
3376               std::transform(vals,vals+3,vals,std::bind2nd(std::multiplies<double>(),1./n));
3377             }
3378         }
3379       else
3380         {
3381           MCAuto<MEDCouplingFieldDouble> isAbs=getMeasureField(false);
3382           const double *isAbsPtr=isAbs->getArray()->begin();
3383           for(int i=0;i<nbOfCells;i++,isAbsPtr++)
3384             { vals[3*i]=0.; vals[3*i+1]=0.; vals[3*i+2]=*isAbsPtr>0.?1.:-1.; }
3385         }
3386     }
3387   else//meshdimension==1
3388     {
3389       double tmp[2];
3390       for(int i=0;i<nbOfCells;i++)
3391         {
3392           int offset=connI[i];
3393           std::transform(coords+2*conn[offset+2],coords+2*conn[offset+2]+2,coords+2*conn[offset+1],tmp,std::minus<double>());
3394           double n=INTERP_KERNEL::norm<2>(tmp);
3395           std::transform(tmp,tmp+2,tmp,std::bind2nd(std::multiplies<double>(),1./n));
3396           *vals++=-tmp[1];
3397           *vals++=tmp[0];
3398         }
3399     }
3400   ret->setArray(array);
3401   ret->setMesh(this);
3402   ret->synchronizeTimeWithSupport();
3403   return ret.retn();
3404 }
3405
3406 /*!
3407  * Returns a new MEDCouplingFieldDouble holding normal vectors to specified cells of
3408  * \a this mesh. The computed vectors have <em> this->getMeshDimension()+1 </em> components
3409  * and are normalized.
3410  * <br> \a this can be either
3411  * - a  2D mesh in 2D or 3D space or
3412  * - an 1D mesh in 2D space.
3413  *
3414  * This method avoids building explicitly a part of \a this mesh to perform the work.
3415  *  \param [in] begin - an array of cell ids of interest.
3416  *  \param [in] end - the end of \a begin, i.e. a pointer to its (last+1)-th element.
3417  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
3418  *          cells and one time. The caller is to delete this field using decrRef() as
3419  *          it is no more needed.
3420  *  \throw If the nodal connectivity of cells is not defined.
3421  *  \throw If the coordinates array is not set.
3422  *  \throw If the mesh dimension is not set.
3423  *  \throw If the mesh and space dimension is not as specified above.
3424  *  \sa buildOrthogonalField()
3425  *
3426  *  \if ENABLE_EXAMPLES
3427  *  \ref cpp_mcumesh_buildPartOrthogonalField "Here is a C++ example".<br>
3428  *  \ref  py_mcumesh_buildPartOrthogonalField "Here is a Python example".
3429  *  \endif
3430  */
3431 MEDCouplingFieldDouble *MEDCouplingUMesh::buildPartOrthogonalField(const int *begin, const int *end) const
3432 {
3433   if((getMeshDimension()!=2) && (getMeshDimension()!=1 || getSpaceDimension()!=2))
3434     throw INTERP_KERNEL::Exception("Expected a umesh with ( meshDim == 2 spaceDim == 2 or 3 ) or ( meshDim == 1 spaceDim == 2 ) !");
3435   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
3436   MCAuto<DataArrayDouble> array=DataArrayDouble::New();
3437   std::size_t nbelems=std::distance(begin,end);
3438   int nbComp=getMeshDimension()+1;
3439   array->alloc((int)nbelems,nbComp);
3440   double *vals=array->getPointer();
3441   const int *connI=_nodal_connec_index->getConstPointer();
3442   const int *conn=_nodal_connec->getConstPointer();
3443   const double *coords=_coords->getConstPointer();
3444   if(getMeshDimension()==2)
3445     {
3446       if(getSpaceDimension()==3)
3447         {
3448           MCAuto<DataArrayDouble> loc=getPartBarycenterAndOwner(begin,end);
3449           const double *locPtr=loc->getConstPointer();
3450           for(const int *i=begin;i!=end;i++,vals+=3,locPtr+=3)
3451             {
3452               int offset=connI[*i];
3453               INTERP_KERNEL::crossprod<3>(locPtr,coords+3*conn[offset+1],coords+3*conn[offset+2],vals);
3454               double n=INTERP_KERNEL::norm<3>(vals);
3455               std::transform(vals,vals+3,vals,std::bind2nd(std::multiplies<double>(),1./n));
3456             }
3457         }
3458       else
3459         {
3460           for(std::size_t i=0;i<nbelems;i++)
3461             { vals[3*i]=0.; vals[3*i+1]=0.; vals[3*i+2]=1.; }
3462         }
3463     }
3464   else//meshdimension==1
3465     {
3466       double tmp[2];
3467       for(const int *i=begin;i!=end;i++)
3468         {
3469           int offset=connI[*i];
3470           std::transform(coords+2*conn[offset+2],coords+2*conn[offset+2]+2,coords+2*conn[offset+1],tmp,std::minus<double>());
3471           double n=INTERP_KERNEL::norm<2>(tmp);
3472           std::transform(tmp,tmp+2,tmp,std::bind2nd(std::multiplies<double>(),1./n));
3473           *vals++=-tmp[1];
3474           *vals++=tmp[0];
3475         }
3476     }
3477   ret->setArray(array);
3478   ret->setMesh(this);
3479   ret->synchronizeTimeWithSupport();
3480   return ret.retn();
3481 }
3482
3483 /*!
3484  * Returns a new MEDCouplingFieldDouble holding a direction vector for each SEG2 in \a
3485  * this 1D mesh. The computed vectors have <em> this->getSpaceDimension() </em> components
3486  * and are \b not normalized.
3487  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
3488  *          cells and one time. The caller is to delete this field using decrRef() as
3489  *          it is no more needed.
3490  *  \throw If the nodal connectivity of cells is not defined.
3491  *  \throw If the coordinates array is not set.
3492  *  \throw If \a this->getMeshDimension() != 1.
3493  *  \throw If \a this mesh includes cells of type other than SEG2.
3494  */
3495 MEDCouplingFieldDouble *MEDCouplingUMesh::buildDirectionVectorField() const
3496 {
3497   if(getMeshDimension()!=1)
3498     throw INTERP_KERNEL::Exception("Expected a umesh with meshDim == 1 for buildDirectionVectorField !");
3499   if(_types.size()!=1 || *(_types.begin())!=INTERP_KERNEL::NORM_SEG2)
3500     throw INTERP_KERNEL::Exception("Expected a umesh with only NORM_SEG2 type of elements for buildDirectionVectorField !");
3501   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
3502   MCAuto<DataArrayDouble> array=DataArrayDouble::New();
3503   int nbOfCells=getNumberOfCells();
3504   int spaceDim=getSpaceDimension();
3505   array->alloc(nbOfCells,spaceDim);
3506   double *pt=array->getPointer();
3507   const double *coo=getCoords()->getConstPointer();
3508   std::vector<int> conn;
3509   conn.reserve(2);
3510   for(int i=0;i<nbOfCells;i++)
3511     {
3512       conn.resize(0);
3513       getNodeIdsOfCell(i,conn);
3514       pt=std::transform(coo+conn[1]*spaceDim,coo+(conn[1]+1)*spaceDim,coo+conn[0]*spaceDim,pt,std::minus<double>());
3515     }
3516   ret->setArray(array);
3517   ret->setMesh(this);
3518   ret->synchronizeTimeWithSupport();
3519   return ret.retn();
3520 }
3521
3522 /*!
3523  * Creates a 2D mesh by cutting \a this 3D mesh with a plane. In addition to the mesh,
3524  * returns a new DataArrayInt, of length equal to the number of 2D cells in the result
3525  * mesh, holding, for each cell in the result mesh, an id of a 3D cell it comes
3526  * from. If a result face is shared by two 3D cells, then the face in included twice in
3527  * the result mesh.
3528  *  \param [in] origin - 3 components of a point defining location of the plane.
3529  *  \param [in] vec - 3 components of a vector normal to the plane. Vector magnitude
3530  *         must be greater than 1e-6.
3531  *  \param [in] eps - half-thickness of the plane.
3532  *  \param [out] cellIds - a new instance of DataArrayInt holding ids of 3D cells
3533  *         producing correspondent 2D cells. The caller is to delete this array
3534  *         using decrRef() as it is no more needed.
3535  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingUMesh. This mesh does
3536  *         not share the node coordinates array with \a this mesh. The caller is to
3537  *         delete this mesh using decrRef() as it is no more needed.
3538  *  \throw If the coordinates array is not set.
3539  *  \throw If the nodal connectivity of cells is not defined.
3540  *  \throw If \a this->getMeshDimension() != 3 or \a this->getSpaceDimension() != 3.
3541  *  \throw If magnitude of \a vec is less than 1e-6.
3542  *  \throw If the plane does not intersect any 3D cell of \a this mesh.
3543  *  \throw If \a this includes quadratic cells.
3544  */
3545 MEDCouplingUMesh *MEDCouplingUMesh::buildSlice3D(const double *origin, const double *vec, double eps, DataArrayInt *&cellIds) const
3546 {
3547   checkFullyDefined();
3548   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
3549     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3D works on umeshes with meshdim equal to 3 and spaceDim equal to 3 too!");
3550   MCAuto<DataArrayInt> candidates=getCellIdsCrossingPlane(origin,vec,eps);
3551   if(candidates->empty())
3552     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3D : No 3D cells in this intercepts the specified plane considering bounding boxes !");
3553   std::vector<int> nodes;
3554   DataArrayInt *cellIds1D=0;
3555   MCAuto<MEDCouplingUMesh> subMesh=static_cast<MEDCouplingUMesh*>(buildPartOfMySelf(candidates->begin(),candidates->end(),false));
3556   subMesh->findNodesOnPlane(origin,vec,eps,nodes);
3557   MCAuto<DataArrayInt> desc1=DataArrayInt::New(),desc2=DataArrayInt::New();
3558   MCAuto<DataArrayInt> descIndx1=DataArrayInt::New(),descIndx2=DataArrayInt::New();
3559   MCAuto<DataArrayInt> revDesc1=DataArrayInt::New(),revDesc2=DataArrayInt::New();
3560   MCAuto<DataArrayInt> revDescIndx1=DataArrayInt::New(),revDescIndx2=DataArrayInt::New();
3561   MCAuto<MEDCouplingUMesh> mDesc2=subMesh->buildDescendingConnectivity(desc2,descIndx2,revDesc2,revDescIndx2);//meshDim==2 spaceDim==3
3562   revDesc2=0; revDescIndx2=0;
3563   MCAuto<MEDCouplingUMesh> mDesc1=mDesc2->buildDescendingConnectivity(desc1,descIndx1,revDesc1,revDescIndx1);//meshDim==1 spaceDim==3
3564   revDesc1=0; revDescIndx1=0;
3565   mDesc1->fillCellIdsToKeepFromNodeIds(&nodes[0],&nodes[0]+nodes.size(),true,cellIds1D);
3566   MCAuto<DataArrayInt> cellIds1DTmp(cellIds1D);
3567   //
3568   std::vector<int> cut3DCurve(mDesc1->getNumberOfCells(),-2);
3569   for(const int *it=cellIds1D->begin();it!=cellIds1D->end();it++)
3570     cut3DCurve[*it]=-1;
3571   mDesc1->split3DCurveWithPlane(origin,vec,eps,cut3DCurve);
3572   std::vector< std::pair<int,int> > cut3DSurf(mDesc2->getNumberOfCells());
3573   AssemblyForSplitFrom3DCurve(cut3DCurve,nodes,mDesc2->getNodalConnectivity()->getConstPointer(),mDesc2->getNodalConnectivityIndex()->getConstPointer(),
3574                               mDesc1->getNodalConnectivity()->getConstPointer(),mDesc1->getNodalConnectivityIndex()->getConstPointer(),
3575                               desc1->getConstPointer(),descIndx1->getConstPointer(),cut3DSurf);
3576   MCAuto<DataArrayInt> conn(DataArrayInt::New()),connI(DataArrayInt::New()),cellIds2(DataArrayInt::New());
3577   connI->pushBackSilent(0); conn->alloc(0,1); cellIds2->alloc(0,1);
3578   subMesh->assemblyForSplitFrom3DSurf(cut3DSurf,desc2->getConstPointer(),descIndx2->getConstPointer(),conn,connI,cellIds2);
3579   if(cellIds2->empty())
3580     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3D : No 3D cells in this intercepts the specified plane !");
3581   MCAuto<MEDCouplingUMesh> ret=MEDCouplingUMesh::New("Slice3D",2);
3582   ret->setCoords(mDesc1->getCoords());
3583   ret->setConnectivity(conn,connI,true);
3584   cellIds=candidates->selectByTupleId(cellIds2->begin(),cellIds2->end());
3585   return ret.retn();
3586 }
3587
3588 /*!
3589  * Creates an 1D mesh by cutting \a this 2D mesh in 3D space with a plane. In
3590 addition to the mesh, returns a new DataArrayInt, of length equal to the number of 1D cells in the result mesh, holding, for each cell in the result mesh, an id of a 2D cell it comes
3591 from. If a result segment is shared by two 2D cells, then the segment in included twice in
3592 the result mesh.
3593  *  \param [in] origin - 3 components of a point defining location of the plane.
3594  *  \param [in] vec - 3 components of a vector normal to the plane. Vector magnitude
3595  *         must be greater than 1e-6.
3596  *  \param [in] eps - half-thickness of the plane.
3597  *  \param [out] cellIds - a new instance of DataArrayInt holding ids of faces
3598  *         producing correspondent segments. The caller is to delete this array
3599  *         using decrRef() as it is no more needed.
3600  *  \return MEDCouplingUMesh * - a new instance of MEDCouplingUMesh. This is an 1D
3601  *         mesh in 3D space. This mesh does not share the node coordinates array with
3602  *         \a this mesh. The caller is to delete this mesh using decrRef() as it is
3603  *         no more needed.
3604  *  \throw If the coordinates array is not set.
3605  *  \throw If the nodal connectivity of cells is not defined.
3606  *  \throw If \a this->getMeshDimension() != 2 or \a this->getSpaceDimension() != 3.
3607  *  \throw If magnitude of \a vec is less than 1e-6.
3608  *  \throw If the plane does not intersect any 2D cell of \a this mesh.
3609  *  \throw If \a this includes quadratic cells.
3610  */
3611 MEDCouplingUMesh *MEDCouplingUMesh::buildSlice3DSurf(const double *origin, const double *vec, double eps, DataArrayInt *&cellIds) const
3612 {
3613   checkFullyDefined();
3614   if(getMeshDimension()!=2 || getSpaceDimension()!=3)
3615     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3DSurf works on umeshes with meshdim equal to 2 and spaceDim equal to 3 !");
3616   MCAuto<DataArrayInt> candidates(getCellIdsCrossingPlane(origin,vec,eps));
3617   if(candidates->empty())
3618     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3DSurf : No 3D surf cells in this intercepts the specified plane considering bounding boxes !");
3619   std::vector<int> nodes;
3620   DataArrayInt *cellIds1D(0);
3621   MCAuto<MEDCouplingUMesh> subMesh(buildPartOfMySelf(candidates->begin(),candidates->end(),false));
3622   subMesh->findNodesOnPlane(origin,vec,eps,nodes);
3623   MCAuto<DataArrayInt> desc1(DataArrayInt::New()),descIndx1(DataArrayInt::New()),revDesc1(DataArrayInt::New()),revDescIndx1(DataArrayInt::New());
3624   MCAuto<MEDCouplingUMesh> mDesc1(subMesh->buildDescendingConnectivity(desc1,descIndx1,revDesc1,revDescIndx1));//meshDim==1 spaceDim==3
3625   mDesc1->fillCellIdsToKeepFromNodeIds(&nodes[0],&nodes[0]+nodes.size(),true,cellIds1D);
3626   MCAuto<DataArrayInt> cellIds1DTmp(cellIds1D);
3627   //
3628   std::vector<int> cut3DCurve(mDesc1->getNumberOfCells(),-2);
3629   for(const int *it=cellIds1D->begin();it!=cellIds1D->end();it++)
3630     cut3DCurve[*it]=-1;
3631   mDesc1->split3DCurveWithPlane(origin,vec,eps,cut3DCurve);
3632   int ncellsSub=subMesh->getNumberOfCells();
3633   std::vector< std::pair<int,int> > cut3DSurf(ncellsSub);
3634   AssemblyForSplitFrom3DCurve(cut3DCurve,nodes,subMesh->getNodalConnectivity()->getConstPointer(),subMesh->getNodalConnectivityIndex()->getConstPointer(),
3635                               mDesc1->getNodalConnectivity()->getConstPointer(),mDesc1->getNodalConnectivityIndex()->getConstPointer(),
3636                               desc1->getConstPointer(),descIndx1->getConstPointer(),cut3DSurf);
3637   MCAuto<DataArrayInt> conn(DataArrayInt::New()),connI(DataArrayInt::New()),cellIds2(DataArrayInt::New()); connI->pushBackSilent(0);
3638   conn->alloc(0,1);
3639   const int *nodal=subMesh->getNodalConnectivity()->getConstPointer();
3640   const int *nodalI=subMesh->getNodalConnectivityIndex()->getConstPointer();
3641   for(int i=0;i<ncellsSub;i++)
3642     {
3643       if(cut3DSurf[i].first!=-1 && cut3DSurf[i].second!=-1)
3644         {
3645           if(cut3DSurf[i].first!=-2)
3646             {
3647               conn->pushBackSilent((int)INTERP_KERNEL::NORM_SEG2); conn->pushBackSilent(cut3DSurf[i].first); conn->pushBackSilent(cut3DSurf[i].second);
3648               connI->pushBackSilent(conn->getNumberOfTuples());
3649               cellIds2->pushBackSilent(i);
3650             }
3651           else
3652             {
3653               int cellId3DSurf=cut3DSurf[i].second;
3654               int offset=nodalI[cellId3DSurf]+1;
3655               int nbOfEdges=nodalI[cellId3DSurf+1]-offset;
3656               for(int j=0;j<nbOfEdges;j++)
3657                 {
3658                   conn->pushBackSilent((int)INTERP_KERNEL::NORM_SEG2); conn->pushBackSilent(nodal[offset+j]); conn->pushBackSilent(nodal[offset+(j+1)%nbOfEdges]);
3659                   connI->pushBackSilent(conn->getNumberOfTuples());
3660                   cellIds2->pushBackSilent(cellId3DSurf);
3661                 }
3662             }
3663         }
3664     }
3665   if(cellIds2->empty())
3666     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3DSurf : No 3DSurf cells in this intercepts the specified plane !");
3667   MCAuto<MEDCouplingUMesh> ret=MEDCouplingUMesh::New("Slice3DSurf",1);
3668   ret->setCoords(mDesc1->getCoords());
3669   ret->setConnectivity(conn,connI,true);
3670   cellIds=candidates->selectByTupleId(cellIds2->begin(),cellIds2->end());
3671   return ret.retn();
3672 }
3673
3674 MCAuto<MEDCouplingUMesh> MEDCouplingUMesh::clipSingle3DCellByPlane(const double origin[3], const double vec[3], double eps) const
3675 {
3676   checkFullyDefined();
3677   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
3678     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::clipSingle3DCellByPlane works on umeshes with meshdim equal to 3 and spaceDim equal to 3 too!");
3679   if(getNumberOfCells()!=1)
3680     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::clipSingle3DCellByPlane works only on mesh containing exactly one cell !");
3681   //
3682   std::vector<int> nodes;
3683   findNodesOnPlane(origin,vec,eps,nodes);
3684   MCAuto<DataArrayInt> desc1(DataArrayInt::New()),desc2(DataArrayInt::New()),descIndx1(DataArrayInt::New()),descIndx2(DataArrayInt::New()),revDesc1(DataArrayInt::New()),revDesc2(DataArrayInt::New()),revDescIndx1(DataArrayInt::New()),revDescIndx2(DataArrayInt::New());
3685   MCAuto<MEDCouplingUMesh> mDesc2(buildDescendingConnectivity(desc2,descIndx2,revDesc2,revDescIndx2));//meshDim==2 spaceDim==3
3686   revDesc2=0; revDescIndx2=0;
3687   MCAuto<MEDCouplingUMesh> mDesc1(mDesc2->buildDescendingConnectivity(desc1,descIndx1,revDesc1,revDescIndx1));//meshDim==1 spaceDim==3
3688   revDesc1=0; revDescIndx1=0;
3689   DataArrayInt *cellIds1D(0);
3690   mDesc1->fillCellIdsToKeepFromNodeIds(&nodes[0],&nodes[0]+nodes.size(),true,cellIds1D);
3691   MCAuto<DataArrayInt> cellIds1DTmp(cellIds1D);
3692   std::vector<int> cut3DCurve(mDesc1->getNumberOfCells(),-2);
3693   for(const int *it=cellIds1D->begin();it!=cellIds1D->end();it++)
3694     cut3DCurve[*it]=-1;
3695   bool sameNbNodes;
3696   {
3697     int oldNbNodes(mDesc1->getNumberOfNodes());
3698     mDesc1->split3DCurveWithPlane(origin,vec,eps,cut3DCurve);
3699     sameNbNodes=(mDesc1->getNumberOfNodes()==oldNbNodes);
3700   }
3701   std::vector< std::pair<int,int> > cut3DSurf(mDesc2->getNumberOfCells());
3702   AssemblyForSplitFrom3DCurve(cut3DCurve,nodes,mDesc2->getNodalConnectivity()->begin(),mDesc2->getNodalConnectivityIndex()->begin(),
3703                               mDesc1->getNodalConnectivity()->begin(),mDesc1->getNodalConnectivityIndex()->begin(),
3704                               desc1->begin(),descIndx1->begin(),cut3DSurf);
3705   MCAuto<DataArrayInt> conn(DataArrayInt::New()),connI(DataArrayInt::New());
3706   connI->pushBackSilent(0); conn->alloc(0,1);
3707   {
3708     MCAuto<DataArrayInt> cellIds2(DataArrayInt::New()); cellIds2->alloc(0,1);
3709     assemblyForSplitFrom3DSurf(cut3DSurf,desc2->begin(),descIndx2->begin(),conn,connI,cellIds2);
3710     if(cellIds2->empty())
3711       throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3D : No 3D cells in this intercepts the specified plane !");
3712   }
3713   std::vector<std::vector<int> > res;
3714   buildSubCellsFromCut(cut3DSurf,desc2->begin(),descIndx2->begin(),mDesc1->getCoords()->begin(),eps,res);
3715   std::size_t sz(res.size());
3716   if(res.size()==mDesc1->getNumberOfCells() && sameNbNodes)
3717     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::clipSingle3DCellByPlane : cell is not clipped !");
3718   for(std::size_t i=0;i<sz;i++)
3719     {
3720       conn->pushBackSilent((int)INTERP_KERNEL::NORM_POLYGON);
3721       conn->insertAtTheEnd(res[i].begin(),res[i].end());
3722       connI->pushBackSilent(conn->getNumberOfTuples());
3723     }
3724   MCAuto<MEDCouplingUMesh> ret(MEDCouplingUMesh::New("",2));
3725   ret->setCoords(mDesc1->getCoords());
3726   ret->setConnectivity(conn,connI,true);
3727   int nbCellsRet(ret->getNumberOfCells());
3728   //
3729   MCAuto<DataArrayDouble> vec2(DataArrayDouble::New()); vec2->alloc(1,3); std::copy(vec,vec+3,vec2->getPointer());
3730   MCAuto<MEDCouplingFieldDouble> ortho(ret->buildOrthogonalField());
3731   MCAuto<DataArrayDouble> ortho2(ortho->getArray()->selectByTupleIdSafeSlice(0,1,1));
3732   MCAuto<DataArrayDouble> dott(DataArrayDouble::Dot(ortho2,vec2));
3733   MCAuto<DataArrayDouble> ccm(ret->computeCellCenterOfMass());
3734   MCAuto<DataArrayDouble> occm;
3735   {
3736     MCAuto<DataArrayDouble> pt(DataArrayDouble::New()); pt->alloc(1,3); std::copy(origin,origin+3,pt->getPointer());
3737     occm=DataArrayDouble::Substract(ccm,pt);
3738   }
3739   vec2=DataArrayDouble::New(); vec2->alloc(nbCellsRet,3);
3740   vec2->setPartOfValuesSimple1(vec[0],0,nbCellsRet,1,0,1,1); vec2->setPartOfValuesSimple1(vec[1],0,nbCellsRet,1,1,2,1); vec2->setPartOfValuesSimple1(vec[2],0,nbCellsRet,1,2,3,1);
3741   MCAuto<DataArrayDouble> dott2(DataArrayDouble::Dot(occm,vec2));
3742   //
3743   const int *cPtr(ret->getNodalConnectivity()->begin()),*ciPtr(ret->getNodalConnectivityIndex()->begin());
3744   MCAuto<MEDCouplingUMesh> ret2(MEDCouplingUMesh::New("Clip3D",3));
3745   ret2->setCoords(mDesc1->getCoords());
3746   MCAuto<DataArrayInt> conn2(DataArrayInt::New()),conn2I(DataArrayInt::New());
3747   conn2I->pushBackSilent(0); conn2->alloc(0,1);
3748   std::vector<int> cell0(1,(int)INTERP_KERNEL::NORM_POLYHED);
3749   std::vector<int> cell1(1,(int)INTERP_KERNEL::NORM_POLYHED);
3750   if(dott->getIJ(0,0)>0)
3751     {
3752       cell0.insert(cell0.end(),cPtr+1,cPtr+ciPtr[1]);
3753       std::reverse_copy(cPtr+1,cPtr+ciPtr[1],std::inserter(cell1,cell1.end()));
3754     }
3755   else
3756     {
3757       cell1.insert(cell1.end(),cPtr+1,cPtr+ciPtr[1]);
3758       std::reverse_copy(cPtr+1,cPtr+ciPtr[1],std::inserter(cell0,cell0.end()));
3759     }
3760   for(int i=1;i<nbCellsRet;i++)
3761     {
3762       if(dott2->getIJ(i,0)<0)
3763         {
3764           if(ciPtr[i+1]-ciPtr[i]>=4)
3765             {
3766               cell0.push_back(-1);
3767               cell0.insert(cell0.end(),cPtr+ciPtr[i]+1,cPtr+ciPtr[i+1]);
3768             }
3769         }
3770       else
3771         {
3772           if(ciPtr[i+1]-ciPtr[i]>=4)
3773             {
3774               cell1.push_back(-1);
3775               cell1.insert(cell1.end(),cPtr+ciPtr[i]+1,cPtr+ciPtr[i+1]);
3776             }
3777         }
3778     }
3779   conn2->insertAtTheEnd(cell0.begin(),cell0.end());
3780   conn2I->pushBackSilent(conn2->getNumberOfTuples());
3781   conn2->insertAtTheEnd(cell1.begin(),cell1.end());
3782   conn2I->pushBackSilent(conn2->getNumberOfTuples());
3783   ret2->setConnectivity(conn2,conn2I,true);
3784   ret2->checkConsistencyLight();
3785   ret2->orientCorrectlyPolyhedrons();
3786   return ret2;
3787 }
3788
3789 /*!
3790  * Finds cells whose bounding boxes intersect a given plane.
3791  *  \param [in] origin - 3 components of a point defining location of the plane.
3792  *  \param [in] vec - 3 components of a vector normal to the plane. Vector magnitude
3793  *         must be greater than 1e-6.
3794  *  \param [in] eps - half-thickness of the plane.
3795  *  \return DataArrayInt * - a new instance of DataArrayInt holding ids of the found
3796  *         cells. The caller is to delete this array using decrRef() as it is no more
3797  *         needed.
3798  *  \throw If the coordinates array is not set.
3799  *  \throw If the nodal connectivity of cells is not defined.
3800  *  \throw If \a this->getSpaceDimension() != 3.
3801  *  \throw If magnitude of \a vec is less than 1e-6.
3802  *  \sa buildSlice3D()
3803  */
3804 DataArrayInt *MEDCouplingUMesh::getCellIdsCrossingPlane(const double *origin, const double *vec, double eps) const
3805 {
3806   checkFullyDefined();
3807   if(getSpaceDimension()!=3)
3808     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSlice3D works on umeshes with spaceDim equal to 3 !");
3809   double normm=sqrt(vec[0]*vec[0]+vec[1]*vec[1]+vec[2]*vec[2]);
3810   if(normm<1e-6)
3811     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getCellIdsCrossingPlane : parameter 'vec' should have a norm2 greater than 1e-6 !");
3812   double vec2[3];
3813   vec2[0]=vec[1]; vec2[1]=-vec[0]; vec2[2]=0.;//vec2 is the result of cross product of vec with (0,0,1)
3814   double angle=acos(vec[2]/normm);
3815   MCAuto<DataArrayInt> cellIds;
3816   double bbox[6];
3817   if(angle>eps)
3818     {
3819       MCAuto<DataArrayDouble> coo=_coords->deepCopy();
3820       double normm2(sqrt(vec2[0]*vec2[0]+vec2[1]*vec2[1]+vec2[2]*vec2[2]));
3821       if(normm2/normm>1e-6)
3822         DataArrayDouble::Rotate3DAlg(origin,vec2,angle,coo->getNumberOfTuples(),coo->getPointer(),coo->getPointer());
3823       MCAuto<MEDCouplingUMesh> mw=clone(false);//false -> shallow copy
3824       mw->setCoords(coo);
3825       mw->getBoundingBox(bbox);
3826       bbox[4]=origin[2]-eps; bbox[5]=origin[2]+eps;
3827       cellIds=mw->getCellsInBoundingBox(bbox,eps);
3828     }
3829   else
3830     {
3831       getBoundingBox(bbox);
3832       bbox[4]=origin[2]-eps; bbox[5]=origin[2]+eps;
3833       cellIds=getCellsInBoundingBox(bbox,eps);
3834     }
3835   return cellIds.retn();
3836 }
3837
3838 /*!
3839  * This method checks that \a this is a contiguous mesh. The user is expected to call this method on a mesh with meshdim==1.
3840  * If not an exception will thrown. If this is an empty mesh with no cell an exception will be thrown too.
3841  * No consideration of coordinate is done by this method.
3842  * A 1D mesh is said contiguous if : a cell i with nodal connectivity (k,p) the cell i+1 the nodal connectivity should be (p,m)
3843  * If not false is returned. In case that false is returned a call to MEDCoupling::MEDCouplingUMesh::mergeNodes could be useful.
3844  */
3845 bool MEDCouplingUMesh::isContiguous1D() const
3846 {
3847   if(getMeshDimension()!=1)
3848     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::isContiguous1D : this method has a sense only for 1D mesh !");
3849   int nbCells=getNumberOfCells();
3850   if(nbCells<1)
3851     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::isContiguous1D : this method has a sense for non empty mesh !");
3852   const int *connI(_nodal_connec_index->begin()),*conn(_nodal_connec->begin());
3853   int ref=conn[connI[0]+2];
3854   for(int i=1;i<nbCells;i++)
3855     {
3856       if(conn[connI[i]+1]!=ref)
3857         return false;
3858       ref=conn[connI[i]+2];
3859     }
3860   return true;
3861 }
3862
3863 /*!
3864  * This method is only callable on mesh with meshdim == 1 containing only SEG2 and spaceDim==3.
3865  * This method projects this on the 3D line defined by (pt,v). This methods first checks that all SEG2 are along v vector.
3866  * \param pt reference point of the line
3867  * \param v normalized director vector of the line
3868  * \param eps max precision before throwing an exception
3869  * \param res output of size this->getNumberOfCells
3870  */
3871 void MEDCouplingUMesh::project1D(const double *pt, const double *v, double eps, double *res) const
3872 {
3873   if(getMeshDimension()!=1)
3874     throw INTERP_KERNEL::Exception("Expected a umesh with meshDim == 1 for project1D !");
3875   if(_types.size()!=1 || *(_types.begin())!=INTERP_KERNEL::NORM_SEG2)
3876     throw INTERP_KERNEL::Exception("Expected a umesh with only NORM_SEG2 type of elements for project1D !");
3877   if(getSpaceDimension()!=3)
3878     throw INTERP_KERNEL::Exception("Expected a umesh with spaceDim==3 for project1D !");
3879   MCAuto<MEDCouplingFieldDouble> f=buildDirectionVectorField();
3880   const double *fPtr=f->getArray()->getConstPointer();
3881   double tmp[3];
3882   for(std::size_t i=0;i<getNumberOfCells();i++)
3883     {
3884       const double *tmp1=fPtr+3*i;
3885       tmp[0]=tmp1[1]*v[2]-tmp1[2]*v[1];
3886       tmp[1]=tmp1[2]*v[0]-tmp1[0]*v[2];
3887       tmp[2]=tmp1[0]*v[1]-tmp1[1]*v[0];
3888       double n1=INTERP_KERNEL::norm<3>(tmp);
3889       n1/=INTERP_KERNEL::norm<3>(tmp1);
3890       if(n1>eps)
3891         throw INTERP_KERNEL::Exception("UMesh::Projection 1D failed !");
3892     }
3893   const double *coo=getCoords()->getConstPointer();
3894   for(int i=0;i<getNumberOfNodes();i++)
3895     {
3896       std::transform(coo+i*3,coo+i*3+3,pt,tmp,std::minus<double>());
3897       std::transform(tmp,tmp+3,v,tmp,std::multiplies<double>());
3898       res[i]=std::accumulate(tmp,tmp+3,0.);
3899     }
3900 }
3901
3902 /*!
3903  * This method computes the distance from a point \a pt to \a this and the first \a cellId in \a this corresponding to the returned distance.
3904  * \a this is expected to be a mesh so that its space dimension is equal to its
3905  * mesh dimension + 1. Furthermore only mesh dimension 1 and 2 are supported for the moment.
3906  * Distance from \a ptBg to \a ptEnd is expected to be equal to the space dimension. \a this is also expected to be fully defined (connectivity and coordinates).
3907  *
3908  * WARNING, if there is some orphan nodes in \a this (nodes not fetched by any cells in \a this ( see MEDCouplingUMesh::zipCoords ) ) these nodes will ** not ** been taken
3909  * into account in this method. Only cells and nodes lying on them are considered in the algorithm (even if one of these orphan nodes is closer than returned distance).
3910  * A user that needs to consider orphan nodes should invoke DataArrayDouble::minimalDistanceTo method on the coordinates array of \a this.
3911  *
3912  * So this method is more accurate (so, more costly) than simply searching for the closest point in \a this.
3913  * If only this information is enough for you simply call \c getCoords()->distanceToTuple on \a this.
3914  *
3915  * \param [in] ptBg the start pointer (included) of the coordinates of the point
3916  * \param [in] ptEnd the end pointer (not included) of the coordinates of the point
3917  * \param [out] cellId that corresponds to minimal distance. If the closer node is not linked to any cell in \a this -1 is returned.
3918  * \return the positive value of the distance.
3919  * \throw if distance from \a ptBg to \a ptEnd is not equal to the space dimension. An exception is also thrown if mesh dimension of \a this is not equal to space
3920  * dimension - 1.
3921  * \sa DataArrayDouble::distanceToTuple, MEDCouplingUMesh::distanceToPoints
3922  */
3923 double MEDCouplingUMesh::distanceToPoint(const double *ptBg, const double *ptEnd, int& cellId) const
3924 {
3925   int meshDim=getMeshDimension(),spaceDim=getSpaceDimension();
3926   if(meshDim!=spaceDim-1)
3927     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::distanceToPoint works only for spaceDim=meshDim+1 !");
3928   if(meshDim!=2 && meshDim!=1)
3929     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::distanceToPoint : only mesh dimension 2 and 1 are implemented !");
3930   checkFullyDefined();
3931   if((int)std::distance(ptBg,ptEnd)!=spaceDim)
3932     { std::ostringstream oss; oss << "MEDCouplingUMesh::distanceToPoint : input point has to have dimension equal to the space dimension of this (" << spaceDim << ") !"; throw INTERP_KERNEL::Exception(oss.str()); }
3933   DataArrayInt *ret1=0;
3934   MCAuto<DataArrayDouble> pts=DataArrayDouble::New(); pts->useArray(ptBg,false,DeallocType::C_DEALLOC,1,spaceDim);
3935   MCAuto<DataArrayDouble> ret0=distanceToPoints(pts,ret1);
3936   MCAuto<DataArrayInt> ret1Safe(ret1);
3937   cellId=*ret1Safe->begin();
3938   return *ret0->begin();
3939 }
3940
3941 /*!
3942  * This method computes the distance from each point of points serie \a pts (stored in a DataArrayDouble in which each tuple represents a point)
3943  *  to \a this  and the first \a cellId in \a this corresponding to the returned distance.
3944  * WARNING, if there is some orphan nodes in \a this (nodes not fetched by any cells in \a this ( see MEDCouplingUMesh::zipCoords ) ) these nodes will ** not ** been taken
3945  * into account in this method. Only cells and nodes lying on them are considered in the algorithm (even if one of these orphan nodes is closer than returned distance).
3946  * A user that needs to consider orphan nodes should invoke DataArrayDouble::minimalDistanceTo method on the coordinates array of \a this.
3947  *
3948  * \a this is expected to be a mesh so that its space dimension is equal to its
3949  * mesh dimension + 1. Furthermore only mesh dimension 1 and 2 are supported for the moment.
3950  * Number of components of \a pts is expected to be equal to the space dimension. \a this is also expected to be fully defined (connectivity and coordinates).
3951  *
3952  * So this method is more accurate (so, more costly) than simply searching for each point in \a pts the closest point in \a this.
3953  * If only this information is enough for you simply call \c getCoords()->distanceToTuple on \a this.
3954  *
3955  * \param [in] pts the list of points in which each tuple represents a point
3956  * \param [out] cellIds a newly allocated object that tells for each point in \a pts the first cell id in \a this that minimizes the distance.
3957  * \return a newly allocated object to be dealed by the caller that tells for each point in \a pts the distance to \a this.
3958  * \throw if number of components of \a pts is not equal to the space dimension.
3959  * \throw if mesh dimension of \a this is not equal to space dimension - 1.
3960  * \sa DataArrayDouble::distanceToTuple, MEDCouplingUMesh::distanceToPoint
3961  */
3962 DataArrayDouble *MEDCouplingUMesh::distanceToPoints(const DataArrayDouble *pts, DataArrayInt *& cellIds) const
3963 {
3964   if(!pts)
3965     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::distanceToPoints : input points pointer is NULL !");
3966   pts->checkAllocated();
3967   int meshDim=getMeshDimension(),spaceDim=getSpaceDimension();
3968   if(meshDim!=spaceDim-1)
3969     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::distanceToPoints works only for spaceDim=meshDim+1 !");
3970   if(meshDim!=2 && meshDim!=1)
3971     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::distanceToPoints : only mesh dimension 2 and 1 are implemented !");
3972   if((int)pts->getNumberOfComponents()!=spaceDim)
3973     {
3974       std::ostringstream oss; oss << "MEDCouplingUMesh::distanceToPoints : input pts DataArrayDouble has " << pts->getNumberOfComponents() << " components whereas it should be equal to " << spaceDim << " (mesh spaceDimension) !";
3975       throw INTERP_KERNEL::Exception(oss.str());
3976     }
3977   checkFullyDefined();
3978   int nbCells=getNumberOfCells();
3979   if(nbCells==0)
3980     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::distanceToPoints : no cells in this !");
3981   int nbOfPts=pts->getNumberOfTuples();
3982   MCAuto<DataArrayDouble> ret0=DataArrayDouble::New(); ret0->alloc(nbOfPts,1);
3983   MCAuto<DataArrayInt> ret1=DataArrayInt::New(); ret1->alloc(nbOfPts,1);
3984   const int *nc=_nodal_connec->begin(),*ncI=_nodal_connec_index->begin(); const double *coords=_coords->begin();
3985   double *ret0Ptr=ret0->getPointer(); int *ret1Ptr=ret1->getPointer(); const double *ptsPtr=pts->begin();
3986   MCAuto<DataArrayDouble> bboxArr(getBoundingBoxForBBTree());
3987   const double *bbox(bboxArr->begin());
3988   switch(spaceDim)
3989   {
3990     case 3:
3991       {
3992         BBTreeDst<3> myTree(bbox,0,0,nbCells);
3993         for(int i=0;i<nbOfPts;i++,ret0Ptr++,ret1Ptr++,ptsPtr+=3)
3994           {
3995             double x=std::numeric_limits<double>::max();
3996             std::vector<int> elems;
3997             myTree.getMinDistanceOfMax(ptsPtr,x);
3998             myTree.getElemsWhoseMinDistanceToPtSmallerThan(ptsPtr,x,elems);
3999             DistanceToPoint3DSurfAlg(ptsPtr,&elems[0],&elems[0]+elems.size(),coords,nc,ncI,*ret0Ptr,*ret1Ptr);
4000           }
4001         break;
4002       }
4003     case 2:
4004       {
4005         BBTreeDst<2> myTree(bbox,0,0,nbCells);
4006         for(int i=0;i<nbOfPts;i++,ret0Ptr++,ret1Ptr++,ptsPtr+=2)
4007           {
4008             double x=std::numeric_limits<double>::max();
4009             std::vector<int> elems;
4010             myTree.getMinDistanceOfMax(ptsPtr,x);
4011             myTree.getElemsWhoseMinDistanceToPtSmallerThan(ptsPtr,x,elems);
4012             DistanceToPoint2DCurveAlg(ptsPtr,&elems[0],&elems[0]+elems.size(),coords,nc,ncI,*ret0Ptr,*ret1Ptr);
4013           }
4014         break;
4015       }
4016     default:
4017       throw INTERP_KERNEL::Exception("MEDCouplingUMesh::distanceToPoints : only spacedim 2 and 3 supported !");
4018   }
4019   cellIds=ret1.retn();
4020   return ret0.retn();
4021 }
4022
4023 /// @cond INTERNAL
4024
4025 /// @endcond
4026
4027 /*!
4028  * Finds cells in contact with a ball (i.e. a point with precision).
4029  * For speed reasons, the INTERP_KERNEL::NORM_QUAD4, INTERP_KERNEL::NORM_TRI6 and INTERP_KERNEL::NORM_QUAD8 cells are considered as convex cells to detect if a point is IN or OUT.
4030  * If it is not the case, please change their types to INTERP_KERNEL::NORM_POLYGON or INTERP_KERNEL::NORM_QPOLYG before invoking this method.
4031  *
4032  * \warning This method is suitable if the caller intends to evaluate only one
4033  *          point, for more points getCellsContainingPoints() is recommended as it is
4034  *          faster.
4035  *  \param [in] pos - array of coordinates of the ball central point.
4036  *  \param [in] eps - ball radius.
4037  *  \return int - a smallest id of cells being in contact with the ball, -1 in case
4038  *         if there are no such cells.
4039  *  \throw If the coordinates array is not set.
4040  *  \throw If \a this->getMeshDimension() != \a this->getSpaceDimension().
4041  */
4042 int MEDCouplingUMesh::getCellContainingPoint(const double *pos, double eps) const
4043 {
4044   std::vector<int> elts;
4045   getCellsContainingPoint(pos,eps,elts);
4046   if(elts.empty())
4047     return -1;
4048   return elts.front();
4049 }
4050
4051 /*!
4052  * Finds cells in contact with a ball (i.e. a point with precision).
4053  * For speed reasons, the INTERP_KERNEL::NORM_QUAD4, INTERP_KERNEL::NORM_TRI6 and INTERP_KERNEL::NORM_QUAD8 cells are considered as convex cells to detect if a point is IN or OUT.
4054  * If it is not the case, please change their types to INTERP_KERNEL::NORM_POLYGON or INTERP_KERNEL::NORM_QPOLYG before invoking this method.
4055  * \warning This method is suitable if the caller intends to evaluate only one
4056  *          point, for more points getCellsContainingPoints() is recommended as it is
4057  *          faster.
4058  *  \param [in] pos - array of coordinates of the ball central point.
4059  *  \param [in] eps - ball radius.
4060  *  \param [out] elts - vector returning ids of the found cells. It is cleared
4061  *         before inserting ids.
4062  *  \throw If the coordinates array is not set.
4063  *  \throw If \a this->getMeshDimension() != \a this->getSpaceDimension().
4064  *
4065  *  \if ENABLE_EXAMPLES
4066  *  \ref cpp_mcumesh_getCellsContainingPoint "Here is a C++ example".<br>
4067  *  \ref  py_mcumesh_getCellsContainingPoint "Here is a Python example".
4068  *  \endif
4069  */
4070 void MEDCouplingUMesh::getCellsContainingPoint(const double *pos, double eps, std::vector<int>& elts) const
4071 {
4072   MCAuto<DataArrayInt> eltsUg,eltsIndexUg;
4073   getCellsContainingPoints(pos,1,eps,eltsUg,eltsIndexUg);
4074   elts.clear(); elts.insert(elts.end(),eltsUg->begin(),eltsUg->end());
4075 }
4076
4077 void MEDCouplingUMesh::getCellsContainingPointsZeAlg(const double *pos, int nbOfPoints, double eps,
4078                                                      MCAuto<DataArrayInt>& elts, MCAuto<DataArrayInt>& eltsIndex,
4079                                                      std::function<bool(INTERP_KERNEL::NormalizedCellType,int)> sensibilityTo2DQuadraticLinearCellsFunc) const
4080 {
4081   int spaceDim(getSpaceDimension()),mDim(getMeshDimension());
4082   if(spaceDim==3)
4083     {
4084       if(mDim==3)
4085         {
4086           const double *coords=_coords->getConstPointer();
4087           getCellsContainingPointsAlg<3>(coords,pos,nbOfPoints,eps,elts,eltsIndex,sensibilityTo2DQuadraticLinearCellsFunc);
4088         }
4089       else
4090         throw INTERP_KERNEL::Exception("For spaceDim==3 only meshDim==3 implemented for getelementscontainingpoints !");
4091     }
4092   else if(spaceDim==2)
4093     {
4094       if(mDim==2)
4095         {
4096           const double *coords=_coords->getConstPointer();
4097           getCellsContainingPointsAlg<2>(coords,pos,nbOfPoints,eps,elts,eltsIndex,sensibilityTo2DQuadraticLinearCellsFunc);
4098         }
4099       else
4100         throw INTERP_KERNEL::Exception("For spaceDim==2 only meshDim==2 implemented for getelementscontainingpoints !");
4101     }
4102   else if(spaceDim==1)
4103     {
4104       if(mDim==1)
4105         {
4106           const double *coords=_coords->getConstPointer();
4107           getCellsContainingPointsAlg<1>(coords,pos,nbOfPoints,eps,elts,eltsIndex,sensibilityTo2DQuadraticLinearCellsFunc);
4108         }
4109       else
4110         throw INTERP_KERNEL::Exception("For spaceDim==1 only meshDim==1 implemented for getelementscontainingpoints !");
4111     }
4112   else
4113     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getCellsContainingPoints : not managed for mdim not in [1,2,3] !");
4114 }
4115
4116 /*!
4117  * Finds cells in contact with several balls (i.e. points with precision).
4118  * This method is an extension of getCellContainingPoint() and
4119  * getCellsContainingPoint() for the case of multiple points.
4120  * For speed reasons, the INTERP_KERNEL::NORM_QUAD4, INTERP_KERNEL::NORM_TRI6 and INTERP_KERNEL::NORM_QUAD8 cells are considered as convex cells to detect if a point is IN or OUT.
4121  * If it is not the case, please change their types to INTERP_KERNEL::NORM_POLYGON or INTERP_KERNEL::NORM_QPOLYG before invoking this method.
4122  *  \param [in] pos - an array of coordinates of points in full interlace mode :
4123  *         X0,Y0,Z0,X1,Y1,Z1,... Size of the array must be \a
4124  *         this->getSpaceDimension() * \a nbOfPoints
4125  *  \param [in] nbOfPoints - number of points to locate within \a this mesh.
4126  *  \param [in] eps - radius of balls (i.e. the precision).
4127  *  \param [out] elts - vector returning ids of found cells.
4128  *  \param [out] eltsIndex - an array, of length \a nbOfPoints + 1,
4129  *         dividing cell ids in \a elts into groups each referring to one
4130  *         point. Its every element (except the last one) is an index pointing to the
4131  *         first id of a group of cells. For example cells in contact with the *i*-th
4132  *         point are described by following range of indices:
4133  *         [ \a eltsIndex[ *i* ], \a eltsIndex[ *i*+1 ] ) and the cell ids are
4134  *         \a elts[ \a eltsIndex[ *i* ]], \a elts[ \a eltsIndex[ *i* ] + 1 ], ...
4135  *         Number of cells in contact with the *i*-th point is
4136  *         \a eltsIndex[ *i*+1 ] - \a eltsIndex[ *i* ].
4137  *  \throw If the coordinates array is not set.
4138  *  \throw If \a this->getMeshDimension() != \a this->getSpaceDimension().
4139  *
4140  *  \if ENABLE_EXAMPLES
4141  *  \ref cpp_mcumesh_getCellsContainingPoints "Here is a C++ example".<br>
4142  *  \ref  py_mcumesh_getCellsContainingPoints "Here is a Python example".
4143  *  \endif
4144  */
4145 void MEDCouplingUMesh::getCellsContainingPoints(const double *pos, int nbOfPoints, double eps,
4146                                                 MCAuto<DataArrayInt>& elts, MCAuto<DataArrayInt>& eltsIndex) const
4147 {
4148   auto yesImSensibleTo2DQuadraticLinearCellsFunc([](INTERP_KERNEL::NormalizedCellType ct, int mdim) { return INTERP_KERNEL::CellModel::GetCellModel(ct).isQuadratic() && mdim == 2; } );
4149   this->getCellsContainingPointsZeAlg(pos,nbOfPoints,eps,elts,eltsIndex,yesImSensibleTo2DQuadraticLinearCellsFunc);
4150 }
4151
4152 /*!
4153  * Behaves like MEDCouplingMesh::getCellsContainingPoints for cells in \a this that are linear.
4154  * For quadratic cells in \a this, this method behaves by just considering linear part of cells.
4155  * This method is here only for backward compatibility (interpolation GaussPoints to GaussPoints).
4156  * 
4157  * \sa MEDCouplingUMesh::getCellsContainingPoints, MEDCouplingRemapper::prepareNotInterpKernelOnlyGaussGauss
4158  */
4159 void MEDCouplingUMesh::getCellsContainingPointsLinearPartOnlyOnNonDynType(const double *pos, int nbOfPoints, double eps, MCAuto<DataArrayInt>& elts, MCAuto<DataArrayInt>& eltsIndex) const
4160 {
4161   auto noImNotSensibleTo2DQuadraticLinearCellsFunc([](INTERP_KERNEL::NormalizedCellType,int) { return false; } );
4162   this->getCellsContainingPointsZeAlg(pos,nbOfPoints,eps,elts,eltsIndex,noImNotSensibleTo2DQuadraticLinearCellsFunc);
4163 }
4164
4165 /*!
4166  * Finds butterfly cells in \a this mesh. A 2D cell is considered to be butterfly if at
4167  * least two its edges intersect each other anywhere except their extremities. An
4168  * INTERP_KERNEL::NORM_NORI3 cell can \b not be butterfly.
4169  *  \param [in,out] cells - a vector returning ids of the found cells. It is not
4170  *         cleared before filling in.
4171  *  \param [in] eps - precision.
4172  *  \throw If \a this->getMeshDimension() != 2.
4173  *  \throw If \a this->getSpaceDimension() != 2 && \a this->getSpaceDimension() != 3.
4174  */
4175 void MEDCouplingUMesh::checkButterflyCells(std::vector<int>& cells, double eps) const
4176 {
4177   const char msg[]="Butterfly detection work only for 2D cells with spaceDim==2 or 3!";
4178   if(getMeshDimension()!=2)
4179     throw INTERP_KERNEL::Exception(msg);
4180   int spaceDim=getSpaceDimension();
4181   if(spaceDim!=2 && spaceDim!=3)
4182     throw INTERP_KERNEL::Exception(msg);
4183   const int *conn=_nodal_connec->getConstPointer();
4184   const int *connI=_nodal_connec_index->getConstPointer();
4185   int nbOfCells=getNumberOfCells();
4186   std::vector<double> cell2DinS2;
4187   for(int i=0;i<nbOfCells;i++)
4188     {
4189       int offset=connI[i];
4190       int nbOfNodesForCell=connI[i+1]-offset-1;
4191       if(nbOfNodesForCell<=3)
4192         continue;
4193       bool isQuad=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[offset]).isQuadratic();
4194       project2DCellOnXY(conn+offset+1,conn+connI[i+1],cell2DinS2);
4195       if(isButterfly2DCell(cell2DinS2,isQuad,eps))
4196         cells.push_back(i);
4197       cell2DinS2.clear();
4198     }
4199 }
4200
4201 /*!
4202  * This method is typically requested to unbutterfly 2D linear cells in \b this.
4203  *
4204  * This method expects that space dimension is equal to 2 and mesh dimension is equal to 2 too. If it is not the case an INTERP_KERNEL::Exception will be thrown.
4205  * This method works only for linear 2D cells. If there is any of non linear cells (INTERP_KERNEL::NORM_QUAD8 for example) an INTERP_KERNEL::Exception will be thrown too.
4206  *
4207  * For each 2D linear cell in \b this, this method builds the convex envelop (or the convex hull) of the current cell.
4208  * This convex envelop is computed using Jarvis march algorithm.
4209  * The coordinates and the number of cells of \b this remain unchanged on invocation of this method.
4210  * Only connectivity of some cells could be modified if those cells were not representing a convex envelop. If a cell already equals its convex envelop (regardless orientation)
4211  * its connectivity will remain unchanged. If the computation leads to a modification of nodal connectivity of a cell its geometric type will be modified to INTERP_KERNEL::NORM_POLYGON.
4212  *
4213  * \return a newly allocated array containing cellIds that have been modified if any. If no cells have been impacted by this method NULL is returned.
4214  * \sa MEDCouplingUMesh::colinearize2D
4215  */
4216 DataArrayInt *MEDCouplingUMesh::convexEnvelop2D()
4217 {
4218   if(getMeshDimension()!=2 || getSpaceDimension()!=2)
4219     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convexEnvelop2D  works only for meshDim=2 and spaceDim=2 !");
4220   checkFullyDefined();
4221   const double *coords=getCoords()->getConstPointer();
4222   int nbOfCells=getNumberOfCells();
4223   MCAuto<DataArrayInt> nodalConnecIndexOut=DataArrayInt::New();
4224   nodalConnecIndexOut->alloc(nbOfCells+1,1);
4225   MCAuto<DataArrayInt> nodalConnecOut(DataArrayInt::New());
4226   int *workIndexOut=nodalConnecIndexOut->getPointer();
4227   *workIndexOut=0;
4228   const int *nodalConnecIn=_nodal_connec->getConstPointer();
4229   const int *nodalConnecIndexIn=_nodal_connec_index->getConstPointer();
4230   std::set<INTERP_KERNEL::NormalizedCellType> types;
4231   MCAuto<DataArrayInt> isChanged(DataArrayInt::New());
4232   isChanged->alloc(0,1);
4233   for(int i=0;i<nbOfCells;i++,workIndexOut++)
4234     {
4235       int pos=nodalConnecOut->getNumberOfTuples();
4236       if(BuildConvexEnvelopOf2DCellJarvis(coords,nodalConnecIn+nodalConnecIndexIn[i],nodalConnecIn+nodalConnecIndexIn[i+1],nodalConnecOut))
4237         isChanged->pushBackSilent(i);
4238       types.insert((INTERP_KERNEL::NormalizedCellType)nodalConnecOut->getIJ(pos,0));
4239       workIndexOut[1]=nodalConnecOut->getNumberOfTuples();
4240     }
4241   if(isChanged->empty())
4242     return 0;
4243   setConnectivity(nodalConnecOut,nodalConnecIndexOut,false);
4244   _types=types;
4245   return isChanged.retn();
4246 }
4247
4248 /*!
4249  * This method is \b NOT const because it can modify \a this.
4250  * \a this is expected to be an unstructured mesh with meshDim==2 and spaceDim==3. If not an exception will be thrown.
4251  * \param mesh1D is an unstructured mesh with MeshDim==1 and spaceDim==3. If not an exception will be thrown.
4252  * \param policy specifies the type of extrusion chosen:
4253  *   - \b 0 for translation only (most simple): the cells of the 1D mesh represent the vectors along which the 2D mesh
4254  *   will be repeated to build each level
4255  *   - \b 1 for translation and rotation: the translation is done as above. For each level, an arc of circle is fitted on
4256  *   the 3 preceding points of the 1D mesh. The center of the arc is the center of rotation for each level, the rotation is done
4257  *   along an axis normal to the plane containing the arc, and finally the angle of rotation is defined by the first two points on the
4258  *   arc.
4259  * \return an unstructured mesh with meshDim==3 and spaceDim==3. The returned mesh has the same coords than \a this.
4260  */
4261 MEDCouplingUMesh *MEDCouplingUMesh::buildExtrudedMesh(const MEDCouplingUMesh *mesh1D, int policy)
4262 {
4263   checkFullyDefined();
4264   mesh1D->checkFullyDefined();
4265   if(!mesh1D->isContiguous1D())
4266     throw INTERP_KERNEL::Exception("buildExtrudedMesh : 1D mesh passed in parameter is not contiguous !");
4267   if(getSpaceDimension()!=mesh1D->getSpaceDimension())
4268     throw INTERP_KERNEL::Exception("Invalid call to buildExtrudedMesh this and mesh1D must have same space dimension !");
4269   if((getMeshDimension()!=2 || getSpaceDimension()!=3) && (getMeshDimension()!=1 || getSpaceDimension()!=2))
4270     throw INTERP_KERNEL::Exception("Invalid 'this' for buildExtrudedMesh method : must be (meshDim==2 and spaceDim==3) or (meshDim==1 and spaceDim==2) !");
4271   if(mesh1D->getMeshDimension()!=1)
4272     throw INTERP_KERNEL::Exception("Invalid 'mesh1D' for buildExtrudedMesh method : must be meshDim==1 !");
4273   bool isQuad=false;
4274   if(isPresenceOfQuadratic())
4275     {
4276       if(mesh1D->isFullyQuadratic())
4277         isQuad=true;
4278       else
4279         throw INTERP_KERNEL::Exception("Invalid 2D mesh and 1D mesh because 2D mesh has quadratic cells and 1D is not fully quadratic !");
4280     }
4281   int oldNbOfNodes(getNumberOfNodes());
4282   MCAuto<DataArrayDouble> newCoords;
4283   switch(policy)
4284   {
4285     case 0:
4286       {
4287         newCoords=fillExtCoordsUsingTranslation(mesh1D,isQuad);
4288         break;
4289       }
4290     case 1:
4291       {
4292         newCoords=fillExtCoordsUsingTranslAndAutoRotation(mesh1D,isQuad);
4293         break;
4294       }
4295     default:
4296       throw INTERP_KERNEL::Exception("Not implemented extrusion policy : must be in (0) !");
4297   }
4298   setCoords(newCoords);
4299   MCAuto<MEDCouplingUMesh> ret(buildExtrudedMeshFromThisLowLev(oldNbOfNodes,isQuad));
4300   updateTime();
4301   return ret.retn();
4302 }
4303
4304
4305 /*!
4306  * Checks if \a this mesh is constituted by only quadratic cells.
4307  *  \return bool - \c true if there are only quadratic cells in \a this mesh.
4308  *  \throw If the coordinates array is not set.
4309  *  \throw If the nodal connectivity of cells is not defined.
4310  */
4311 bool MEDCouplingUMesh::isFullyQuadratic() const
4312 {
4313   checkFullyDefined();
4314   bool ret=true;
4315   int nbOfCells=getNumberOfCells();
4316   for(int i=0;i<nbOfCells && ret;i++)
4317     {
4318       INTERP_KERNEL::NormalizedCellType type=getTypeOfCell(i);
4319       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(type);
4320       ret=cm.isQuadratic();
4321     }
4322   return ret;
4323 }
4324
4325 /*!
4326  * Checks if \a this mesh includes any quadratic cell.
4327  *  \return bool - \c true if there is at least one quadratic cells in \a this mesh.
4328  *  \throw If the coordinates array is not set.
4329  *  \throw If the nodal connectivity of cells is not defined.
4330  */
4331 bool MEDCouplingUMesh::isPresenceOfQuadratic() const
4332 {
4333   checkFullyDefined();
4334   bool ret=false;
4335   int nbOfCells=getNumberOfCells();
4336   for(int i=0;i<nbOfCells && !ret;i++)
4337     {
4338       INTERP_KERNEL::NormalizedCellType type=getTypeOfCell(i);
4339       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(type);
4340       ret=cm.isQuadratic();
4341     }
4342   return ret;
4343 }
4344
4345 /*!
4346  * Converts all quadratic cells to linear ones. If there are no quadratic cells in \a
4347  * this mesh, it remains unchanged.
4348  *  \throw If the coordinates array is not set.
4349  *  \throw If the nodal connectivity of cells is not defined.
4350  */
4351 void MEDCouplingUMesh::convertQuadraticCellsToLinear()
4352 {
4353   checkFullyDefined();
4354   int nbOfCells(getNumberOfCells());
4355   int delta=0;
4356   const int *iciptr=_nodal_connec_index->begin();
4357   for(int i=0;i<nbOfCells;i++)
4358     {
4359       INTERP_KERNEL::NormalizedCellType type=getTypeOfCell(i);
4360       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(type);
4361       if(cm.isQuadratic())
4362         {
4363           INTERP_KERNEL::NormalizedCellType typel=cm.getLinearType();
4364           const INTERP_KERNEL::CellModel& cml=INTERP_KERNEL::CellModel::GetCellModel(typel);
4365           if(!cml.isDynamic())
4366             delta+=cm.getNumberOfNodes()-cml.getNumberOfNodes();
4367           else
4368             delta+=(iciptr[i+1]-iciptr[i]-1)/2;
4369         }
4370     }
4371   if(delta==0)
4372     return ;
4373   MCAuto<DataArrayInt> newConn(DataArrayInt::New()),newConnI(DataArrayInt::New());
4374   const int *icptr(_nodal_connec->begin());
4375   newConn->alloc(getNodalConnectivityArrayLen()-delta,1);
4376   newConnI->alloc(nbOfCells+1,1);
4377   int *ocptr(newConn->getPointer()),*ociptr(newConnI->getPointer());
4378   *ociptr=0;
4379   _types.clear();
4380   for(int i=0;i<nbOfCells;i++,ociptr++)
4381     {
4382       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)icptr[iciptr[i]];
4383       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(type);
4384       if(!cm.isQuadratic())
4385         {
4386           _types.insert(type);
4387           ocptr=std::copy(icptr+iciptr[i],icptr+iciptr[i+1],ocptr);
4388           ociptr[1]=ociptr[0]+iciptr[i+1]-iciptr[i];
4389         }
4390       else
4391         {
4392           INTERP_KERNEL::NormalizedCellType typel=cm.getLinearType();
4393           _types.insert(typel);
4394           const INTERP_KERNEL::CellModel& cml=INTERP_KERNEL::CellModel::GetCellModel(typel);
4395           int newNbOfNodes=cml.getNumberOfNodes();
4396           if(cml.isDynamic())
4397             newNbOfNodes=(iciptr[i+1]-iciptr[i]-1)/2;
4398           *ocptr++=(int)typel;
4399           ocptr=std::copy(icptr+iciptr[i]+1,icptr+iciptr[i]+newNbOfNodes+1,ocptr);
4400           ociptr[1]=ociptr[0]+newNbOfNodes+1;
4401         }
4402     }
4403   setConnectivity(newConn,newConnI,false);
4404 }
4405
4406 /*!
4407  * This method converts all linear cell in \a this to quadratic one.
4408  * Contrary to MEDCouplingUMesh::convertQuadraticCellsToLinear method, here it is needed to specify the target
4409  * type of cells expected. For example INTERP_KERNEL::NORM_TRI3 can be converted to INTERP_KERNEL::NORM_TRI6 if \a conversionType is equal to 0 (the default)
4410  * or to INTERP_KERNEL::NORM_TRI7 if \a conversionType is equal to 1. All non linear cells and polyhedron in \a this are let untouched.
4411  * Contrary to MEDCouplingUMesh::convertQuadraticCellsToLinear method, the coordinates in \a this can be become bigger. All created nodes will be put at the
4412  * end of the existing coordinates.
4413  *
4414  * \param [in] conversionType specifies the type of conversion expected. Only 0 (default) and 1 are supported presently. 0 those that creates the 'most' simple
4415  *             corresponding quadratic cells. 1 is those creating the 'most' complex.
4416  * \return a newly created DataArrayInt instance that the caller should deal with containing cell ids of converted cells.
4417  *
4418  * \throw if \a this is not fully defined. It throws too if \a conversionType is not in [0,1].
4419  *
4420  * \sa MEDCouplingUMesh::convertQuadraticCellsToLinear
4421  */
4422 DataArrayInt *MEDCouplingUMesh::convertLinearCellsToQuadratic(int conversionType)
4423 {
4424   DataArrayInt *conn=0,*connI=0;
4425   DataArrayDouble *coords=0;
4426   std::set<INTERP_KERNEL::NormalizedCellType> types;
4427   checkFullyDefined();
4428   MCAuto<DataArrayInt> ret,connSafe,connISafe;
4429   MCAuto<DataArrayDouble> coordsSafe;
4430   int meshDim=getMeshDimension();
4431   switch(conversionType)
4432   {
4433     case 0:
4434       switch(meshDim)
4435       {
4436         case 1:
4437           ret=convertLinearCellsToQuadratic1D0(conn,connI,coords,types);
4438           connSafe=conn; connISafe=connI; coordsSafe=coords;
4439           break;
4440         case 2:
4441           ret=convertLinearCellsToQuadratic2D0(conn,connI,coords,types);
4442           connSafe=conn; connISafe=connI; coordsSafe=coords;
4443           break;
4444         case 3:
4445           ret=convertLinearCellsToQuadratic3D0(conn,connI,coords,types);
4446           connSafe=conn; connISafe=connI; coordsSafe=coords;
4447           break;
4448         default:
4449           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertLinearCellsToQuadratic : conversion of type 0 mesh dimensions available are [1,2,3] !");
4450       }
4451       break;
4452         case 1:
4453           {
4454             switch(meshDim)
4455             {
4456               case 1:
4457                 ret=convertLinearCellsToQuadratic1D0(conn,connI,coords,types);//it is not a bug. In 1D policy 0 and 1 are equals
4458                 connSafe=conn; connISafe=connI; coordsSafe=coords;
4459                 break;
4460               case 2:
4461                 ret=convertLinearCellsToQuadratic2D1(conn,connI,coords,types);
4462                 connSafe=conn; connISafe=connI; coordsSafe=coords;
4463                 break;
4464               case 3:
4465                 ret=convertLinearCellsToQuadratic3D1(conn,connI,coords,types);
4466                 connSafe=conn; connISafe=connI; coordsSafe=coords;
4467                 break;
4468               default:
4469                 throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertLinearCellsToQuadratic : conversion of type 1 mesh dimensions available are [1,2,3] !");
4470             }
4471             break;
4472           }
4473         default:
4474           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertLinearCellsToQuadratic : conversion type available are 0 (default, the simplest) and 1 (the most complex) !");
4475   }
4476   setConnectivity(connSafe,connISafe,false);
4477   _types=types;
4478   setCoords(coordsSafe);
4479   return ret.retn();
4480 }
4481
4482 /*!
4483  * Tessellates \a this 2D mesh by dividing not straight edges of quadratic faces,
4484  * so that the number of cells remains the same. Quadratic faces are converted to
4485  * polygons. This method works only for 2D meshes in
4486  * 2D space. If no cells are quadratic (INTERP_KERNEL::NORM_QUAD8,
4487  * INTERP_KERNEL::NORM_TRI6, INTERP_KERNEL::NORM_QPOLYG ), \a this mesh remains unchanged.
4488  * \warning This method can lead to a huge amount of nodes if \a eps is very low.
4489  *  \param [in] eps - specifies the maximal angle (in radians) between 2 sub-edges of
4490  *         a polylinized edge constituting the input polygon.
4491  *  \throw If the coordinates array is not set.
4492  *  \throw If the nodal connectivity of cells is not defined.
4493  *  \throw If \a this->getMeshDimension() != 2.
4494  *  \throw If \a this->getSpaceDimension() != 2.
4495  */
4496 void MEDCouplingUMesh::tessellate2D(double eps)
4497 {
4498   int meshDim(getMeshDimension()),spaceDim(getSpaceDimension());
4499   if(spaceDim!=2)
4500     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::tessellate2D : works only with space dimension equal to 2 !");
4501   switch(meshDim)
4502     {
4503     case 1:
4504       return tessellate2DCurveInternal(eps);
4505     case 2:
4506       return tessellate2DInternal(eps);
4507     default:
4508       throw INTERP_KERNEL::Exception("MEDCouplingUMesh::tessellate2D : mesh dimension must be in [1,2] !");
4509     }
4510 }
4511
4512 #if 0
4513 /*!
4514  * This method only works if \a this has spaceDimension equal to 2 and meshDimension also equal to 2.
4515  * This method allows to modify connectivity of cells in \a this that shares some edges in \a edgeIdsToBeSplit.
4516  * The nodes to be added in those 2D cells are defined by the pair of \a  nodeIdsToAdd and \a nodeIdsIndexToAdd.
4517  * Length of \a nodeIdsIndexToAdd is expected to equal to length of \a edgeIdsToBeSplit + 1.
4518  * The node ids in \a nodeIdsToAdd should be valid. Those nodes have to be sorted exactly following exactly the direction of the edge.
4519  * This method can be seen as the opposite method of colinearize2D.
4520  * This method can be lead to create some new nodes if quadratic polygon cells have to be split. In this case the added nodes will be put at the end
4521  * to avoid to modify the numbering of existing nodes.
4522  *
4523  * \param [in] nodeIdsToAdd - the list of node ids to be added (\a nodeIdsIndexToAdd array allows to walk on this array)
4524  * \param [in] nodeIdsIndexToAdd - the entry point of \a nodeIdsToAdd to point to the corresponding nodes to be added.
4525  * \param [in] mesh1Desc - 1st output of buildDescendingConnectivity2 on \a this.
4526  * \param [in] desc - 2nd output of buildDescendingConnectivity2 on \a this.
4527  * \param [in] descI - 3rd output of buildDescendingConnectivity2 on \a this.
4528  * \param [in] revDesc - 4th output of buildDescendingConnectivity2 on \a this.
4529  * \param [in] revDescI - 5th output of buildDescendingConnectivity2 on \a this.
4530  *
4531  * \sa buildDescendingConnectivity2
4532  */
4533 void MEDCouplingUMesh::splitSomeEdgesOf2DMesh(const DataArrayInt *nodeIdsToAdd, const DataArrayInt *nodeIdsIndexToAdd, const DataArrayInt *edgeIdsToBeSplit,
4534                                               const MEDCouplingUMesh *mesh1Desc, const DataArrayInt *desc, const DataArrayInt *descI, const DataArrayInt *revDesc, const DataArrayInt *revDescI)
4535 {
4536   if(!nodeIdsToAdd || !nodeIdsIndexToAdd || !edgeIdsToBeSplit || !mesh1Desc || !desc || !descI || !revDesc || !revDescI)
4537     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::splitSomeEdgesOf2DMesh : input pointers must be not NULL !");
4538   nodeIdsToAdd->checkAllocated(); nodeIdsIndexToAdd->checkAllocated(); edgeIdsToBeSplit->checkAllocated(); desc->checkAllocated(); descI->checkAllocated(); revDesc->checkAllocated(); revDescI->checkAllocated();
4539   if(getSpaceDimension()!=2 || getMeshDimension()!=2)
4540     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::splitSomeEdgesOf2DMesh : this must have spacedim=meshdim=2 !");
4541   if(mesh1Desc->getSpaceDimension()!=2 || mesh1Desc->getMeshDimension()!=1)
4542     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::splitSomeEdgesOf2DMesh : mesh1Desc must be the explosion of this with spaceDim=2 and meshDim = 1 !");
4543   //DataArrayInt *out0(0),*outi0(0);
4544   //MEDCouplingUMesh::ExtractFromIndexedArrays(idsInDesc2DToBeRefined->begin(),idsInDesc2DToBeRefined->end(),dd3,dd4,out0,outi0);
4545   //MCAuto<DataArrayInt> out0s(out0),outi0s(outi0);
4546   //out0s=out0s->buildUnique(); out0s->sort(true);
4547 }
4548 #endif
4549
4550
4551 /*!
4552  * Divides every cell of \a this mesh into simplices (triangles in 2D and tetrahedra in 3D).
4553  * In addition, returns an array mapping new cells to old ones. <br>
4554  * This method typically increases the number of cells in \a this mesh
4555  * but the number of nodes remains \b unchanged.
4556  * That's why the 3D splitting policies
4557  * INTERP_KERNEL::GENERAL_24 and INTERP_KERNEL::GENERAL_48 are not available here.
4558  *  \param [in] policy - specifies a pattern used for splitting.
4559  * The semantic of \a policy is:
4560  * - 0 - to split QUAD4 by cutting it along 0-2 diagonal (for 2D mesh only).
4561  * - 1 - to split QUAD4 by cutting it along 1-3 diagonal (for 2D mesh only).
4562  * - INTERP_KERNEL::PLANAR_FACE_5 - to split HEXA8  into 5 TETRA4 (for 3D mesh only - see INTERP_KERNEL::SplittingPolicy for an image).
4563  * - INTERP_KERNEL::PLANAR_FACE_6 - to split HEXA8  into 6 TETRA4 (for 3D mesh only - see INTERP_KERNEL::SplittingPolicy for an image).
4564  *
4565  *
4566  *  \return DataArrayInt * - a new instance of DataArrayInt holding, for each new cell,
4567  *          an id of old cell producing it. The caller is to delete this array using
4568  *         decrRef() as it is no more needed.
4569  *
4570  *  \throw If \a policy is 0 or 1 and \a this->getMeshDimension() != 2.
4571  *  \throw If \a policy is INTERP_KERNEL::PLANAR_FACE_5 or INTERP_KERNEL::PLANAR_FACE_6
4572  *          and \a this->getMeshDimension() != 3.
4573  *  \throw If \a policy is not one of the four discussed above.
4574  *  \throw If the nodal connectivity of cells is not defined.
4575  * \sa MEDCouplingUMesh::tetrahedrize, MEDCoupling1SGTUMesh::sortHexa8EachOther
4576  */
4577 DataArrayInt *MEDCouplingUMesh::simplexize(int policy)
4578 {
4579   switch(policy)
4580   {
4581     case 0:
4582       return simplexizePol0();
4583     case 1:
4584       return simplexizePol1();
4585     case (int) INTERP_KERNEL::PLANAR_FACE_5:
4586         return simplexizePlanarFace5();
4587     case (int) INTERP_KERNEL::PLANAR_FACE_6:
4588         return simplexizePlanarFace6();
4589     default:
4590       throw INTERP_KERNEL::Exception("MEDCouplingUMesh::simplexize : unrecognized policy ! Must be :\n  - 0 or 1 (only available for meshdim=2) \n  - PLANAR_FACE_5, PLANAR_FACE_6  (only for meshdim=3)");
4591   }
4592 }
4593
4594 /*!
4595  * Checks if \a this mesh is constituted by simplex cells only. Simplex cells are:
4596  * - 1D: INTERP_KERNEL::NORM_SEG2
4597  * - 2D: INTERP_KERNEL::NORM_TRI3
4598  * - 3D: INTERP_KERNEL::NORM_TETRA4.
4599  *
4600  * This method is useful for users that need to use P1 field services as
4601  * MEDCouplingFieldDouble::getValueOn(), MEDCouplingField::buildMeasureField() etc.
4602  * All these methods need mesh support containing only simplex cells.
4603  *  \return bool - \c true if there are only simplex cells in \a this mesh.
4604  *  \throw If the coordinates array is not set.
4605  *  \throw If the nodal connectivity of cells is not defined.
4606  *  \throw If \a this->getMeshDimension() < 1.
4607  */
4608 bool MEDCouplingUMesh::areOnlySimplexCells() const
4609 {
4610   checkFullyDefined();
4611   int mdim=getMeshDimension();
4612   if(mdim<1 || mdim>3)
4613     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::areOnlySimplexCells : only available with meshes having a meshdim 1, 2 or 3 !");
4614   int nbCells=getNumberOfCells();
4615   const int *conn=_nodal_connec->begin();
4616   const int *connI=_nodal_connec_index->begin();
4617   for(int i=0;i<nbCells;i++)
4618     {
4619       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[connI[i]]);
4620       if(!cm.isSimplex())
4621         return false;
4622     }
4623   return true;
4624 }
4625
4626
4627
4628 /*!
4629  * Converts degenerated 2D or 3D linear cells of \a this mesh into cells of simpler
4630  * type. For example an INTERP_KERNEL::NORM_QUAD4 cell having only three unique nodes in
4631  * its connectivity is transformed into an INTERP_KERNEL::NORM_TRI3 cell.
4632  * Quadratic cells in 2D are also handled. In those cells edges where start=end=midpoint are removed.
4633  * This method does \b not perform geometrical checks and checks only nodal connectivity of cells,
4634  * so it can be useful to call mergeNodes() before calling this method.
4635  *  \throw If \a this->getMeshDimension() <= 1.
4636  *  \throw If the coordinates array is not set.
4637  *  \throw If the nodal connectivity of cells is not defined.
4638  */
4639 void MEDCouplingUMesh::convertDegeneratedCells()
4640 {
4641   checkFullyDefined();
4642   if(getMeshDimension()<=1)
4643     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertDegeneratedCells works on umeshes with meshdim equals to 2 or 3 !");
4644   int nbOfCells=getNumberOfCells();
4645   if(nbOfCells<1)
4646     return ;
4647   int initMeshLgth=getNodalConnectivityArrayLen();
4648   int *conn=_nodal_connec->getPointer();
4649   int *index=_nodal_connec_index->getPointer();
4650   int posOfCurCell=0;
4651   int newPos=0;
4652   int lgthOfCurCell;
4653   for(int i=0;i<nbOfCells;i++)
4654     {
4655       lgthOfCurCell=index[i+1]-posOfCurCell;
4656       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)conn[posOfCurCell];
4657       int newLgth;
4658       INTERP_KERNEL::NormalizedCellType newType=INTERP_KERNEL::CellSimplify::simplifyDegeneratedCell(type,conn+posOfCurCell+1,lgthOfCurCell-1,
4659                                                                                                      conn+newPos+1,newLgth);
4660       conn[newPos]=newType;
4661       newPos+=newLgth+1;
4662       posOfCurCell=index[i+1];
4663       index[i+1]=newPos;
4664     }
4665   if(newPos!=initMeshLgth)
4666     _nodal_connec->reAlloc(newPos);
4667   computeTypes();
4668 }
4669
4670 /*!
4671  * Same as MEDCouplingUMesh::convertDegeneratedCells() plus deletion of the flat cells.
4672  * A cell is flat in the following cases:
4673  *   - for a linear cell, all points in the connectivity are equal
4674  *   - for a quadratic cell, either the above, or a quadratic polygon with two (linear) points and two
4675  *   identical quadratic points
4676  * \return a new instance of DataArrayInt holding ids of removed cells. The caller is to delete
4677  *      this array using decrRef() as it is no more needed.
4678  */
4679 DataArrayInt *MEDCouplingUMesh::convertDegeneratedCellsAndRemoveFlatOnes()
4680 {
4681   checkFullyDefined();
4682   if(getMeshDimension()<=1)
4683     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertDegeneratedCells works on umeshes with meshdim equals to 2 or 3 !");
4684   int nbOfCells=getNumberOfCells();
4685   MCAuto<DataArrayInt> ret(DataArrayInt::New()); ret->alloc(0,1);
4686   if(nbOfCells<1)
4687     return ret.retn();
4688   int initMeshLgth=getNodalConnectivityArrayLen();
4689   int *conn=_nodal_connec->getPointer();
4690   int *index=_nodal_connec_index->getPointer();
4691   int posOfCurCell=0;
4692   int newPos=0;
4693   int lgthOfCurCell, nbDelCells(0);
4694   for(int i=0;i<nbOfCells;i++)
4695     {
4696       lgthOfCurCell=index[i+1]-posOfCurCell;
4697       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)conn[posOfCurCell];
4698       int newLgth;
4699       INTERP_KERNEL::NormalizedCellType newType=INTERP_KERNEL::CellSimplify::simplifyDegeneratedCell(type,conn+posOfCurCell+1,lgthOfCurCell-1,
4700                                                                                                      conn+newPos+1,newLgth);
4701       // Shall we delete the cell if it is completely degenerated:
4702       bool delCell=INTERP_KERNEL::CellSimplify::isFlatCell(conn, newPos, newLgth, newType);
4703       if (delCell)
4704         {
4705           nbDelCells++;
4706           ret->pushBackSilent(i);
4707         }
4708       else   //if the cell is to be deleted, simply stay at the same place
4709         {
4710           conn[newPos]=newType;
4711           newPos+=newLgth+1;
4712         }
4713       posOfCurCell=index[i+1];
4714       index[i+1-nbDelCells]=newPos;
4715     }
4716   if(newPos!=initMeshLgth)
4717     _nodal_connec->reAlloc(newPos);
4718   const int nCellDel=ret->getNumberOfTuples();
4719   if (nCellDel)
4720     _nodal_connec_index->reAlloc(nbOfCells-nCellDel+1);
4721   computeTypes();
4722   return ret.retn();
4723 }
4724
4725 /*!
4726  * This method remove null 1D cells from \a this. A 1D cell is considered null if start node is equal to end node.
4727  * Only connectivity is considered here.
4728  */
4729 bool MEDCouplingUMesh::removeDegenerated1DCells()
4730 {
4731   checkConnectivityFullyDefined();
4732   if(getMeshDimension()!=1)
4733     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::removeDegenerated1DCells works on umeshes with meshdim equals to 1 !");
4734   std::size_t nbCells(getNumberOfCells()),newSize(0),newSize2(0);
4735   const int *conn(getNodalConnectivity()->begin()),*conni(getNodalConnectivityIndex()->begin());
4736   {
4737     for(std::size_t i=0;i<nbCells;i++)
4738       {
4739         INTERP_KERNEL::NormalizedCellType ct((INTERP_KERNEL::NormalizedCellType)conn[conni[i]]);
4740         if(ct==INTERP_KERNEL::NORM_SEG2 || ct==INTERP_KERNEL::NORM_SEG3)
4741           {
4742             if(conn[conni[i]+1]!=conn[conni[i]+2])
4743               {
4744                 newSize++;
4745                 newSize2+=conni[i+1]-conni[i];
4746               }
4747           }
4748         else
4749           {
4750             std::ostringstream oss; oss << "MEDCouplingUMesh::removeDegenerated1DCells : cell #" << i << " in this is not of type SEG2/SEG3 !";
4751             throw INTERP_KERNEL::Exception(oss.str());
4752           }
4753       }
4754   }
4755   if(newSize==nbCells)//no cells has been removed -> do nothing
4756     return false;
4757   MCAuto<DataArrayInt> newConn(DataArrayInt::New()),newConnI(DataArrayInt::New()); newConnI->alloc(newSize+1,1); newConn->alloc(newSize2,1);
4758   int *newConnPtr(newConn->getPointer()),*newConnIPtr(newConnI->getPointer()); newConnIPtr[0]=0;
4759   for(std::size_t i=0;i<nbCells;i++)
4760     {
4761       if(conn[conni[i]+1]!=conn[conni[i]+2])
4762         {
4763           newConnIPtr[1]=newConnIPtr[0]+conni[i+1]-conni[i];
4764           newConnPtr=std::copy(conn+conni[i],conn+conni[i+1],newConnPtr);
4765           newConnIPtr++;
4766         }
4767     }
4768   setConnectivity(newConn,newConnI,true);
4769   return true;
4770 }
4771
4772 /*!
4773  * Finds incorrectly oriented cells of this 2D mesh in 3D space.
4774  * A cell is considered to be oriented correctly if an angle between its
4775  * normal vector and a given vector is less than \c PI / \c 2.
4776  *  \param [in] vec - 3 components of the vector specifying the correct orientation of
4777  *         cells.
4778  *  \param [in] polyOnly - if \c true, only polygons are checked, else, all cells are
4779  *         checked.
4780  *  \param [in,out] cells - a vector returning ids of incorrectly oriented cells. It
4781  *         is not cleared before filling in.
4782  *  \throw If \a this->getMeshDimension() != 2.
4783  *  \throw If \a this->getSpaceDimension() != 3.
4784  *
4785  *  \if ENABLE_EXAMPLES
4786  *  \ref cpp_mcumesh_are2DCellsNotCorrectlyOriented "Here is a C++ example".<br>
4787  *  \ref  py_mcumesh_are2DCellsNotCorrectlyOriented "Here is a Python example".
4788  *  \endif
4789  */
4790 void MEDCouplingUMesh::are2DCellsNotCorrectlyOriented(const double *vec, bool polyOnly, std::vector<int>& cells) const
4791 {
4792   if(getMeshDimension()!=2 || getSpaceDimension()!=3)
4793     throw INTERP_KERNEL::Exception("Invalid mesh to apply are2DCellsNotCorrectlyOriented on it : must be meshDim==2 and spaceDim==3 !");
4794   int nbOfCells=getNumberOfCells();
4795   const int *conn=_nodal_connec->begin();
4796   const int *connI=_nodal_connec_index->begin();
4797   const double *coordsPtr=_coords->begin();
4798   for(int i=0;i<nbOfCells;i++)
4799     {
4800       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)conn[connI[i]];
4801       if(!polyOnly || (type==INTERP_KERNEL::NORM_POLYGON || type==INTERP_KERNEL::NORM_QPOLYG))
4802         {
4803           bool isQuadratic=INTERP_KERNEL::CellModel::GetCellModel(type).isQuadratic();
4804           if(!IsPolygonWellOriented(isQuadratic,vec,conn+connI[i]+1,conn+connI[i+1],coordsPtr))
4805             cells.push_back(i);
4806         }
4807     }
4808 }
4809
4810 /*!
4811  * Reverse connectivity of 2D cells whose orientation is not correct. A cell is
4812  * considered to be oriented correctly if an angle between its normal vector and a
4813  * given vector is less than \c PI / \c 2.
4814  *  \param [in] vec - 3 components of the vector specifying the correct orientation of
4815  *         cells.
4816  *  \param [in] polyOnly - if \c true, only polygons are checked, else, all cells are
4817  *         checked.
4818  *  \throw If \a this->getMeshDimension() != 2.
4819  *  \throw If \a this->getSpaceDimension() != 3.
4820  *
4821  *  \if ENABLE_EXAMPLES
4822  *  \ref cpp_mcumesh_are2DCellsNotCorrectlyOriented "Here is a C++ example".<br>
4823  *  \ref  py_mcumesh_are2DCellsNotCorrectlyOriented "Here is a Python example".
4824  *  \endif
4825  *
4826  *  \sa changeOrientationOfCells
4827  */
4828 void MEDCouplingUMesh::orientCorrectly2DCells(const double *vec, bool polyOnly)
4829 {
4830   if(getMeshDimension()!=2 || getSpaceDimension()!=3)
4831     throw INTERP_KERNEL::Exception("Invalid mesh to apply orientCorrectly2DCells on it : must be meshDim==2 and spaceDim==3 !");
4832   int nbOfCells(getNumberOfCells()),*conn(_nodal_connec->getPointer());
4833   const int *connI(_nodal_connec_index->begin());
4834   const double *coordsPtr(_coords->begin());
4835   bool isModified(false);
4836   for(int i=0;i<nbOfCells;i++)
4837     {
4838       INTERP_KERNEL::NormalizedCellType type((INTERP_KERNEL::NormalizedCellType)conn[connI[i]]);
4839       if(!polyOnly || (type==INTERP_KERNEL::NORM_POLYGON || type==INTERP_KERNEL::NORM_QPOLYG))
4840         {
4841           const INTERP_KERNEL::CellModel& cm(INTERP_KERNEL::CellModel::GetCellModel(type));
4842           bool isQuadratic(cm.isQuadratic());
4843           if(!IsPolygonWellOriented(isQuadratic,vec,conn+connI[i]+1,conn+connI[i+1],coordsPtr))
4844             {
4845               isModified=true;
4846               cm.changeOrientationOf2D(conn+connI[i]+1,(unsigned int)(connI[i+1]-connI[i]-1));
4847             }
4848         }
4849     }
4850   if(isModified)
4851     _nodal_connec->declareAsNew();
4852   updateTime();
4853 }
4854
4855 /*!
4856  * This method change the orientation of cells in \a this without any consideration of coordinates. Only connectivity is impacted.
4857  *
4858  * \sa orientCorrectly2DCells
4859  */
4860 void MEDCouplingUMesh::changeOrientationOfCells()
4861 {
4862   int mdim(getMeshDimension());
4863   if(mdim!=2 && mdim!=1)
4864     throw INTERP_KERNEL::Exception("Invalid mesh to apply changeOrientationOfCells on it : must be meshDim==2 or meshDim==1 !");
4865   int nbOfCells(getNumberOfCells()),*conn(_nodal_connec->getPointer());
4866   const int *connI(_nodal_connec_index->begin());
4867   if(mdim==2)
4868     {//2D
4869       for(int i=0;i<nbOfCells;i++)
4870         {
4871           INTERP_KERNEL::NormalizedCellType type((INTERP_KERNEL::NormalizedCellType)conn[connI[i]]);
4872           const INTERP_KERNEL::CellModel& cm(INTERP_KERNEL::CellModel::GetCellModel(type));
4873           cm.changeOrientationOf2D(conn+connI[i]+1,(unsigned int)(connI[i+1]-connI[i]-1));
4874         }
4875     }
4876   else
4877     {//1D
4878       for(int i=0;i<nbOfCells;i++)
4879         {
4880           INTERP_KERNEL::NormalizedCellType type((INTERP_KERNEL::NormalizedCellType)conn[connI[i]]);
4881           const INTERP_KERNEL::CellModel& cm(INTERP_KERNEL::CellModel::GetCellModel(type));
4882           cm.changeOrientationOf1D(conn+connI[i]+1,(unsigned int)(connI[i+1]-connI[i]-1));
4883         }
4884     }
4885 }
4886
4887 /*!
4888  * Finds incorrectly oriented polyhedral cells, i.e. polyhedrons having correctly
4889  * oriented facets. The normal vector of the facet should point out of the cell.
4890  *  \param [in,out] cells - a vector returning ids of incorrectly oriented cells. It
4891  *         is not cleared before filling in.
4892  *  \throw If \a this->getMeshDimension() != 3.
4893  *  \throw If \a this->getSpaceDimension() != 3.
4894  *  \throw If the coordinates array is not set.
4895  *  \throw If the nodal connectivity of cells is not defined.
4896  *
4897  *  \if ENABLE_EXAMPLES
4898  *  \ref cpp_mcumesh_arePolyhedronsNotCorrectlyOriented "Here is a C++ example".<br>
4899  *  \ref  py_mcumesh_arePolyhedronsNotCorrectlyOriented "Here is a Python example".
4900  *  \endif
4901  */
4902 void MEDCouplingUMesh::arePolyhedronsNotCorrectlyOriented(std::vector<int>& cells) const
4903 {
4904   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
4905     throw INTERP_KERNEL::Exception("Invalid mesh to apply arePolyhedronsNotCorrectlyOriented on it : must be meshDim==3 and spaceDim==3 !");
4906   int nbOfCells=getNumberOfCells();
4907   const int *conn=_nodal_connec->begin();
4908   const int *connI=_nodal_connec_index->begin();
4909   const double *coordsPtr=_coords->begin();
4910   for(int i=0;i<nbOfCells;i++)
4911     {
4912       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)conn[connI[i]];
4913       if(type==INTERP_KERNEL::NORM_POLYHED)
4914         {
4915           if(!IsPolyhedronWellOriented(conn+connI[i]+1,conn+connI[i+1],coordsPtr))
4916             cells.push_back(i);
4917         }
4918     }
4919 }
4920
4921 /*!
4922  * Tries to fix connectivity of polyhedra, so that normal vector of all facets to point
4923  * out of the cell.
4924  *  \throw If \a this->getMeshDimension() != 3.
4925  *  \throw If \a this->getSpaceDimension() != 3.
4926  *  \throw If the coordinates array is not set.
4927  *  \throw If the nodal connectivity of cells is not defined.
4928  *  \throw If the reparation fails.
4929  *
4930  *  \if ENABLE_EXAMPLES
4931  *  \ref cpp_mcumesh_arePolyhedronsNotCorrectlyOriented "Here is a C++ example".<br>
4932  *  \ref  py_mcumesh_arePolyhedronsNotCorrectlyOriented "Here is a Python example".
4933  *  \endif
4934  * \sa MEDCouplingUMesh::findAndCorrectBadOriented3DCells
4935  */
4936 void MEDCouplingUMesh::orientCorrectlyPolyhedrons()
4937 {
4938   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
4939     throw INTERP_KERNEL::Exception("Invalid mesh to apply orientCorrectlyPolyhedrons on it : must be meshDim==3 and spaceDim==3 !");
4940   int nbOfCells=getNumberOfCells();
4941   int *conn=_nodal_connec->getPointer();
4942   const int *connI=_nodal_connec_index->begin();
4943   const double *coordsPtr=_coords->begin();
4944   for(int i=0;i<nbOfCells;i++)
4945     {
4946       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)conn[connI[i]];
4947       if(type==INTERP_KERNEL::NORM_POLYHED)
4948         {
4949           try
4950           {
4951               if(!IsPolyhedronWellOriented(conn+connI[i]+1,conn+connI[i+1],coordsPtr))
4952                 TryToCorrectPolyhedronOrientation(conn+connI[i]+1,conn+connI[i+1],coordsPtr);
4953           }
4954           catch(INTERP_KERNEL::Exception& e)
4955           {
4956               std::ostringstream oss; oss << "Something wrong in polyhedron #" << i << " : " << e.what();
4957               throw INTERP_KERNEL::Exception(oss.str());
4958           }
4959         }
4960     }
4961   updateTime();
4962 }
4963
4964 /*!
4965  * This method invert orientation of all cells in \a this.
4966  * After calling this method the absolute value of measure of cells in \a this are the same than before calling.
4967  * This method only operates on the connectivity so coordinates are not touched at all.
4968  */
4969 void MEDCouplingUMesh::invertOrientationOfAllCells()
4970 {
4971   checkConnectivityFullyDefined();
4972   std::set<INTERP_KERNEL::NormalizedCellType> gts(getAllGeoTypes());
4973   int *conn(_nodal_connec->getPointer());
4974   const int *conni(_nodal_connec_index->begin());
4975   for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator gt=gts.begin();gt!=gts.end();gt++)
4976     {
4977       INTERP_KERNEL::AutoCppPtr<INTERP_KERNEL::OrientationInverter> oi(INTERP_KERNEL::OrientationInverter::BuildInstanceFrom(*gt));
4978       MCAuto<DataArrayInt> cwt(giveCellsWithType(*gt));
4979       for(const int *it=cwt->begin();it!=cwt->end();it++)
4980         oi->operate(conn+conni[*it]+1,conn+conni[*it+1]);
4981     }
4982   updateTime();
4983 }
4984
4985 /*!
4986  * Finds and fixes incorrectly oriented linear extruded volumes (INTERP_KERNEL::NORM_HEXA8,
4987  * INTERP_KERNEL::NORM_PENTA6, INTERP_KERNEL::NORM_HEXGP12 etc) to respect the MED convention
4988  * according to which the first facet of the cell should be oriented to have the normal vector
4989  * pointing out of cell.
4990  *  \return DataArrayInt * - a new instance of DataArrayInt holding ids of fixed
4991  *         cells. The caller is to delete this array using decrRef() as it is no more
4992  *         needed.
4993  *  \throw If \a this->getMeshDimension() != 3.
4994  *  \throw If \a this->getSpaceDimension() != 3.
4995  *  \throw If the coordinates array is not set.
4996  *  \throw If the nodal connectivity of cells is not defined.
4997  *
4998  *  \if ENABLE_EXAMPLES
4999  *  \ref cpp_mcumesh_findAndCorrectBadOriented3DExtrudedCells "Here is a C++ example".<br>
5000  *  \ref  py_mcumesh_findAndCorrectBadOriented3DExtrudedCells "Here is a Python example".
5001  *  \endif
5002  * \sa MEDCouplingUMesh::findAndCorrectBadOriented3DCells
5003  */
5004 DataArrayInt *MEDCouplingUMesh::findAndCorrectBadOriented3DExtrudedCells()
5005 {
5006   const char msg[]="check3DCellsWellOriented detection works only for 3D cells !";
5007   if(getMeshDimension()!=3)
5008     throw INTERP_KERNEL::Exception(msg);
5009   int spaceDim=getSpaceDimension();
5010   if(spaceDim!=3)
5011     throw INTERP_KERNEL::Exception(msg);
5012   //
5013   int nbOfCells=getNumberOfCells();
5014   int *conn=_nodal_connec->getPointer();
5015   const int *connI=_nodal_connec_index->begin();
5016   const double *coo=getCoords()->begin();
5017   MCAuto<DataArrayInt> cells(DataArrayInt::New()); cells->alloc(0,1);
5018   for(int i=0;i<nbOfCells;i++)
5019     {
5020       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[connI[i]]);
5021       if(cm.isExtruded() && !cm.isDynamic() && !cm.isQuadratic())
5022         {
5023           if(!Is3DExtrudedStaticCellWellOriented(conn+connI[i]+1,conn+connI[i+1],coo))
5024             {
5025               CorrectExtrudedStaticCell(conn+connI[i]+1,conn+connI[i+1]);
5026               cells->pushBackSilent(i);
5027             }
5028         }
5029     }
5030   return cells.retn();
5031 }
5032
5033 /*!
5034  * This method is a faster method to correct orientation of all 3D cells in \a this.
5035  * This method works only if \a this is a 3D mesh, that is to say a mesh with mesh dimension 3 and a space dimension 3.
5036  * This method makes the hypothesis that \a this a coherent that is to say MEDCouplingUMesh::checkConsistency should throw no exception.
5037  *
5038  * \return a newly allocated int array with one components containing cell ids renumbered to fit the convention of MED (MED file and MEDCoupling)
5039  * \sa MEDCouplingUMesh::orientCorrectlyPolyhedrons,
5040  */
5041 DataArrayInt *MEDCouplingUMesh::findAndCorrectBadOriented3DCells()
5042 {
5043   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
5044     throw INTERP_KERNEL::Exception("Invalid mesh to apply findAndCorrectBadOriented3DCells on it : must be meshDim==3 and spaceDim==3 !");
5045   int nbOfCells=getNumberOfCells();
5046   int *conn=_nodal_connec->getPointer();
5047   const int *connI=_nodal_connec_index->begin();
5048   const double *coordsPtr=_coords->begin();
5049   MCAuto<DataArrayInt> ret=DataArrayInt::New(); ret->alloc(0,1);
5050   for(int i=0;i<nbOfCells;i++)
5051     {
5052       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)conn[connI[i]];
5053       switch(type)
5054       {
5055         case INTERP_KERNEL::NORM_TETRA4:
5056           {
5057             if(!IsTetra4WellOriented(conn+connI[i]+1,conn+connI[i+1],coordsPtr))
5058               {
5059                 std::swap(*(conn+connI[i]+2),*(conn+connI[i]+3));
5060                 ret->pushBackSilent(i);
5061               }
5062             break;
5063           }
5064         case INTERP_KERNEL::NORM_PYRA5:
5065           {
5066             if(!IsPyra5WellOriented(conn+connI[i]+1,conn+connI[i+1],coordsPtr))
5067               {
5068                 std::swap(*(conn+connI[i]+2),*(conn+connI[i]+4));
5069                 ret->pushBackSilent(i);
5070               }
5071             break;
5072           }
5073         case INTERP_KERNEL::NORM_PENTA6:
5074         case INTERP_KERNEL::NORM_HEXA8:
5075         case INTERP_KERNEL::NORM_HEXGP12:
5076           {
5077             if(!Is3DExtrudedStaticCellWellOriented(conn+connI[i]+1,conn+connI[i+1],coordsPtr))
5078               {
5079                 CorrectExtrudedStaticCell(conn+connI[i]+1,conn+connI[i+1]);
5080                 ret->pushBackSilent(i);
5081               }
5082             break;
5083           }
5084         case INTERP_KERNEL::NORM_POLYHED:
5085           {
5086             if(!IsPolyhedronWellOriented(conn+connI[i]+1,conn+connI[i+1],coordsPtr))
5087               {
5088                 TryToCorrectPolyhedronOrientation(conn+connI[i]+1,conn+connI[i+1],coordsPtr);
5089                 ret->pushBackSilent(i);
5090               }
5091             break;
5092           }
5093         default:
5094           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::orientCorrectly3DCells : Your mesh contains type of cell not supported yet ! send mail to anthony.geay@cea.fr to add it !");
5095       }
5096     }
5097   updateTime();
5098   return ret.retn();
5099 }
5100
5101 /*!
5102  * This method has a sense for meshes with spaceDim==3 and meshDim==2.
5103  * If it is not the case an exception will be thrown.
5104  * This method is fast because the first cell of \a this is used to compute the plane.
5105  * \param vec output of size at least 3 used to store the normal vector (with norm equal to Area ) of searched plane.
5106  * \param pos output of size at least 3 used to store a point owned of searched plane.
5107  */
5108 void MEDCouplingUMesh::getFastAveragePlaneOfThis(double *vec, double *pos) const
5109 {
5110   if(getMeshDimension()!=2 || getSpaceDimension()!=3)
5111     throw INTERP_KERNEL::Exception("Invalid mesh to apply getFastAveragePlaneOfThis on it : must be meshDim==2 and spaceDim==3 !");
5112   const int *conn=_nodal_connec->begin();
5113   const int *connI=_nodal_connec_index->begin();
5114   const double *coordsPtr=_coords->begin();
5115   INTERP_KERNEL::areaVectorOfPolygon<int,INTERP_KERNEL::ALL_C_MODE>(conn+1,connI[1]-connI[0]-1,coordsPtr,vec);
5116   std::copy(coordsPtr+3*conn[1],coordsPtr+3*conn[1]+3,pos);
5117 }
5118
5119 /*!
5120  * Creates a new MEDCouplingFieldDouble holding Edge Ratio values of all
5121  * cells. Currently cells of the following types are treated:
5122  * INTERP_KERNEL::NORM_TRI3, INTERP_KERNEL::NORM_QUAD4 and INTERP_KERNEL::NORM_TETRA4.
5123  * For a cell of other type an exception is thrown.
5124  * Space dimension of a 2D mesh can be either 2 or 3.
5125  * The Edge Ratio of a cell \f$t\f$ is:
5126  *  \f$\frac{|t|_\infty}{|t|_0}\f$,
5127  *  where \f$|t|_\infty\f$ and \f$|t|_0\f$ respectively denote the greatest and
5128  *  the smallest edge lengths of \f$t\f$.
5129  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
5130  *          cells and one time, lying on \a this mesh. The caller is to delete this
5131  *          field using decrRef() as it is no more needed.
5132  *  \throw If the coordinates array is not set.
5133  *  \throw If \a this mesh contains elements of dimension different from the mesh dimension.
5134  *  \throw If the connectivity data array has more than one component.
5135  *  \throw If the connectivity data array has a named component.
5136  *  \throw If the connectivity index data array has more than one component.
5137  *  \throw If the connectivity index data array has a named component.
5138  *  \throw If \a this->getMeshDimension() is neither 2 nor 3.
5139  *  \throw If \a this->getSpaceDimension() is neither 2 nor 3.
5140  *  \throw If \a this mesh includes cells of type different from the ones enumerated above.
5141  */
5142 MEDCouplingFieldDouble *MEDCouplingUMesh::getEdgeRatioField() const
5143 {
5144   checkConsistencyLight();
5145   int spaceDim=getSpaceDimension();
5146   int meshDim=getMeshDimension();
5147   if(spaceDim!=2 && spaceDim!=3)
5148     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getEdgeRatioField : SpaceDimension must be equal to 2 or 3 !");
5149   if(meshDim!=2 && meshDim!=3)
5150     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getEdgeRatioField : MeshDimension must be equal to 2 or 3 !");
5151   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
5152   ret->setMesh(this);
5153   int nbOfCells=getNumberOfCells();
5154   MCAuto<DataArrayDouble> arr=DataArrayDouble::New();
5155   arr->alloc(nbOfCells,1);
5156   double *pt=arr->getPointer();
5157   ret->setArray(arr);//In case of throw to avoid mem leaks arr will be used after decrRef.
5158   const int *conn=_nodal_connec->begin();
5159   const int *connI=_nodal_connec_index->begin();
5160   const double *coo=_coords->begin();
5161   double tmp[12];
5162   for(int i=0;i<nbOfCells;i++,pt++)
5163     {
5164       INTERP_KERNEL::NormalizedCellType t=(INTERP_KERNEL::NormalizedCellType)*conn;
5165       switch(t)
5166       {
5167         case INTERP_KERNEL::NORM_TRI3:
5168           {
5169             FillInCompact3DMode(spaceDim,3,conn+1,coo,tmp);
5170             *pt=INTERP_KERNEL::triEdgeRatio(tmp);
5171             break;
5172           }
5173         case INTERP_KERNEL::NORM_QUAD4:
5174           {
5175             FillInCompact3DMode(spaceDim,4,conn+1,coo,tmp);
5176             *pt=INTERP_KERNEL::quadEdgeRatio(tmp);
5177             break;
5178           }
5179         case INTERP_KERNEL::NORM_TETRA4:
5180           {
5181             FillInCompact3DMode(spaceDim,4,conn+1,coo,tmp);
5182             *pt=INTERP_KERNEL::tetraEdgeRatio(tmp);
5183             break;
5184           }
5185         default:
5186           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getEdgeRatioField : A cell with not manged type (NORM_TRI3, NORM_QUAD4 and NORM_TETRA4) has been detected !");
5187       }
5188       conn+=connI[i+1]-connI[i];
5189     }
5190   ret->setName("EdgeRatio");
5191   ret->synchronizeTimeWithSupport();
5192   return ret.retn();
5193 }
5194
5195 /*!
5196  * Creates a new MEDCouplingFieldDouble holding Aspect Ratio values of all
5197  * cells. Currently cells of the following types are treated:
5198  * INTERP_KERNEL::NORM_TRI3, INTERP_KERNEL::NORM_QUAD4 and INTERP_KERNEL::NORM_TETRA4.
5199  * For a cell of other type an exception is thrown.
5200  * Space dimension of a 2D mesh can be either 2 or 3.
5201  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
5202  *          cells and one time, lying on \a this mesh. The caller is to delete this
5203  *          field using decrRef() as it is no more needed.
5204  *  \throw If the coordinates array is not set.
5205  *  \throw If \a this mesh contains elements of dimension different from the mesh dimension.
5206  *  \throw If the connectivity data array has more than one component.
5207  *  \throw If the connectivity data array has a named component.
5208  *  \throw If the connectivity index data array has more than one component.
5209  *  \throw If the connectivity index data array has a named component.
5210  *  \throw If \a this->getMeshDimension() is neither 2 nor 3.
5211  *  \throw If \a this->getSpaceDimension() is neither 2 nor 3.
5212  *  \throw If \a this mesh includes cells of type different from the ones enumerated above.
5213  */
5214 MEDCouplingFieldDouble *MEDCouplingUMesh::getAspectRatioField() const
5215 {
5216   checkConsistencyLight();
5217   int spaceDim=getSpaceDimension();
5218   int meshDim=getMeshDimension();
5219   if(spaceDim!=2 && spaceDim!=3)
5220     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getAspectRatioField : SpaceDimension must be equal to 2 or 3 !");
5221   if(meshDim!=2 && meshDim!=3)
5222     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getAspectRatioField : MeshDimension must be equal to 2 or 3 !");
5223   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
5224   ret->setMesh(this);
5225   int nbOfCells=getNumberOfCells();
5226   MCAuto<DataArrayDouble> arr=DataArrayDouble::New();
5227   arr->alloc(nbOfCells,1);
5228   double *pt=arr->getPointer();
5229   ret->setArray(arr);//In case of throw to avoid mem leaks arr will be used after decrRef.
5230   const int *conn=_nodal_connec->begin();
5231   const int *connI=_nodal_connec_index->begin();
5232   const double *coo=_coords->begin();
5233   double tmp[12];
5234   for(int i=0;i<nbOfCells;i++,pt++)
5235     {
5236       INTERP_KERNEL::NormalizedCellType t=(INTERP_KERNEL::NormalizedCellType)*conn;
5237       switch(t)
5238       {
5239         case INTERP_KERNEL::NORM_TRI3:
5240           {
5241             FillInCompact3DMode(spaceDim,3,conn+1,coo,tmp);
5242             *pt=INTERP_KERNEL::triAspectRatio(tmp);
5243             break;
5244           }
5245         case INTERP_KERNEL::NORM_QUAD4:
5246           {
5247             FillInCompact3DMode(spaceDim,4,conn+1,coo,tmp);
5248             *pt=INTERP_KERNEL::quadAspectRatio(tmp);
5249             break;
5250           }
5251         case INTERP_KERNEL::NORM_TETRA4:
5252           {
5253             FillInCompact3DMode(spaceDim,4,conn+1,coo,tmp);
5254             *pt=INTERP_KERNEL::tetraAspectRatio(tmp);
5255             break;
5256           }
5257         default:
5258           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getAspectRatioField : A cell with not manged type (NORM_TRI3, NORM_QUAD4 and NORM_TETRA4) has been detected !");
5259       }
5260       conn+=connI[i+1]-connI[i];
5261     }
5262   ret->setName("AspectRatio");
5263   ret->synchronizeTimeWithSupport();
5264   return ret.retn();
5265 }
5266
5267 /*!
5268  * Creates a new MEDCouplingFieldDouble holding Warping factor values of all
5269  * cells of \a this 2D mesh in 3D space. It is a measure of the "planarity" of 2D cell
5270  * in 3D space. Currently only cells of the following types are
5271  * treated: INTERP_KERNEL::NORM_QUAD4.
5272  * For a cell of other type an exception is thrown.
5273  * The warp field is computed as follows: let (a,b,c,d) be the points of the quad.
5274  * Defining
5275  * \f$t=\vec{da}\times\vec{ab}\f$,
5276  * \f$u=\vec{ab}\times\vec{bc}\f$
5277  * \f$v=\vec{bc}\times\vec{cd}\f$
5278  * \f$w=\vec{cd}\times\vec{da}\f$, the warp is defined as \f$W^3\f$ with
5279  *  \f[
5280  *     W=min(\frac{t}{|t|}\cdot\frac{v}{|v|}, \frac{u}{|u|}\cdot\frac{w}{|w|})
5281  *  \f]
5282  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
5283  *          cells and one time, lying on \a this mesh. The caller is to delete this
5284  *          field using decrRef() as it is no more needed.
5285  *  \throw If the coordinates array is not set.
5286  *  \throw If \a this mesh contains elements of dimension different from the mesh dimension.
5287  *  \throw If the connectivity data array has more than one component.
5288  *  \throw If the connectivity data array has a named component.
5289  *  \throw If the connectivity index data array has more than one component.
5290  *  \throw If the connectivity index data array has a named component.
5291  *  \throw If \a this->getMeshDimension() != 2.
5292  *  \throw If \a this->getSpaceDimension() != 3.
5293  *  \throw If \a this mesh includes cells of type different from the ones enumerated above.
5294  */
5295 MEDCouplingFieldDouble *MEDCouplingUMesh::getWarpField() const
5296 {
5297   checkConsistencyLight();
5298   int spaceDim=getSpaceDimension();
5299   int meshDim=getMeshDimension();
5300   if(spaceDim!=3)
5301     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getWarpField : SpaceDimension must be equal to 3 !");
5302   if(meshDim!=2)
5303     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getWarpField : MeshDimension must be equal to 2 !");
5304   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
5305   ret->setMesh(this);
5306   int nbOfCells=getNumberOfCells();
5307   MCAuto<DataArrayDouble> arr=DataArrayDouble::New();
5308   arr->alloc(nbOfCells,1);
5309   double *pt=arr->getPointer();
5310   ret->setArray(arr);//In case of throw to avoid mem leaks arr will be used after decrRef.
5311   const int *conn=_nodal_connec->begin();
5312   const int *connI=_nodal_connec_index->begin();
5313   const double *coo=_coords->begin();
5314   double tmp[12];
5315   for(int i=0;i<nbOfCells;i++,pt++)
5316     {
5317       INTERP_KERNEL::NormalizedCellType t=(INTERP_KERNEL::NormalizedCellType)*conn;
5318       switch(t)
5319       {
5320         case INTERP_KERNEL::NORM_QUAD4:
5321           {
5322             FillInCompact3DMode(3,4,conn+1,coo,tmp);
5323             *pt=INTERP_KERNEL::quadWarp(tmp);
5324             break;
5325           }
5326         default:
5327           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getWarpField : A cell with not manged type (NORM_QUAD4) has been detected !");
5328       }
5329       conn+=connI[i+1]-connI[i];
5330     }
5331   ret->setName("Warp");
5332   ret->synchronizeTimeWithSupport();
5333   return ret.retn();
5334 }
5335
5336
5337 /*!
5338  * Creates a new MEDCouplingFieldDouble holding Skew factor values of all
5339  * cells of \a this 2D mesh in 3D space. Currently cells of the following types are
5340  * treated: INTERP_KERNEL::NORM_QUAD4.
5341  * The skew is computed as follow for a quad with points (a,b,c,d): let
5342  * \f$u=\vec{ab}+\vec{dc}\f$ and \f$v=\vec{ac}+\vec{bd}\f$
5343  * then the skew is computed as:
5344  *  \f[
5345  *    s=\frac{u}{|u|}\cdot\frac{v}{|v|}
5346  *  \f]
5347  *
5348  * For a cell of other type an exception is thrown.
5349  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble on
5350  *          cells and one time, lying on \a this mesh. The caller is to delete this
5351  *          field using decrRef() as it is no more needed.
5352  *  \throw If the coordinates array is not set.
5353  *  \throw If \a this mesh contains elements of dimension different from the mesh dimension.
5354  *  \throw If the connectivity data array has more than one component.
5355  *  \throw If the connectivity data array has a named component.
5356  *  \throw If the connectivity index data array has more than one component.
5357  *  \throw If the connectivity index data array has a named component.
5358  *  \throw If \a this->getMeshDimension() != 2.
5359  *  \throw If \a this->getSpaceDimension() != 3.
5360  *  \throw If \a this mesh includes cells of type different from the ones enumerated above.
5361  */
5362 MEDCouplingFieldDouble *MEDCouplingUMesh::getSkewField() const
5363 {
5364   checkConsistencyLight();
5365   int spaceDim=getSpaceDimension();
5366   int meshDim=getMeshDimension();
5367   if(spaceDim!=3)
5368     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getSkewField : SpaceDimension must be equal to 3 !");
5369   if(meshDim!=2)
5370     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getSkewField : MeshDimension must be equal to 2 !");
5371   MCAuto<MEDCouplingFieldDouble> ret=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
5372   ret->setMesh(this);
5373   int nbOfCells=getNumberOfCells();
5374   MCAuto<DataArrayDouble> arr=DataArrayDouble::New();
5375   arr->alloc(nbOfCells,1);
5376   double *pt=arr->getPointer();
5377   ret->setArray(arr);//In case of throw to avoid mem leaks arr will be used after decrRef.
5378   const int *conn=_nodal_connec->begin();
5379   const int *connI=_nodal_connec_index->begin();
5380   const double *coo=_coords->begin();
5381   double tmp[12];
5382   for(int i=0;i<nbOfCells;i++,pt++)
5383     {
5384       INTERP_KERNEL::NormalizedCellType t=(INTERP_KERNEL::NormalizedCellType)*conn;
5385       switch(t)
5386       {
5387         case INTERP_KERNEL::NORM_QUAD4:
5388           {
5389             FillInCompact3DMode(3,4,conn+1,coo,tmp);
5390             *pt=INTERP_KERNEL::quadSkew(tmp);
5391             break;
5392           }
5393         default:
5394           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getSkewField : A cell with not manged type (NORM_QUAD4) has been detected !");
5395       }
5396       conn+=connI[i+1]-connI[i];
5397     }
5398   ret->setName("Skew");
5399   ret->synchronizeTimeWithSupport();
5400   return ret.retn();
5401 }
5402
5403 /*!
5404  * Returns the cell field giving for each cell in \a this its diameter. Diameter means the max length of all possible SEG2 in the cell.
5405  *
5406  * \return a new instance of field containing the result. The returned instance has to be deallocated by the caller.
5407  *
5408  * \sa getSkewField, getWarpField, getAspectRatioField, getEdgeRatioField
5409  */
5410 MEDCouplingFieldDouble *MEDCouplingUMesh::computeDiameterField() const
5411 {
5412   checkConsistencyLight();
5413   MCAuto<MEDCouplingFieldDouble> ret(MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME));
5414   ret->setMesh(this);
5415   std::set<INTERP_KERNEL::NormalizedCellType> types;
5416   ComputeAllTypesInternal(types,_nodal_connec,_nodal_connec_index);
5417   int spaceDim(getSpaceDimension()),nbCells(getNumberOfCells());
5418   MCAuto<DataArrayDouble> arr(DataArrayDouble::New());
5419   arr->alloc(nbCells,1);
5420   for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator it=types.begin();it!=types.end();it++)
5421     {
5422       INTERP_KERNEL::AutoCppPtr<INTERP_KERNEL::DiameterCalculator> dc(INTERP_KERNEL::CellModel::GetCellModel(*it).buildInstanceOfDiameterCalulator(spaceDim));
5423       MCAuto<DataArrayInt> cellIds(giveCellsWithType(*it));
5424       dc->computeForListOfCellIdsUMeshFrmt(cellIds->begin(),cellIds->end(),_nodal_connec_index->begin(),_nodal_connec->begin(),getCoords()->begin(),arr->getPointer());
5425     }
5426   ret->setArray(arr);
5427   ret->setName("Diameter");
5428   return ret.retn();
5429 }
5430
5431 /*!
5432  * This method aggregate the bbox of each cell and put it into bbox parameter (xmin,xmax,ymin,ymax,zmin,zmax).
5433  *
5434  * \param [in] arcDetEps - a parameter specifying in case of 2D quadratic polygon cell the detection limit between linear and arc circle. (By default 1e-12)
5435  *                         For all other cases this input parameter is ignored.
5436  * \return DataArrayDouble * - newly created object (to be managed by the caller) \a this number of cells tuples and 2*spacedim components.
5437  *
5438  * \throw If \a this is not fully set (coordinates and connectivity).
5439  * \throw If a cell in \a this has no valid nodeId.
5440  * \sa MEDCouplingUMesh::getBoundingBoxForBBTreeFast, MEDCouplingUMesh::getBoundingBoxForBBTree2DQuadratic
5441  */
5442 DataArrayDouble *MEDCouplingUMesh::getBoundingBoxForBBTree(double arcDetEps) const
5443 {
5444   int mDim(getMeshDimension()),sDim(getSpaceDimension());
5445   if((mDim==3 && sDim==3) || (mDim==2 && sDim==3) || (mDim==1 && sDim==1) || ( mDim==1 && sDim==3))  // Compute refined boundary box for quadratic elements only in 2D.
5446     return getBoundingBoxForBBTreeFast();
5447   if((mDim==2 && sDim==2) || (mDim==1 && sDim==2))
5448     {
5449       bool presenceOfQuadratic(false);
5450       for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator it=_types.begin();it!=_types.end();it++)
5451         {
5452           const INTERP_KERNEL::CellModel& cm(INTERP_KERNEL::CellModel::GetCellModel(*it));
5453           if(cm.isQuadratic())
5454             presenceOfQuadratic=true;
5455         }
5456       if(!presenceOfQuadratic)
5457         return getBoundingBoxForBBTreeFast();
5458       if(mDim==2 && sDim==2)
5459         return getBoundingBoxForBBTree2DQuadratic(arcDetEps);
5460       else
5461         return getBoundingBoxForBBTree1DQuadratic(arcDetEps);
5462     }
5463   throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getBoundingBoxForBBTree : Managed dimensions are (mDim=1,sDim=1), (mDim=1,sDim=2), (mDim=1,sDim=3), (mDim=2,sDim=2), (mDim=2,sDim=3) and (mDim=3,sDim=3) !");
5464 }
5465
5466 /*!
5467  * This method aggregate the bbox of each cell only considering the nodes constituting each cell and put it into bbox parameter.
5468  * So meshes having quadratic cells the computed bounding boxes can be invalid !
5469  *
5470  * \return DataArrayDouble * - newly created object (to be managed by the caller) \a this number of cells tuples and 2*spacedim components.
5471  *
5472  * \throw If \a this is not fully set (coordinates and connectivity).
5473  * \throw If a cell in \a this has no valid nodeId.
5474  */
5475 DataArrayDouble *MEDCouplingUMesh::getBoundingBoxForBBTreeFast() const
5476 {
5477   checkFullyDefined();
5478   int spaceDim(getSpaceDimension()),nbOfCells(getNumberOfCells()),nbOfNodes(getNumberOfNodes());
5479   MCAuto<DataArrayDouble> ret(DataArrayDouble::New()); ret->alloc(nbOfCells,2*spaceDim);
5480   double *bbox(ret->getPointer());
5481   for(int i=0;i<nbOfCells*spaceDim;i++)
5482     {
5483       bbox[2*i]=std::numeric_limits<double>::max();
5484       bbox[2*i+1]=-std::numeric_limits<double>::max();
5485     }
5486   const double *coordsPtr(_coords->begin());
5487   const int *conn(_nodal_connec->begin()),*connI(_nodal_connec_index->begin());
5488   for(int i=0;i<nbOfCells;i++)
5489     {
5490       int offset=connI[i]+1;
5491       int nbOfNodesForCell(connI[i+1]-offset),kk(0);
5492       for(int j=0;j<nbOfNodesForCell;j++)
5493         {
5494           int nodeId=conn[offset+j];
5495           if(nodeId>=0 && nodeId<nbOfNodes)
5496             {
5497               for(int k=0;k<spaceDim;k++)
5498                 {
5499                   bbox[2*spaceDim*i+2*k]=std::min(bbox[2*spaceDim*i+2*k],coordsPtr[spaceDim*nodeId+k]);
5500                   bbox[2*spaceDim*i+2*k+1]=std::max(bbox[2*spaceDim*i+2*k+1],coordsPtr[spaceDim*nodeId+k]);
5501                 }
5502               kk++;
5503             }
5504         }
5505       if(kk==0)
5506         {
5507           std::ostringstream oss; oss << "MEDCouplingUMesh::getBoundingBoxForBBTree : cell #" << i << " contains no valid nodeId !";
5508           throw INTERP_KERNEL::Exception(oss.str());
5509         }
5510     }
5511   return ret.retn();
5512 }
5513
5514 /*!
5515  * This method aggregates the bbox of each 2D cell in \a this considering the whole shape. This method is particularly
5516  * useful for 2D meshes having quadratic cells
5517  * because for this type of cells getBoundingBoxForBBTreeFast method may return invalid bounding boxes (since it just considers
5518  * the two extremities of the arc of circle).
5519  *
5520  * \param [in] arcDetEps - a parameter specifying in case of 2D quadratic polygon cell the detection limit between linear and arc circle. (By default 1e-12)
5521  * \return DataArrayDouble * - newly created object (to be managed by the caller) \a this number of cells tuples and 2*spacedim components.
5522  * \throw If \a this is not fully defined.
5523  * \throw If \a this is not a mesh with meshDimension equal to 2.
5524  * \throw If \a this is not a mesh with spaceDimension equal to 2.
5525  * \sa MEDCouplingUMesh::getBoundingBoxForBBTree1DQuadratic
5526  */
5527 DataArrayDouble *MEDCouplingUMesh::getBoundingBoxForBBTree2DQuadratic(double arcDetEps) const
5528 {
5529   checkFullyDefined();
5530   INTERP_KERNEL::QuadraticPlanarPrecision arcPrec(arcDetEps);
5531
5532   int spaceDim(getSpaceDimension()),mDim(getMeshDimension()),nbOfCells(getNumberOfCells());
5533   if(spaceDim!=2 || mDim!=2)
5534     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getBoundingBoxForBBTree2DQuadratic : This method should be applied on mesh with mesh dimension equal to 2 and space dimension also equal to 2!");
5535   MCAuto<DataArrayDouble> ret(DataArrayDouble::New()); ret->alloc(nbOfCells,2*spaceDim);
5536   double *bbox(ret->getPointer());
5537   const double *coords(_coords->begin());
5538   const int *conn(_nodal_connec->begin()),*connI(_nodal_connec_index->begin());
5539   for(int i=0;i<nbOfCells;i++,bbox+=4,connI++)
5540     {
5541       const INTERP_KERNEL::CellModel& cm(INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[*connI]));
5542       int sz(connI[1]-connI[0]-1);
5543       std::vector<INTERP_KERNEL::Node *> nodes(sz);
5544       INTERP_KERNEL::QuadraticPolygon *pol(0);
5545       for(int j=0;j<sz;j++)
5546         {
5547           int nodeId(conn[*connI+1+j]);
5548           nodes[j]=new INTERP_KERNEL::Node(coords[nodeId*2],coords[nodeId*2+1]);
5549         }
5550       if(!cm.isQuadratic())
5551         pol=INTERP_KERNEL::QuadraticPolygon::BuildLinearPolygon(nodes);
5552       else
5553         pol=INTERP_KERNEL::QuadraticPolygon::BuildArcCirclePolygon(nodes);
5554       INTERP_KERNEL::Bounds b; b.prepareForAggregation(); pol->fillBounds(b); delete pol;
5555       bbox[0]=b.getXMin(); bbox[1]=b.getXMax(); bbox[2]=b.getYMin(); bbox[3]=b.getYMax();
5556     }
5557   return ret.retn();
5558 }
5559
5560 /*!
5561  * This method aggregates the bbox of each 1D cell in \a this considering the whole shape. This method is particularly
5562  * useful for 2D meshes having quadratic cells
5563  * because for this type of cells getBoundingBoxForBBTreeFast method may return invalid bounding boxes (since it just considers
5564  * the two extremities of the arc of circle).
5565  *
5566  * \param [in] arcDetEps - a parameter specifying in case of 2D quadratic polygon cell the detection limit between linear and arc circle. (By default 1e-12)
5567  * \return DataArrayDouble * - newly created object (to be managed by the caller) \a this number of cells tuples and 2*spacedim components.
5568  * \throw If \a this is not fully defined.
5569  * \throw If \a this is not a mesh with meshDimension equal to 1.
5570  * \throw If \a this is not a mesh with spaceDimension equal to 2.
5571  * \sa MEDCouplingUMesh::getBoundingBoxForBBTree2DQuadratic
5572  */
5573 DataArrayDouble *MEDCouplingUMesh::getBoundingBoxForBBTree1DQuadratic(double arcDetEps) const
5574 {
5575   checkFullyDefined();
5576   int spaceDim(getSpaceDimension()),mDim(getMeshDimension()),nbOfCells(getNumberOfCells());
5577   if(spaceDim!=2 || mDim!=1)
5578     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::getBoundingBoxForBBTree1DQuadratic : This method should be applied on mesh with mesh dimension equal to 1 and space dimension also equal to 2!");
5579   INTERP_KERNEL::QuadraticPlanarPrecision arcPrec(arcDetEps);
5580   MCAuto<DataArrayDouble> ret(DataArrayDouble::New()); ret->alloc(nbOfCells,2*spaceDim);
5581   double *bbox(ret->getPointer());
5582   const double *coords(_coords->begin());
5583   const int *conn(_nodal_connec->begin()),*connI(_nodal_connec_index->begin());
5584   for(int i=0;i<nbOfCells;i++,bbox+=4,connI++)
5585     {
5586       const INTERP_KERNEL::CellModel& cm(INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[*connI]));
5587       int sz(connI[1]-connI[0]-1);
5588       std::vector<INTERP_KERNEL::Node *> nodes(sz);
5589       INTERP_KERNEL::Edge *edge(0);
5590       for(int j=0;j<sz;j++)
5591         {
5592           int nodeId(conn[*connI+1+j]);
5593           nodes[j]=new INTERP_KERNEL::Node(coords[nodeId*2],coords[nodeId*2+1]);
5594         }
5595       if(!cm.isQuadratic())
5596         edge=INTERP_KERNEL::QuadraticPolygon::BuildLinearEdge(nodes);
5597       else
5598         edge=INTERP_KERNEL::QuadraticPolygon::BuildArcCircleEdge(nodes);
5599       const INTERP_KERNEL::Bounds& b(edge->getBounds());
5600       bbox[0]=b.getXMin(); bbox[1]=b.getXMax(); bbox[2]=b.getYMin(); bbox[3]=b.getYMax(); edge->decrRef();
5601     }
5602   return ret.retn();
5603 }
5604
5605 /// @cond INTERNAL
5606
5607 namespace MEDCouplingImpl
5608 {
5609   class ConnReader
5610   {
5611   public:
5612     ConnReader(const int *c, int val):_conn(c),_val(val) { }
5613     bool operator() (const int& pos) { return _conn[pos]!=_val; }
5614   private:
5615     const int *_conn;
5616     int _val;
5617   };
5618
5619   class ConnReader2
5620   {
5621   public:
5622     ConnReader2(const int *c, int val):_conn(c),_val(val) { }
5623     bool operator() (const int& pos) { return _conn[pos]==_val; }
5624   private:
5625     const int *_conn;
5626     int _val;
5627   };
5628 }
5629
5630 /// @endcond
5631
5632 /*!
5633  * This method expects that \a this is sorted by types. If not an exception will be thrown.
5634  * This method returns in the same format as code (see MEDCouplingUMesh::checkTypeConsistencyAndContig or MEDCouplingUMesh::splitProfilePerType) how
5635  * \a this is composed in cell types.
5636  * The returned array is of size 3*n where n is the number of different types present in \a this.
5637  * For every k in [0,n] ret[3*k+2]==-1 because it has no sense here.
5638  * This parameter is kept only for compatibility with other method listed above.
5639  */
5640 std::vector<int> MEDCouplingUMesh::getDistributionOfTypes() const
5641 {
5642   checkConnectivityFullyDefined();
5643   const int *conn=_nodal_connec->begin();
5644   const int *connI=_nodal_connec_index->begin();
5645   const int *work=connI;
5646   int nbOfCells=getNumberOfCells();
5647   std::size_t n=getAllGeoTypes().size();
5648   std::vector<int> ret(3*n,-1); //ret[3*k+2]==-1 because it has no sense here
5649   std::set<INTERP_KERNEL::NormalizedCellType> types;
5650   for(std::size_t i=0;work!=connI+nbOfCells;i++)
5651     {
5652       INTERP_KERNEL::NormalizedCellType typ=(INTERP_KERNEL::NormalizedCellType)conn[*work];
5653       if(types.find(typ)!=types.end())
5654         {
5655           std::ostringstream oss; oss << "MEDCouplingUMesh::getDistributionOfTypes : Type " << INTERP_KERNEL::CellModel::GetCellModel(typ).getRepr();
5656           oss << " is not contiguous !";
5657           throw INTERP_KERNEL::Exception(oss.str());
5658         }
5659       types.insert(typ);
5660       ret[3*i]=typ;
5661       const int *work2=std::find_if(work+1,connI+nbOfCells,MEDCouplingImpl::ConnReader(conn,typ));
5662       ret[3*i+1]=(int)std::distance(work,work2);
5663       work=work2;
5664     }
5665   return ret;
5666 }
5667
5668 /*!
5669  * This method is used to check that this has contiguous cell type in same order than described in \a code.
5670  * only for types cell, type node is not managed.
5671  * Format of \a code is the following. \a code should be of size 3*n and non empty. If not an exception is thrown.
5672  * foreach k in [0,n) on 3*k pos represent the geometric type and 3*k+1 number of elements of type 3*k.
5673  * 3*k+2 refers if different from -1 the pos in 'idsPerType' to get the corresponding array.
5674  * If 2 or more same geometric type is in \a code and exception is thrown too.
5675  *
5676  * This method firstly checks
5677  * If it exists k so that 3*k geometric type is not in geometric types of this an exception will be thrown.
5678  * If it exists k so that 3*k geometric type exists but the number of consecutive cell types does not match,
5679  * an exception is thrown too.
5680  *
5681  * If all geometric types in \a code are exactly those in \a this null pointer is returned.
5682  * If it exists a geometric type in \a this \b not in \a code \b no exception is thrown
5683  * and a DataArrayInt instance is returned that the user has the responsibility to deallocate.
5684  */
5685 DataArrayInt *MEDCouplingUMesh::checkTypeConsistencyAndContig(const std::vector<int>& code, const std::vector<const DataArrayInt *>& idsPerType) const
5686 {
5687   if(code.empty())
5688     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkTypeConsistencyAndContig : code is empty, should not !");
5689   std::size_t sz=code.size();
5690   std::size_t n=sz/3;
5691   if(sz%3!=0)
5692     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkTypeConsistencyAndContig : code size is NOT %3 !");
5693   std::vector<INTERP_KERNEL::NormalizedCellType> types;
5694   int nb=0;
5695   bool isNoPflUsed=true;
5696   for(std::size_t i=0;i<n;i++)
5697     if(std::find(types.begin(),types.end(),(INTERP_KERNEL::NormalizedCellType)code[3*i])==types.end())
5698       {
5699         types.push_back((INTERP_KERNEL::NormalizedCellType)code[3*i]);
5700         nb+=code[3*i+1];
5701         if(_types.find((INTERP_KERNEL::NormalizedCellType)code[3*i])==_types.end())
5702           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkTypeConsistencyAndContig : expected geo types not in this !");
5703         isNoPflUsed=isNoPflUsed && (code[3*i+2]==-1);
5704       }
5705   if(types.size()!=n)
5706     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkTypeConsistencyAndContig : code contains duplication of types in unstructured mesh !");
5707   if(isNoPflUsed)
5708     {
5709       if(!checkConsecutiveCellTypesAndOrder(&types[0],&types[0]+types.size()))
5710         throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkTypeConsistencyAndContig : non contiguous type !");
5711       if(types.size()==_types.size())
5712         return 0;
5713     }
5714   MCAuto<DataArrayInt> ret=DataArrayInt::New();
5715   ret->alloc(nb,1);
5716   int *retPtr=ret->getPointer();
5717   const int *connI=_nodal_connec_index->begin();
5718   const int *conn=_nodal_connec->begin();
5719   int nbOfCells=getNumberOfCells();
5720   const int *i=connI;
5721   int kk=0;
5722   for(std::vector<INTERP_KERNEL::NormalizedCellType>::const_iterator it=types.begin();it!=types.end();it++,kk++)
5723     {
5724       i=std::find_if(i,connI+nbOfCells,MEDCouplingImpl::ConnReader2(conn,(int)(*it)));
5725       int offset=(int)std::distance(connI,i);
5726       const int *j=std::find_if(i+1,connI+nbOfCells,MEDCouplingImpl::ConnReader(conn,(int)(*it)));
5727       int nbOfCellsOfCurType=(int)std::distance(i,j);
5728       if(code[3*kk+2]==-1)
5729         for(int k=0;k<nbOfCellsOfCurType;k++)
5730           *retPtr++=k+offset;
5731       else
5732         {
5733           int idInIdsPerType=code[3*kk+2];
5734           if(idInIdsPerType>=0 && idInIdsPerType<(int)idsPerType.size())
5735             {
5736               const DataArrayInt *zePfl=idsPerType[idInIdsPerType];
5737               if(zePfl)
5738                 {
5739                   zePfl->checkAllocated();
5740                   if(zePfl->getNumberOfComponents()==1)
5741                     {
5742                       for(const int *k=zePfl->begin();k!=zePfl->end();k++,retPtr++)
5743                         {
5744                           if(*k>=0 && *k<nbOfCellsOfCurType)
5745                             *retPtr=(*k)+offset;
5746                           else
5747                             {
5748                               std::ostringstream oss; oss << "MEDCouplingUMesh::checkTypeConsistencyAndContig : the section " << kk << " points to the profile #" << idInIdsPerType;
5749                               oss << ", and this profile contains a value " << *k << " should be in [0," << nbOfCellsOfCurType << ") !";
5750                               throw INTERP_KERNEL::Exception(oss.str());
5751                             }
5752                         }
5753                     }
5754                   else
5755                     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkTypeConsistencyAndContig : presence of a profile with nb of compo != 1 !");
5756                 }
5757               else
5758                 throw INTERP_KERNEL::Exception("MEDCouplingUMesh::checkTypeConsistencyAndContig : presence of null profile !");
5759             }
5760           else
5761             {
5762               std::ostringstream oss; oss << "MEDCouplingUMesh::checkTypeConsistencyAndContig : at section " << kk << " of code it points to the array #" << idInIdsPerType;
5763               oss << " should be in [0," << idsPerType.size() << ") !";
5764               throw INTERP_KERNEL::Exception(oss.str());
5765             }
5766         }
5767       i=j;
5768     }
5769   return ret.retn();
5770 }
5771
5772 /*!
5773  * This method makes the hypothesis that \a this is sorted by type. If not an exception will be thrown.
5774  * This method is the opposite of MEDCouplingUMesh::checkTypeConsistencyAndContig method. Given a list of cells in \a profile it returns a list of sub-profiles sorted by geo type.
5775  * The result is put in the array \a idsPerType. In the returned parameter \a code, foreach i \a code[3*i+2] refers (if different from -1) to a location into the \a idsPerType.
5776  * This method has 1 input \a profile and 3 outputs \a code \a idsInPflPerType and \a idsPerType.
5777  *
5778  * \param [in] profile
5779  * \param [out] code is a vector of size 3*n where n is the number of different geometric type in \a this \b reduced to the profile \a profile. \a code has exactly the same semantic than in MEDCouplingUMesh::checkTypeConsistencyAndContig method.
5780  * \param [out] idsInPflPerType is a vector of size of different geometric type in the subpart defined by \a profile of \a this ( equal to \a code.size()/3). For each i,
5781  *              \a idsInPflPerType[i] stores the tuple ids in \a profile that correspond to the geometric type code[3*i+0]
5782  * \param [out] idsPerType is a vector of size of different sub profiles needed to be defined to represent the profile \a profile for a given geometric type.
5783  *              This vector can be empty in case of all geometric type cells are fully covered in ascending in the given input \a profile.
5784  * \throw if \a profile has not exactly one component. It throws too, if \a profile contains some values not in [0,getNumberOfCells()) or if \a this is not fully defined
5785  */
5786 void MEDCouplingUMesh::splitProfilePerType(const DataArrayInt *profile, std::vector<int>& code, std::vector<DataArrayInt *>& idsInPflPerType, std::vector<DataArrayInt *>& idsPerType, bool smartPflKiller) const
5787 {
5788   if(!profile)
5789     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::splitProfilePerType : input profile is NULL !");
5790   if(profile->getNumberOfComponents()!=1)
5791     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::splitProfilePerType : input profile should have exactly one component !");
5792   checkConnectivityFullyDefined();
5793   const int *conn=_nodal_connec->begin();
5794   const int *connI=_nodal_connec_index->begin();
5795   int nbOfCells=getNumberOfCells();
5796   std::vector<INTERP_KERNEL::NormalizedCellType> types;
5797   std::vector<int> typeRangeVals(1);
5798   for(const int *i=connI;i!=connI+nbOfCells;)
5799     {
5800       INTERP_KERNEL::NormalizedCellType curType=(INTERP_KERNEL::NormalizedCellType)conn[*i];
5801       if(std::find(types.begin(),types.end(),curType)!=types.end())
5802         {
5803           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::splitProfilePerType : current mesh is not sorted by type !");
5804         }
5805       types.push_back(curType);
5806       i=std::find_if(i+1,connI+nbOfCells,MEDCouplingImpl::ConnReader(conn,(int)curType));
5807       typeRangeVals.push_back((int)std::distance(connI,i));
5808     }
5809   //
5810   DataArrayInt *castArr=0,*rankInsideCast=0,*castsPresent=0;
5811   profile->splitByValueRange(&typeRangeVals[0],&typeRangeVals[0]+typeRangeVals.size(),castArr,rankInsideCast,castsPresent);
5812   MCAuto<DataArrayInt> tmp0=castArr;
5813   MCAuto<DataArrayInt> tmp1=rankInsideCast;
5814   MCAuto<DataArrayInt> tmp2=castsPresent;
5815   //
5816   int nbOfCastsFinal=castsPresent->getNumberOfTuples();
5817   code.resize(3*nbOfCastsFinal);
5818   std::vector< MCAuto<DataArrayInt> > idsInPflPerType2;
5819   std::vector< MCAuto<DataArrayInt> > idsPerType2;
5820   for(int i=0;i<nbOfCastsFinal;i++)
5821     {
5822       int castId=castsPresent->getIJ(i,0);
5823       MCAuto<DataArrayInt> tmp3=castArr->findIdsEqual(castId);
5824       idsInPflPerType2.push_back(tmp3);
5825       code[3*i]=(int)types[castId];
5826       code[3*i+1]=tmp3->getNumberOfTuples();
5827       MCAuto<DataArrayInt> tmp4=rankInsideCast->selectByTupleId(tmp3->begin(),tmp3->begin()+tmp3->getNumberOfTuples());
5828       if(!smartPflKiller || !tmp4->isIota(typeRangeVals[castId+1]-typeRangeVals[castId]))
5829         {
5830           tmp4->copyStringInfoFrom(*profile);
5831           idsPerType2.push_back(tmp4);
5832           code[3*i+2]=(int)idsPerType2.size()-1;
5833         }
5834       else
5835         {
5836           code[3*i+2]=-1;
5837         }
5838     }
5839   std::size_t sz2=idsInPflPerType2.size();
5840   idsInPflPerType.resize(sz2);
5841   for(std::size_t i=0;i<sz2;i++)
5842     {
5843       DataArrayInt *locDa=idsInPflPerType2[i];
5844       locDa->incrRef();
5845       idsInPflPerType[i]=locDa;
5846     }
5847   std::size_t sz=idsPerType2.size();
5848   idsPerType.resize(sz);
5849   for(std::size_t i=0;i<sz;i++)
5850     {
5851       DataArrayInt *locDa=idsPerType2[i];
5852       locDa->incrRef();
5853       idsPerType[i]=locDa;
5854     }
5855 }
5856
5857 /*!
5858  * This method is here too emulate the MEDMEM behaviour on BDC (buildDescendingConnectivity). Hoping this method becomes deprecated very soon.
5859  * This method make the assumption that \a this and 'nM1LevMesh' mesh lyies on same coords (same pointer) as MED and MEDMEM does.
5860  * The following equality should be verified 'nM1LevMesh->getMeshDimension()==this->getMeshDimension()-1'
5861  * This method returns 5+2 elements. 'desc', 'descIndx', 'revDesc', 'revDescIndx' and 'meshnM1' behaves exactly as MEDCoupling::MEDCouplingUMesh::buildDescendingConnectivity except the content as described after. The returned array specifies the n-1 mesh reordered by type as MEDMEM does. 'nM1LevMeshIds' contains the ids in returned 'meshnM1'. Finally 'meshnM1Old2New' contains numbering old2new that is to say the cell #k in coarse 'nM1LevMesh' will have the number ret[k] in returned mesh 'nM1LevMesh' MEDMEM reordered.
5862  */
5863 MEDCouplingUMesh *MEDCouplingUMesh::emulateMEDMEMBDC(const MEDCouplingUMesh *nM1LevMesh, DataArrayInt *desc, DataArrayInt *descIndx, DataArrayInt *&revDesc, DataArrayInt *&revDescIndx, DataArrayInt *& nM1LevMeshIds, DataArrayInt *&meshnM1Old2New) const
5864 {
5865   checkFullyDefined();
5866   nM1LevMesh->checkFullyDefined();
5867   if(getMeshDimension()-1!=nM1LevMesh->getMeshDimension())
5868     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::emulateMEDMEMBDC : The mesh passed as first argument should have a meshDim equal to this->getMeshDimension()-1 !" );
5869   if(_coords!=nM1LevMesh->getCoords())
5870     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::emulateMEDMEMBDC : 'this' and mesh in first argument should share the same coords : Use tryToShareSameCoords method !");
5871   MCAuto<DataArrayInt> tmp0=DataArrayInt::New();
5872   MCAuto<DataArrayInt> tmp1=DataArrayInt::New();
5873   MCAuto<MEDCouplingUMesh> ret1=buildDescendingConnectivity(desc,descIndx,tmp0,tmp1);
5874   MCAuto<DataArrayInt> ret0=ret1->sortCellsInMEDFileFrmt();
5875   desc->transformWithIndArr(ret0->begin(),ret0->begin()+ret0->getNbOfElems());
5876   MCAuto<MEDCouplingUMesh> tmp=MEDCouplingUMesh::New();
5877   tmp->setConnectivity(tmp0,tmp1);
5878   tmp->renumberCells(ret0->begin(),false);
5879   revDesc=tmp->getNodalConnectivity();
5880   revDescIndx=tmp->getNodalConnectivityIndex();
5881   DataArrayInt *ret=0;
5882   if(!ret1->areCellsIncludedIn(nM1LevMesh,2,ret))
5883     {
5884       int tmp2;
5885       ret->getMaxValue(tmp2);
5886       ret->decrRef();
5887       std::ostringstream oss; oss << "MEDCouplingUMesh::emulateMEDMEMBDC : input N-1 mesh present a cell not in descending mesh ... Id of cell is " << tmp2 << " !";
5888       throw INTERP_KERNEL::Exception(oss.str());
5889     }
5890   nM1LevMeshIds=ret;
5891   //
5892   revDesc->incrRef();
5893   revDescIndx->incrRef();
5894   ret1->incrRef();
5895   ret0->incrRef();
5896   meshnM1Old2New=ret0;
5897   return ret1;
5898 }
5899
5900 /*!
5901  * Permutes the nodal connectivity arrays so that the cells are sorted by type, which is
5902  * necessary for writing the mesh to MED file. Additionally returns a permutation array
5903  * in "Old to New" mode.
5904  *  \return DataArrayInt * - a new instance of DataArrayInt. The caller is to delete
5905  *          this array using decrRef() as it is no more needed.
5906  *  \throw If the nodal connectivity of cells is not defined.
5907  */
5908 DataArrayInt *MEDCouplingUMesh::sortCellsInMEDFileFrmt()
5909 {
5910   checkConnectivityFullyDefined();
5911   MCAuto<DataArrayInt> ret=getRenumArrForMEDFileFrmt();
5912   renumberCells(ret->begin(),false);
5913   return ret.retn();
5914 }
5915
5916 /*!
5917  * This methods checks that cells are sorted by their types.
5918  * This method makes asumption (no check) that connectivity is correctly set before calling.
5919  */
5920 bool MEDCouplingUMesh::checkConsecutiveCellTypes() const
5921 {
5922   checkFullyDefined();
5923   const int *conn=_nodal_connec->begin();
5924   const int *connI=_nodal_connec_index->begin();
5925   int nbOfCells=getNumberOfCells();
5926   std::set<INTERP_KERNEL::NormalizedCellType> types;
5927   for(const int *i=connI;i!=connI+nbOfCells;)
5928     {
5929       INTERP_KERNEL::NormalizedCellType curType=(INTERP_KERNEL::NormalizedCellType)conn[*i];
5930       if(types.find(curType)!=types.end())
5931         return false;
5932       types.insert(curType);
5933       i=std::find_if(i+1,connI+nbOfCells,MEDCouplingImpl::ConnReader(conn,(int)curType));
5934     }
5935   return true;
5936 }
5937
5938 /*!
5939  * This method is a specialization of MEDCouplingUMesh::checkConsecutiveCellTypesAndOrder method that is called here.
5940  * The geometric type order is specified by MED file.
5941  *
5942  * \sa  MEDCouplingUMesh::checkConsecutiveCellTypesAndOrder
5943  */
5944 bool MEDCouplingUMesh::checkConsecutiveCellTypesForMEDFileFrmt() const
5945 {
5946   return checkConsecutiveCellTypesAndOrder(MEDMEM_ORDER,MEDMEM_ORDER+N_MEDMEM_ORDER);
5947 }
5948
5949 /*!
5950  * This method performs the same job as checkConsecutiveCellTypes except that the order of types sequence is analyzed to check
5951  * that the order is specified in array defined by [ \a orderBg , \a orderEnd ).
5952  * If there is some geo types in \a this \b NOT in [ \a orderBg, \a orderEnd ) it is OK (return true) if contiguous.
5953  * If there is some geo types in [ \a orderBg, \a orderEnd ) \b NOT in \a this it is OK too (return true) if contiguous.
5954  */
5955 bool MEDCouplingUMesh::checkConsecutiveCellTypesAndOrder(const INTERP_KERNEL::NormalizedCellType *orderBg, const INTERP_KERNEL::NormalizedCellType *orderEnd) const
5956 {
5957   checkFullyDefined();
5958   const int *conn=_nodal_connec->begin();
5959   const int *connI=_nodal_connec_index->begin();
5960   int nbOfCells=getNumberOfCells();
5961   if(nbOfCells==0)
5962     return true;
5963   int lastPos=-1;
5964   std::set<INTERP_KERNEL::NormalizedCellType> sg;
5965   for(const int *i=connI;i!=connI+nbOfCells;)
5966     {
5967       INTERP_KERNEL::NormalizedCellType curType=(INTERP_KERNEL::NormalizedCellType)conn[*i];
5968       const INTERP_KERNEL::NormalizedCellType *isTypeExists=std::find(orderBg,orderEnd,curType);
5969       if(isTypeExists!=orderEnd)
5970         {
5971           int pos=(int)std::distance(orderBg,isTypeExists);
5972           if(pos<=lastPos)
5973             return false;
5974           lastPos=pos;
5975           i=std::find_if(i+1,connI+nbOfCells,MEDCouplingImpl::ConnReader(conn,(int)curType));
5976         }
5977       else
5978         {
5979           if(sg.find(curType)==sg.end())
5980             {
5981               i=std::find_if(i+1,connI+nbOfCells,MEDCouplingImpl::ConnReader(conn,(int)curType));
5982               sg.insert(curType);
5983             }
5984           else
5985             return false;
5986         }
5987     }
5988   return true;
5989 }
5990
5991 /*!
5992  * This method returns 2 newly allocated DataArrayInt instances. The first is an array of size 'this->getNumberOfCells()' with one component,
5993  * that tells for each cell the pos of its type in the array on type given in input parameter. The 2nd output parameter is an array with the same
5994  * number of tuples than input type array and with one component. This 2nd output array gives type by type the number of occurrence of type in 'this'.
5995  */
5996 DataArrayInt *MEDCouplingUMesh::getLevArrPerCellTypes(const INTERP_KERNEL::NormalizedCellType *orderBg, const INTERP_KERNEL::NormalizedCellType *orderEnd, DataArrayInt *&nbPerType) const
5997 {
5998   checkConnectivityFullyDefined();
5999   int nbOfCells=getNumberOfCells();
6000   const int *conn=_nodal_connec->begin();
6001   const int *connI=_nodal_connec_index->begin();
6002   MCAuto<DataArrayInt> tmpa=DataArrayInt::New();
6003   MCAuto<DataArrayInt> tmpb=DataArrayInt::New();
6004   tmpa->alloc(nbOfCells,1);
6005   tmpb->alloc((int)std::distance(orderBg,orderEnd),1);
6006   tmpb->fillWithZero();
6007   int *tmp=tmpa->getPointer();
6008   int *tmp2=tmpb->getPointer();
6009   for(const int *i=connI;i!=connI+nbOfCells;i++)
6010     {
6011       const INTERP_KERNEL::NormalizedCellType *where=std::find(orderBg,orderEnd,(INTERP_KERNEL::NormalizedCellType)conn[*i]);
6012       if(where!=orderEnd)
6013         {
6014           int pos=(int)std::distance(orderBg,where);
6015           tmp2[pos]++;
6016           tmp[std::distance(connI,i)]=pos;
6017         }
6018       else
6019         {
6020           const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)conn[*i]);
6021           std::ostringstream oss; oss << "MEDCouplingUMesh::getLevArrPerCellTypes : Cell #" << std::distance(connI,i);
6022           oss << " has a type " << cm.getRepr() << " not in input array of type !";
6023           throw INTERP_KERNEL::Exception(oss.str());
6024         }
6025     }
6026   nbPerType=tmpb.retn();
6027   return tmpa.retn();
6028 }
6029
6030 /*!
6031  * This method behaves exactly as MEDCouplingUMesh::getRenumArrForConsecutiveCellTypesSpec but the order is those defined in MED file spec.
6032  *
6033  * \return a new object containing the old to new correspondence.
6034  *
6035  * \sa MEDCouplingUMesh::getRenumArrForConsecutiveCellTypesSpec, MEDCouplingUMesh::sortCellsInMEDFileFrmt.
6036  */
6037 DataArrayInt *MEDCouplingUMesh::getRenumArrForMEDFileFrmt() const
6038 {
6039   return getRenumArrForConsecutiveCellTypesSpec(MEDMEM_ORDER,MEDMEM_ORDER+N_MEDMEM_ORDER);
6040 }
6041
6042 /*!
6043  * This method is similar to method MEDCouplingUMesh::rearrange2ConsecutiveCellTypes except that the type order is specified by [ \a orderBg , \a orderEnd ) (as MEDCouplingUMesh::checkConsecutiveCellTypesAndOrder method) and that this method is \b const and performs \b NO permutation in \a this.
6044  * This method returns an array of size getNumberOfCells() that gives a renumber array old2New that can be used as input of MEDCouplingMesh::renumberCells.
6045  * The mesh after this call to MEDCouplingMesh::renumberCells will pass the test of MEDCouplingUMesh::checkConsecutiveCellTypesAndOrder with the same inputs.
6046  * The returned array minimizes the permutations that is to say the order of cells inside same geometric type remains the same.
6047  */
6048 DataArrayInt *MEDCouplingUMesh::getRenumArrForConsecutiveCellTypesSpec(const INTERP_KERNEL::NormalizedCellType *orderBg, const INTERP_KERNEL::NormalizedCellType *orderEnd) const
6049 {
6050   DataArrayInt *nbPerType=0;
6051   MCAuto<DataArrayInt> tmpa=getLevArrPerCellTypes(orderBg,orderEnd,nbPerType);
6052   nbPerType->decrRef();
6053   return tmpa->buildPermArrPerLevel();
6054 }
6055
6056 /*!
6057  * This method reorganize the cells of \a this so that the cells with same geometric types are put together.
6058  * The number of cells remains unchanged after the call of this method.
6059  * This method tries to minimizes the number of needed permutations. So, this method behaves not exactly as
6060  * MEDCouplingUMesh::sortCellsInMEDFileFrmt.
6061  *
6062  * \return the array giving the correspondence old to new.
6063  */
6064 DataArrayInt *MEDCouplingUMesh::rearrange2ConsecutiveCellTypes()
6065 {
6066   checkFullyDefined();
6067   computeTypes();
6068   const int *conn=_nodal_connec->begin();
6069   const int *connI=_nodal_connec_index->begin();
6070   int nbOfCells=getNumberOfCells();
6071   std::vector<INTERP_KERNEL::NormalizedCellType> types;
6072   for(const int *i=connI;i!=connI+nbOfCells && (types.size()!=_types.size());)
6073     if(std::find(types.begin(),types.end(),(INTERP_KERNEL::NormalizedCellType)conn[*i])==types.end())
6074       {
6075         INTERP_KERNEL::NormalizedCellType curType=(INTERP_KERNEL::NormalizedCellType)conn[*i];
6076         types.push_back(curType);
6077         for(i++;i!=connI+nbOfCells && (INTERP_KERNEL::NormalizedCellType)conn[*i]==curType;i++);
6078       }
6079   DataArrayInt *ret=DataArrayInt::New();
6080   ret->alloc(nbOfCells,1);
6081   int *retPtr=ret->getPointer();
6082   std::fill(retPtr,retPtr+nbOfCells,-1);
6083   int newCellId=0;
6084   for(std::vector<INTERP_KERNEL::NormalizedCellType>::const_iterator iter=types.begin();iter!=types.end();iter++)
6085     {
6086       for(const int *i=connI;i!=connI+nbOfCells;i++)
6087         if((INTERP_KERNEL::NormalizedCellType)conn[*i]==(*iter))
6088           retPtr[std::distance(connI,i)]=newCellId++;
6089     }
6090   renumberCells(retPtr,false);
6091   return ret;
6092 }
6093
6094 /*!
6095  * This method splits \a this into as mush as untructured meshes that consecutive set of same type cells.
6096  * So this method has typically a sense if MEDCouplingUMesh::checkConsecutiveCellTypes has a sense.
6097  * This method makes asumption that connectivity is correctly set before calling.
6098  */
6099 std::vector<MEDCouplingUMesh *> MEDCouplingUMesh::splitByType() const
6100 {
6101   checkConnectivityFullyDefined();
6102   const int *conn=_nodal_connec->begin();
6103   const int *connI=_nodal_connec_index->begin();
6104   int nbOfCells=getNumberOfCells();
6105   std::vector<MEDCouplingUMesh *> ret;
6106   for(const int *i=connI;i!=connI+nbOfCells;)
6107     {
6108       INTERP_KERNEL::NormalizedCellType curType=(INTERP_KERNEL::NormalizedCellType)conn[*i];
6109       int beginCellId=(int)std::distance(connI,i);
6110       i=std::find_if(i+1,connI+nbOfCells,MEDCouplingImpl::ConnReader(conn,(int)curType));
6111       int endCellId=(int)std::distance(connI,i);
6112       int sz=endCellId-beginCellId;
6113       int *cells=new int[sz];
6114       for(int j=0;j<sz;j++)
6115         cells[j]=beginCellId+j;
6116       MEDCouplingUMesh *m=(MEDCouplingUMesh *)buildPartOfMySelf(cells,cells+sz,true);
6117       delete [] cells;
6118       ret.push_back(m);
6119     }
6120   return ret;
6121 }
6122
6123 /*!
6124  * This method performs the opposite operation than those in MEDCoupling1SGTUMesh::buildUnstructured.
6125  * If \a this is a single geometric type unstructured mesh, it will be converted into a more compact data structure,
6126  * MEDCoupling1GTUMesh instance. The returned instance will aggregate the same DataArrayDouble instance of coordinates than \a this.
6127  *
6128  * \return a newly allocated instance, that the caller must manage.
6129  * \throw If \a this contains more than one geometric type.
6130  * \throw If the nodal connectivity of \a this is not fully defined.
6131  * \throw If the internal data is not coherent.
6132  */
6133 MEDCoupling1GTUMesh *MEDCouplingUMesh::convertIntoSingleGeoTypeMesh() const
6134 {
6135   checkConnectivityFullyDefined();
6136   if(_types.size()!=1)
6137     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertIntoSingleGeoTypeMesh : current mesh does not contain exactly one geometric type !");
6138   INTERP_KERNEL::NormalizedCellType typ=*_types.begin();
6139   MCAuto<MEDCoupling1GTUMesh> ret=MEDCoupling1GTUMesh::New(getName(),typ);
6140   ret->setCoords(getCoords());
6141   MEDCoupling1SGTUMesh *retC=dynamic_cast<MEDCoupling1SGTUMesh *>((MEDCoupling1GTUMesh*)ret);
6142   if(retC)
6143     {
6144       MCAuto<DataArrayInt> c=convertNodalConnectivityToStaticGeoTypeMesh();
6145       retC->setNodalConnectivity(c);
6146     }
6147   else
6148     {
6149       MEDCoupling1DGTUMesh *retD=dynamic_cast<MEDCoupling1DGTUMesh *>((MEDCoupling1GTUMesh*)ret);
6150       if(!retD)
6151         throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertIntoSingleGeoTypeMesh : Internal error !");
6152       DataArrayInt *c=0,*ci=0;
6153       convertNodalConnectivityToDynamicGeoTypeMesh(c,ci);
6154       MCAuto<DataArrayInt> cs(c),cis(ci);
6155       retD->setNodalConnectivity(cs,cis);
6156     }
6157   return ret.retn();
6158 }
6159
6160 DataArrayInt *MEDCouplingUMesh::convertNodalConnectivityToStaticGeoTypeMesh() const
6161 {
6162   checkConnectivityFullyDefined();
6163   if(_types.size()!=1)
6164     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertNodalConnectivityToStaticGeoTypeMesh : current mesh does not contain exactly one geometric type !");
6165   INTERP_KERNEL::NormalizedCellType typ=*_types.begin();
6166   const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(typ);
6167   if(cm.isDynamic())
6168     {
6169       std::ostringstream oss; oss << "MEDCouplingUMesh::convertNodalConnectivityToStaticGeoTypeMesh : this contains a single geo type (" << cm.getRepr() << ") but ";
6170       oss << "this type is dynamic ! Only static geometric type is possible for that type ! call convertNodalConnectivityToDynamicGeoTypeMesh instead !";
6171       throw INTERP_KERNEL::Exception(oss.str());
6172     }
6173   int nbCells=getNumberOfCells();
6174   int typi=(int)typ;
6175   int nbNodesPerCell=(int)cm.getNumberOfNodes();
6176   MCAuto<DataArrayInt> connOut=DataArrayInt::New(); connOut->alloc(nbCells*nbNodesPerCell,1);
6177   int *outPtr=connOut->getPointer();
6178   const int *conn=_nodal_connec->begin();
6179   const int *connI=_nodal_connec_index->begin();
6180   nbNodesPerCell++;
6181   for(int i=0;i<nbCells;i++,connI++)
6182     {
6183       if(conn[connI[0]]==typi && connI[1]-connI[0]==nbNodesPerCell)
6184         outPtr=std::copy(conn+connI[0]+1,conn+connI[1],outPtr);
6185       else
6186         {
6187           std::ostringstream oss; oss << "MEDCouplingUMesh::convertNodalConnectivityToStaticGeoTypeMesh : there something wrong in cell #" << i << " ! The type of cell is not those expected, or the length of nodal connectivity is not those expected (" << nbNodesPerCell-1 << ") !";
6188           throw INTERP_KERNEL::Exception(oss.str());
6189         }
6190     }
6191   return connOut.retn();
6192 }
6193
6194 /*!
6195  * Convert the nodal connectivity of the mesh so that all the cells are of dynamic types (polygon or quadratic
6196  * polygon). This returns the corresponding new nodal connectivity in \ref numbering-indirect format.
6197  * \param nodalConn
6198  * \param nodalConnI
6199  */
6200 void MEDCouplingUMesh::convertNodalConnectivityToDynamicGeoTypeMesh(DataArrayInt *&nodalConn, DataArrayInt *&nodalConnIndex) const
6201 {
6202   static const char msg0[]="MEDCouplingUMesh::convertNodalConnectivityToDynamicGeoTypeMesh : nodal connectivity in this are invalid ! Call checkConsistency !";
6203   checkConnectivityFullyDefined();
6204   if(_types.size()!=1)
6205     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::convertNodalConnectivityToDynamicGeoTypeMesh : current mesh does not contain exactly one geometric type !");
6206   int nbCells=getNumberOfCells(),lgth=_nodal_connec->getNumberOfTuples();
6207   if(lgth<nbCells)
6208     throw INTERP_KERNEL::Exception(msg0);
6209   MCAuto<DataArrayInt> c(DataArrayInt::New()),ci(DataArrayInt::New());
6210   c->alloc(lgth-nbCells,1); ci->alloc(nbCells+1,1);
6211   int *cp(c->getPointer()),*cip(ci->getPointer());
6212   const int *incp(_nodal_connec->begin()),*incip(_nodal_connec_index->begin());
6213   cip[0]=0;
6214   for(int i=0;i<nbCells;i++,cip++,incip++)
6215     {
6216       int strt(incip[0]+1),stop(incip[1]);//+1 to skip geo type
6217       int delta(stop-strt);
6218       if(delta>=1)
6219         {
6220           if((strt>=0 && strt<lgth) && (stop>=0 && stop<=lgth))
6221             cp=std::copy(incp+strt,incp+stop,cp);
6222           else
6223             throw INTERP_KERNEL::Exception(msg0);
6224         }
6225       else
6226         throw INTERP_KERNEL::Exception(msg0);
6227       cip[1]=cip[0]+delta;
6228     }
6229   nodalConn=c.retn(); nodalConnIndex=ci.retn();
6230 }
6231
6232 /*!
6233  * This method takes in input a vector of MEDCouplingUMesh instances lying on the same coordinates with same mesh dimensions.
6234  * Each mesh in \b ms must be sorted by type with the same order (typically using MEDCouplingUMesh::sortCellsInMEDFileFrmt).
6235  * This method is particularly useful for MED file interaction. It allows to aggregate several meshes and keeping the type sorting
6236  * and the track of the permutation by chunk of same geotype cells to retrieve it. The traditional formats old2new and new2old
6237  * are not used here to avoid the build of big permutation array.
6238  *
6239  * \param [in] ms meshes with same mesh dimension lying on the same coords and sorted by type following de the same geometric type order than
6240  *                those specified in MEDCouplingUMesh::sortCellsInMEDFileFrmt method.
6241  * \param [out] szOfCellGrpOfSameType is a newly allocated DataArrayInt instance whose number of tuples is equal to the number of chunks of same geotype
6242  *              in all meshes in \b ms. The accumulation of all values of this array is equal to the number of cells of returned mesh.
6243  * \param [out] idInMsOfCellGrpOfSameType is a newly allocated DataArrayInt instance having the same size than \b szOfCellGrpOfSameType. This
6244  *              output array gives for each chunck of same type the corresponding mesh id in \b ms.
6245  * \return A newly allocated unstructured mesh that is the result of the aggregation on same coords of all meshes in \b ms. This returned mesh
6246  *         is sorted by type following the geo cell types order of MEDCouplingUMesh::sortCellsInMEDFileFrmt method.
6247  */
6248 MEDCouplingUMesh *MEDCouplingUMesh::AggregateSortedByTypeMeshesOnSameCoords(const std::vector<const MEDCouplingUMesh *>& ms,
6249                                                                             DataArrayInt *&szOfCellGrpOfSameType,
6250                                                                             DataArrayInt *&idInMsOfCellGrpOfSameType)
6251 {
6252   std::vector<const MEDCouplingUMesh *> ms2;
6253   for(std::vector<const MEDCouplingUMesh *>::const_iterator it=ms.begin();it!=ms.end();it++)
6254     if(*it)
6255       {
6256         (*it)->checkConnectivityFullyDefined();
6257         ms2.push_back(*it);
6258       }
6259   if(ms2.empty())
6260     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::AggregateSortedByTypeMeshesOnSameCoords : input vector is empty !");
6261   const DataArrayDouble *refCoo=ms2[0]->getCoords();
6262   int meshDim=ms2[0]->getMeshDimension();
6263   std::vector<const MEDCouplingUMesh *> m1ssm;
6264   std::vector< MCAuto<MEDCouplingUMesh> > m1ssmAuto;
6265   //
6266   std::vector<const MEDCouplingUMesh *> m1ssmSingle;
6267   std::vector< MCAuto<MEDCouplingUMesh> > m1ssmSingleAuto;
6268   int fake=0,rk=0;
6269   MCAuto<DataArrayInt> ret1(DataArrayInt::New()),ret2(DataArrayInt::New());
6270   ret1->alloc(0,1); ret2->alloc(0,1);
6271   for(std::vector<const MEDCouplingUMesh *>::const_iterator it=ms2.begin();it!=ms2.end();it++,rk++)
6272     {
6273       if(meshDim!=(*it)->getMeshDimension())
6274         throw INTERP_KERNEL::Exception("MEDCouplingUMesh::AggregateSortedByTypeMeshesOnSameCoords : meshdims mismatch !");
6275       if(refCoo!=(*it)->getCoords())
6276         throw INTERP_KERNEL::Exception("MEDCouplingUMesh::AggregateSortedByTypeMeshesOnSameCoords : meshes are not shared by a single coordinates coords !");
6277       std::vector<MEDCouplingUMesh *> sp=(*it)->splitByType();
6278       std::copy(sp.begin(),sp.end(),std::back_insert_iterator< std::vector<const MEDCouplingUMesh *> >(m1ssm));
6279       std::copy(sp.begin(),sp.end(),std::back_insert_iterator< std::vector<MCAuto<MEDCouplingUMesh> > >(m1ssmAuto));
6280       for(std::vector<MEDCouplingUMesh *>::const_iterator it2=sp.begin();it2!=sp.end();it2++)
6281         {
6282           MEDCouplingUMesh *singleCell=static_cast<MEDCouplingUMesh *>((*it2)->buildPartOfMySelf(&fake,&fake+1,true));
6283           m1ssmSingleAuto.push_back(singleCell);
6284           m1ssmSingle.push_back(singleCell);
6285           ret1->pushBackSilent((*it2)->getNumberOfCells()); ret2->pushBackSilent(rk);
6286         }
6287     }
6288   MCAuto<MEDCouplingUMesh> m1ssmSingle2=MEDCouplingUMesh::MergeUMeshesOnSameCoords(m1ssmSingle);
6289   MCAuto<DataArrayInt> renum=m1ssmSingle2->sortCellsInMEDFileFrmt();
6290   std::vector<const MEDCouplingUMesh *> m1ssmfinal(m1ssm.size());
6291   for(std::size_t i=0;i<m1ssm.size();i++)
6292     m1ssmfinal[renum->getIJ(i,0)]=m1ssm[i];
6293   MCAuto<MEDCouplingUMesh> ret0=MEDCouplingUMesh::MergeUMeshesOnSameCoords(m1ssmfinal);
6294   szOfCellGrpOfSameType=ret1->renumber(renum->begin());
6295   idInMsOfCellGrpOfSameType=ret2->renumber(renum->begin());
6296   return ret0.retn();
6297 }
6298
6299 /*!
6300  * This method returns a newly created DataArrayInt instance.
6301  * This method retrieves cell ids in [ \a begin, \a end ) that have the type \a type.
6302  */
6303 DataArrayInt *MEDCouplingUMesh::keepCellIdsByType(INTERP_KERNEL::NormalizedCellType type, const int *begin, const int *end) const
6304 {
6305   checkFullyDefined();
6306   const int *conn=_nodal_connec->begin();
6307   const int *connIndex=_nodal_connec_index->begin();
6308   MCAuto<DataArrayInt> ret(DataArrayInt::New()); ret->alloc(0,1);
6309   for(const int *w=begin;w!=end;w++)
6310     if((INTERP_KERNEL::NormalizedCellType)conn[connIndex[*w]]==type)
6311       ret->pushBackSilent(*w);
6312   return ret.retn();
6313 }
6314
6315 /*!
6316  * This method makes the assumption that da->getNumberOfTuples()<this->getNumberOfCells(). This method makes the assumption that ids contained in 'da'
6317  * are in [0:getNumberOfCells())
6318  */
6319 DataArrayInt *MEDCouplingUMesh::convertCellArrayPerGeoType(const DataArrayInt *da) const
6320 {
6321   checkFullyDefined();
6322   const int *conn=_nodal_connec->begin();
6323   const int *connI=_nodal_connec_index->begin();
6324   int nbOfCells=getNumberOfCells();
6325   std::set<INTERP_KERNEL::NormalizedCellType> types(getAllGeoTypes());
6326   int *tmp=new int[nbOfCells];
6327   for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator iter=types.begin();iter!=types.end();iter++)
6328     {
6329       int j=0;
6330       for(const int *i=connI;i!=connI+nbOfCells;i++)
6331         if((INTERP_KERNEL::NormalizedCellType)conn[*i]==(*iter))
6332           tmp[std::distance(connI,i)]=j++;
6333     }
6334   DataArrayInt *ret=DataArrayInt::New();
6335   ret->alloc(da->getNumberOfTuples(),da->getNumberOfComponents());
6336   ret->copyStringInfoFrom(*da);
6337   int *retPtr=ret->getPointer();
6338   const int *daPtr=da->begin();
6339   int nbOfElems=da->getNbOfElems();
6340   for(int k=0;k<nbOfElems;k++)
6341     retPtr[k]=tmp[daPtr[k]];
6342   delete [] tmp;
6343   return ret;
6344 }
6345
6346 /*!
6347  * This method reduced number of cells of this by keeping cells whose type is different from 'type' and if type=='type'
6348  * This method \b works \b for mesh sorted by type.
6349  * cells whose ids is in 'idsPerGeoType' array.
6350  * This method conserves coords and name of mesh.
6351  */
6352 MEDCouplingUMesh *MEDCouplingUMesh::keepSpecifiedCells(INTERP_KERNEL::NormalizedCellType type, const int *idsPerGeoTypeBg, const int *idsPerGeoTypeEnd) const
6353 {
6354   std::vector<int> code=getDistributionOfTypes();
6355   std::size_t nOfTypesInThis=code.size()/3;
6356   int sz=0,szOfType=0;
6357   for(std::size_t i=0;i<nOfTypesInThis;i++)
6358     {
6359       if(code[3*i]!=type)
6360         sz+=code[3*i+1];
6361       else
6362         szOfType=code[3*i+1];
6363     }
6364   for(const int *work=idsPerGeoTypeBg;work!=idsPerGeoTypeEnd;work++)
6365     if(*work<0 || *work>=szOfType)
6366       {
6367         std::ostringstream oss; oss << "MEDCouplingUMesh::keepSpecifiedCells : Request on type " << type << " at place #" << std::distance(idsPerGeoTypeBg,work) << " value " << *work;
6368         oss << ". It should be in [0," << szOfType << ") !";
6369         throw INTERP_KERNEL::Exception(oss.str());
6370       }
6371   MCAuto<DataArrayInt> idsTokeep=DataArrayInt::New(); idsTokeep->alloc(sz+(int)std::distance(idsPerGeoTypeBg,idsPerGeoTypeEnd),1);
6372   int *idsPtr=idsTokeep->getPointer();
6373   int offset=0;
6374   for(std::size_t i=0;i<nOfTypesInThis;i++)
6375     {
6376       if(code[3*i]!=type)
6377         for(int j=0;j<code[3*i+1];j++)
6378           *idsPtr++=offset+j;
6379       else
6380         idsPtr=std::transform(idsPerGeoTypeBg,idsPerGeoTypeEnd,idsPtr,std::bind2nd(std::plus<int>(),offset));
6381       offset+=code[3*i+1];
6382     }
6383   MCAuto<MEDCouplingUMesh> ret=static_cast<MEDCouplingUMesh *>(buildPartOfMySelf(idsTokeep->begin(),idsTokeep->end(),true));
6384   ret->copyTinyInfoFrom(this);
6385   return ret.retn();
6386 }
6387
6388 /*!
6389  * This method returns a vector of size 'this->getNumberOfCells()'.
6390  * This method retrieves for each cell in \a this if it is linear (false) or quadratic(true).
6391  */
6392 std::vector<bool> MEDCouplingUMesh::getQuadraticStatus() const
6393 {
6394   int ncell=getNumberOfCells();
6395   std::vector<bool> ret(ncell);
6396   const int *cI=getNodalConnectivityIndex()->begin();
6397   const int *c=getNodalConnectivity()->begin();
6398   for(int i=0;i<ncell;i++)
6399     {
6400       INTERP_KERNEL::NormalizedCellType typ=(INTERP_KERNEL::NormalizedCellType)c[cI[i]];
6401       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(typ);
6402       ret[i]=cm.isQuadratic();
6403     }
6404   return ret;
6405 }
6406
6407 /*!
6408  * Returns a newly created mesh (with ref count ==1) that contains merge of \a this and \a other.
6409  */
6410 MEDCouplingMesh *MEDCouplingUMesh::mergeMyselfWith(const MEDCouplingMesh *other) const
6411 {
6412   if(other->getType()!=UNSTRUCTURED)
6413     throw INTERP_KERNEL::Exception("Merge of umesh only available with umesh each other !");
6414   const MEDCouplingUMesh *otherC=static_cast<const MEDCouplingUMesh *>(other);
6415   return MergeUMeshes(this,otherC);
6416 }
6417
6418 /*!
6419  * Returns a new DataArrayDouble holding barycenters of all cells. The barycenter is
6420  * computed by averaging coordinates of cell nodes, so this method is not a right
6421  * choice for degenerated meshes (not well oriented, cells with measure close to zero).
6422  *  \return DataArrayDouble * - a new instance of DataArrayDouble, of size \a
6423  *          this->getNumberOfCells() tuples per \a this->getSpaceDimension()
6424  *          components. The caller is to delete this array using decrRef() as it is
6425  *          no more needed.
6426  *  \throw If the coordinates array is not set.
6427  *  \throw If the nodal connectivity of cells is not defined.
6428  *  \sa MEDCouplingUMesh::computeIsoBarycenterOfNodesPerCell
6429  */
6430 DataArrayDouble *MEDCouplingUMesh::computeCellCenterOfMass() const
6431 {
6432   MCAuto<DataArrayDouble> ret=DataArrayDouble::New();
6433   int spaceDim=getSpaceDimension();
6434   int nbOfCells=getNumberOfCells();
6435   ret->alloc(nbOfCells,spaceDim);
6436   ret->copyStringInfoFrom(*getCoords());
6437   double *ptToFill=ret->getPointer();
6438   const int *nodal=_nodal_connec->begin();
6439   const int *nodalI=_nodal_connec_index->begin();
6440   const double *coor=_coords->begin();
6441   for(int i=0;i<nbOfCells;i++)
6442     {
6443       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)nodal[nodalI[i]];
6444       INTERP_KERNEL::computeBarycenter2<int,INTERP_KERNEL::ALL_C_MODE>(type,nodal+nodalI[i]+1,nodalI[i+1]-nodalI[i]-1,coor,spaceDim,ptToFill);
6445       ptToFill+=spaceDim;
6446     }
6447   return ret.retn();
6448 }
6449
6450 /*!
6451  * This method computes for each cell in \a this, the location of the iso barycenter of nodes constituting
6452  * the cell. Contrary to badly named MEDCouplingUMesh::computeCellCenterOfMass method that returns the center of inertia of the
6453  *
6454  * \return a newly allocated DataArrayDouble instance that the caller has to deal with. The returned
6455  *          DataArrayDouble instance will have \c this->getNumberOfCells() tuples and \c this->getSpaceDimension() components.
6456  *
6457  * \sa MEDCouplingUMesh::computeCellCenterOfMass
6458  * \throw If \a this is not fully defined (coordinates and connectivity)
6459  * \throw If there is presence in nodal connectivity in \a this of node ids not in [0, \c this->getNumberOfNodes() )
6460  */
6461 DataArrayDouble *MEDCouplingUMesh::computeIsoBarycenterOfNodesPerCell() const
6462 {
6463   checkFullyDefined();
6464   MCAuto<DataArrayDouble> ret=DataArrayDouble::New();
6465   int spaceDim=getSpaceDimension();
6466   int nbOfCells=getNumberOfCells();
6467   int nbOfNodes=getNumberOfNodes();
6468   ret->alloc(nbOfCells,spaceDim);
6469   double *ptToFill=ret->getPointer();
6470   const int *nodal=_nodal_connec->begin();
6471   const int *nodalI=_nodal_connec_index->begin();
6472   const double *coor=_coords->begin();
6473   for(int i=0;i<nbOfCells;i++,ptToFill+=spaceDim)
6474     {
6475       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)nodal[nodalI[i]];
6476       std::fill(ptToFill,ptToFill+spaceDim,0.);
6477       if(type!=INTERP_KERNEL::NORM_POLYHED)
6478         {
6479           for(const int *conn=nodal+nodalI[i]+1;conn!=nodal+nodalI[i+1];conn++)
6480             {
6481               if(*conn>=0 && *conn<nbOfNodes)
6482                 std::transform(coor+spaceDim*conn[0],coor+spaceDim*(conn[0]+1),ptToFill,ptToFill,std::plus<double>());
6483               else
6484                 {
6485                   std::ostringstream oss; oss << "MEDCouplingUMesh::computeIsoBarycenterOfNodesPerCell : on cell #" << i << " presence of nodeId #" << *conn << " should be in [0," <<   nbOfNodes << ") !";
6486                   throw INTERP_KERNEL::Exception(oss.str());
6487                 }
6488             }
6489           int nbOfNodesInCell=nodalI[i+1]-nodalI[i]-1;
6490           if(nbOfNodesInCell>0)
6491             std::transform(ptToFill,ptToFill+spaceDim,ptToFill,std::bind2nd(std::multiplies<double>(),1./(double)nbOfNodesInCell));
6492           else
6493             {
6494               std::ostringstream oss; oss << "MEDCouplingUMesh::computeIsoBarycenterOfNodesPerCell : on cell #" << i << " presence of cell with no nodes !";
6495               throw INTERP_KERNEL::Exception(oss.str());
6496             }
6497         }
6498       else
6499         {
6500           std::set<int> s(nodal+nodalI[i]+1,nodal+nodalI[i+1]);
6501           s.erase(-1);
6502           for(std::set<int>::const_iterator it=s.begin();it!=s.end();it++)
6503             {
6504               if(*it>=0 && *it<nbOfNodes)
6505                 std::transform(coor+spaceDim*(*it),coor+spaceDim*((*it)+1),ptToFill,ptToFill,std::plus<double>());
6506               else
6507                 {
6508                   std::ostringstream oss; oss << "MEDCouplingUMesh::computeIsoBarycenterOfNodesPerCell : on cell polyhedron cell #" << i << " presence of nodeId #" << *it << " should be in [0," <<   nbOfNodes << ") !";
6509                   throw INTERP_KERNEL::Exception(oss.str());
6510                 }
6511             }
6512           if(!s.empty())
6513             std::transform(ptToFill,ptToFill+spaceDim,ptToFill,std::bind2nd(std::multiplies<double>(),1./(double)s.size()));
6514           else
6515             {
6516               std::ostringstream oss; oss << "MEDCouplingUMesh::computeIsoBarycenterOfNodesPerCell : on polyhedron cell #" << i << " there are no nodes !";
6517               throw INTERP_KERNEL::Exception(oss.str());
6518             }
6519         }
6520     }
6521   return ret.retn();
6522 }
6523
6524 /*!
6525  * Returns a new DataArrayDouble holding barycenters of specified cells. The
6526  * barycenter is computed by averaging coordinates of cell nodes. The cells to treat
6527  * are specified via an array of cell ids.
6528  *  \warning Validity of the specified cell ids is not checked!
6529  *           Valid range is [ 0, \a this->getNumberOfCells() ).
6530  *  \param [in] begin - an array of cell ids of interest.
6531  *  \param [in] end - the end of \a begin, i.e. a pointer to its (last+1)-th element.
6532  *  \return DataArrayDouble * - a new instance of DataArrayDouble, of size ( \a
6533  *          end - \a begin ) tuples per \a this->getSpaceDimension() components. The
6534  *          caller is to delete this array using decrRef() as it is no more needed.
6535  *  \throw If the coordinates array is not set.
6536  *  \throw If the nodal connectivity of cells is not defined.
6537  *
6538  *  \if ENABLE_EXAMPLES
6539  *  \ref cpp_mcumesh_getPartBarycenterAndOwner "Here is a C++ example".<br>
6540  *  \ref  py_mcumesh_getPartBarycenterAndOwner "Here is a Python example".
6541  *  \endif
6542  */
6543 DataArrayDouble *MEDCouplingUMesh::getPartBarycenterAndOwner(const int *begin, const int *end) const
6544 {
6545   DataArrayDouble *ret=DataArrayDouble::New();
6546   int spaceDim=getSpaceDimension();
6547   int nbOfTuple=(int)std::distance(begin,end);
6548   ret->alloc(nbOfTuple,spaceDim);
6549   double *ptToFill=ret->getPointer();
6550   double *tmp=new double[spaceDim];
6551   const int *nodal=_nodal_connec->begin();
6552   const int *nodalI=_nodal_connec_index->begin();
6553   const double *coor=_coords->begin();
6554   for(const int *w=begin;w!=end;w++)
6555     {
6556       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)nodal[nodalI[*w]];
6557       INTERP_KERNEL::computeBarycenter2<int,INTERP_KERNEL::ALL_C_MODE>(type,nodal+nodalI[*w]+1,nodalI[*w+1]-nodalI[*w]-1,coor,spaceDim,ptToFill);
6558       ptToFill+=spaceDim;
6559     }
6560   delete [] tmp;
6561   return ret;
6562 }
6563
6564 /*!
6565  * Returns a DataArrayDouble instance giving for each cell in \a this the equation of plane given by "a*X+b*Y+c*Z+d=0".
6566  * So the returned instance will have 4 components and \c this->getNumberOfCells() tuples.
6567  * So this method expects that \a this has a spaceDimension equal to 3 and meshDimension equal to 2.
6568  * The computation of the plane equation is done using each time the 3 first nodes of 2D cells.
6569  * This method is useful to detect 2D cells in 3D space that are not coplanar.
6570  *
6571  * \return DataArrayDouble * - a new instance of DataArrayDouble having 4 components and a number of tuples equal to number of cells in \a this.
6572  * \throw If spaceDim!=3 or meshDim!=2.
6573  * \throw If connectivity of \a this is invalid.
6574  * \throw If connectivity of a cell in \a this points to an invalid node.
6575  */
6576 DataArrayDouble *MEDCouplingUMesh::computePlaneEquationOf3DFaces() const
6577 {
6578   MCAuto<DataArrayDouble> ret(DataArrayDouble::New());
6579   int nbOfCells(getNumberOfCells()),nbOfNodes(getNumberOfNodes());
6580   if(getSpaceDimension()!=3 || getMeshDimension()!=2)
6581     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::computePlaneEquationOf3DFaces : This method must be applied on a mesh having meshDimension equal 2 and a spaceDimension equal to 3 !");
6582   ret->alloc(nbOfCells,4);
6583   double *retPtr(ret->getPointer());
6584   const int *nodal(_nodal_connec->begin()),*nodalI(_nodal_connec_index->begin());
6585   const double *coor(_coords->begin());
6586   for(int i=0;i<nbOfCells;i++,nodalI++,retPtr+=4)
6587     {
6588       double matrix[16]={0,0,0,1,0,0,0,1,0,0,0,1,1,1,1,0},matrix2[16];
6589       if(nodalI[1]-nodalI[0]>=4)
6590         {
6591           double aa[3]={coor[nodal[nodalI[0]+1+1]*3+0]-coor[nodal[nodalI[0]+1+0]*3+0],
6592                         coor[nodal[nodalI[0]+1+1]*3+1]-coor[nodal[nodalI[0]+1+0]*3+1],
6593                         coor[nodal[nodalI[0]+1+1]*3+2]-coor[nodal[nodalI[0]+1+0]*3+2]}
6594           ,bb[3]={coor[nodal[nodalI[0]+1+2]*3+0]-coor[nodal[nodalI[0]+1+0]*3+0],
6595                         coor[nodal[nodalI[0]+1+2]*3+1]-coor[nodal[nodalI[0]+1+0]*3+1],
6596                         coor[nodal[nodalI[0]+1+2]*3+2]-coor[nodal[nodalI[0]+1+0]*3+2]};
6597           double cc[3]={aa[1]*bb[2]-aa[2]*bb[1],aa[2]*bb[0]-aa[0]*bb[2],aa[0]*bb[1]-aa[1]*bb[0]};
6598           for(int j=0;j<3;j++)
6599             {
6600               int nodeId(nodal[nodalI[0]+1+j]);
6601               if(nodeId>=0 && nodeId<nbOfNodes)
6602                 std::copy(coor+nodeId*3,coor+(nodeId+1)*3,matrix+4*j);
6603               else
6604                 {
6605                   std::ostringstream oss; oss << "MEDCouplingUMesh::computePlaneEquationOf3DFaces : invalid 2D cell #" << i << " ! This cell points to an invalid nodeId : " << nodeId << " !";
6606                   throw INTERP_KERNEL::Exception(oss.str());
6607                 }
6608             }
6609           if(sqrt(cc[0]*cc[0]+cc[1]*cc[1]+cc[2]*cc[2])>1e-7)
6610             {
6611               INTERP_KERNEL::inverseMatrix(matrix,4,matrix2);
6612               retPtr[0]=matrix2[3]; retPtr[1]=matrix2[7]; retPtr[2]=matrix2[11]; retPtr[3]=matrix2[15];
6613             }
6614           else
6615             {
6616               if(nodalI[1]-nodalI[0]==4)
6617                 {
6618                   std::ostringstream oss; oss << "MEDCouplingUMesh::computePlaneEquationOf3DFaces : cell" << i << " : Presence of The 3 colinear points !";
6619                   throw INTERP_KERNEL::Exception(oss.str());
6620                 }
6621               //
6622               double dd[3]={0.,0.,0.};
6623               for(int offset=nodalI[0]+1;offset<nodalI[1];offset++)
6624                 std::transform(coor+3*nodal[offset],coor+3*(nodal[offset]+1),dd,dd,std::plus<double>());
6625               int nbOfNodesInCell(nodalI[1]-nodalI[0]-1);
6626               std::transform(dd,dd+3,dd,std::bind2nd(std::multiplies<double>(),1./(double)nbOfNodesInCell));
6627               std::copy(dd,dd+3,matrix+4*2);
6628               INTERP_KERNEL::inverseMatrix(matrix,4,matrix2);
6629               retPtr[0]=matrix2[3]; retPtr[1]=matrix2[7]; retPtr[2]=matrix2[11]; retPtr[3]=matrix2[15];
6630             }
6631         }
6632       else
6633         {
6634           std::ostringstream oss; oss << "MEDCouplingUMesh::computePlaneEquationOf3DFaces : invalid 2D cell #" << i << " ! Must be constitued by more than 3 nodes !";
6635           throw INTERP_KERNEL::Exception(oss.str());
6636         }
6637     }
6638   return ret.retn();
6639 }
6640
6641 /*!
6642  * This method expects as input a DataArrayDouble non nul instance 'da' that should be allocated. If not an exception is thrown.
6643  *
6644  */
6645 MEDCouplingUMesh *MEDCouplingUMesh::Build0DMeshFromCoords(DataArrayDouble *da)
6646 {
6647   if(!da)
6648     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::Build0DMeshFromCoords : instance of DataArrayDouble must be not null !");
6649   da->checkAllocated();
6650   std::string name(da->getName());
6651   MCAuto<MEDCouplingUMesh> ret(MEDCouplingUMesh::New(name,0));
6652   if(name.empty())
6653     ret->setName("Mesh");
6654   ret->setCoords(da);
6655   int nbOfTuples(da->getNumberOfTuples());
6656   MCAuto<DataArrayInt> c(DataArrayInt::New()),cI(DataArrayInt::New());
6657   c->alloc(2*nbOfTuples,1);
6658   cI->alloc(nbOfTuples+1,1);
6659   int *cp(c->getPointer()),*cip(cI->getPointer());
6660   *cip++=0;
6661   for(int i=0;i<nbOfTuples;i++)
6662     {
6663       *cp++=INTERP_KERNEL::NORM_POINT1;
6664       *cp++=i;
6665       *cip++=2*(i+1);
6666     }
6667   ret->setConnectivity(c,cI,true);
6668   return ret.retn();
6669 }
6670
6671 MCAuto<MEDCouplingUMesh> MEDCouplingUMesh::Build1DMeshFromCoords(DataArrayDouble *da)
6672 {
6673   if(!da)
6674     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::Build01MeshFromCoords : instance of DataArrayDouble must be not null !");
6675   da->checkAllocated();
6676   std::string name(da->getName());
6677   MCAuto<MEDCouplingUMesh> ret;
6678   {
6679     MCAuto<MEDCouplingCMesh> tmp(MEDCouplingCMesh::New());
6680     MCAuto<DataArrayDouble> arr(DataArrayDouble::New());
6681     arr->alloc(da->getNumberOfTuples());
6682     tmp->setCoordsAt(0,arr);
6683     ret=tmp->buildUnstructured();
6684   }
6685   ret->setCoords(da);
6686   if(name.empty())
6687     ret->setName("Mesh");
6688   else
6689     ret->setName(name);
6690   return ret;
6691 }
6692
6693 /*!
6694  * Creates a new MEDCouplingUMesh by concatenating two given meshes of the same dimension.
6695  * Cells and nodes of
6696  * the first mesh precede cells and nodes of the second mesh within the result mesh.
6697  *  \param [in] mesh1 - the first mesh.
6698  *  \param [in] mesh2 - the second mesh.
6699  *  \return MEDCouplingUMesh * - the result mesh. It is a new instance of
6700  *          MEDCouplingUMesh. The caller is to delete this mesh using decrRef() as it
6701  *          is no more needed.
6702  *  \throw If \a mesh1 == NULL or \a mesh2 == NULL.
6703  *  \throw If the coordinates array is not set in none of the meshes.
6704  *  \throw If \a mesh1->getMeshDimension() < 0 or \a mesh2->getMeshDimension() < 0.
6705  *  \throw If \a mesh1->getMeshDimension() != \a mesh2->getMeshDimension().
6706  */
6707 MEDCouplingUMesh *MEDCouplingUMesh::MergeUMeshes(const MEDCouplingUMesh *mesh1, const MEDCouplingUMesh *mesh2)
6708 {
6709   std::vector<const MEDCouplingUMesh *> tmp(2);
6710   tmp[0]=const_cast<MEDCouplingUMesh *>(mesh1); tmp[1]=const_cast<MEDCouplingUMesh *>(mesh2);
6711   return MergeUMeshes(tmp);
6712 }
6713
6714 /*!
6715  * Creates a new MEDCouplingUMesh by concatenating all given meshes of the same dimension.
6716  * Cells and nodes of
6717  * the *i*-th mesh precede cells and nodes of the (*i*+1)-th mesh within the result mesh.
6718  *  \param [in] a - a vector of meshes (MEDCouplingUMesh) to concatenate.
6719  *  \return MEDCouplingUMesh * - the result mesh. It is a new instance of
6720  *          MEDCouplingUMesh. The caller is to delete this mesh using decrRef() as it
6721  *          is no more needed.
6722  *  \throw If \a a.size() == 0.
6723  *  \throw If \a a[ *i* ] == NULL.
6724  *  \throw If the coordinates array is not set in none of the meshes.
6725  *  \throw If \a a[ *i* ]->getMeshDimension() < 0.
6726  *  \throw If the meshes in \a a are of different dimension (getMeshDimension()).
6727  */
6728 MEDCouplingUMesh *MEDCouplingUMesh::MergeUMeshes(const std::vector<const MEDCouplingUMesh *>& a)
6729 {
6730   std::size_t sz=a.size();
6731   if(sz==0)
6732     return MergeUMeshesLL(a);
6733   for(std::size_t ii=0;ii<sz;ii++)
6734     if(!a[ii])
6735       {
6736         std::ostringstream oss; oss << "MEDCouplingUMesh::MergeUMeshes : item #" << ii << " in input array of size "<< sz << " is empty !";
6737         throw INTERP_KERNEL::Exception(oss.str());
6738       }
6739   std::vector< MCAuto<MEDCouplingUMesh> > bb(sz);
6740   std::vector< const MEDCouplingUMesh * > aa(sz);
6741   int spaceDim=-3;
6742   for(std::size_t i=0;i<sz && spaceDim==-3;i++)
6743     {
6744       const MEDCouplingUMesh *cur=a[i];
6745       const DataArrayDouble *coo=cur->getCoords();
6746       if(coo)
6747         spaceDim=coo->getNumberOfComponents();
6748     }
6749   if(spaceDim==-3)
6750     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::MergeUMeshes : no spaceDim specified ! unable to perform merge !");
6751   for(std::size_t i=0;i<sz;i++)
6752     {
6753       bb[i]=a[i]->buildSetInstanceFromThis(spaceDim);
6754       aa[i]=bb[i];
6755     }
6756   return MergeUMeshesLL(aa);
6757 }
6758
6759 /*!
6760  * Creates a new MEDCouplingUMesh by concatenating cells of two given meshes of same
6761  * dimension and sharing the node coordinates array.
6762  * All cells of the first mesh precede all cells of the second mesh
6763  * within the result mesh.
6764  *  \param [in] mesh1 - the first mesh.
6765  *  \param [in] mesh2 - the second mesh.
6766  *  \return MEDCouplingUMesh * - the result mesh. It is a new instance of
6767  *          MEDCouplingUMesh. The caller is to delete this mesh using decrRef() as it
6768  *          is no more needed.
6769  *  \throw If \a mesh1 == NULL or \a mesh2 == NULL.
6770  *  \throw If the meshes do not share the node coordinates array.
6771  *  \throw If \a mesh1->getMeshDimension() < 0 or \a mesh2->getMeshDimension() < 0.
6772  *  \throw If \a mesh1->getMeshDimension() != \a mesh2->getMeshDimension().
6773  */
6774 MEDCouplingUMesh *MEDCouplingUMesh::MergeUMeshesOnSameCoords(const MEDCouplingUMesh *mesh1, const MEDCouplingUMesh *mesh2)
6775 {
6776   std::vector<const MEDCouplingUMesh *> tmp(2);
6777   tmp[0]=mesh1; tmp[1]=mesh2;
6778   return MergeUMeshesOnSameCoords(tmp);
6779 }
6780
6781 /*!
6782  * Creates a new MEDCouplingUMesh by concatenating cells of all given meshes of same
6783  * dimension and sharing the node coordinates array.
6784  * All cells of the *i*-th mesh precede all cells of the
6785  * (*i*+1)-th mesh within the result mesh.
6786  *  \param [in] meshes - a vector of meshes (MEDCouplingUMesh) to concatenate.
6787  *  \return MEDCouplingUMesh * - the result mesh. It is a new instance of
6788  *          MEDCouplingUMesh. The caller is to delete this mesh using decrRef() as it
6789  *          is no more needed.
6790  *  \throw If \a a.size() == 0.
6791  *  \throw If \a a[ *i* ] == NULL.
6792  *  \throw If the meshes do not share the node coordinates array.
6793  *  \throw If \a a[ *i* ]->getMeshDimension() < 0.
6794  *  \throw If the meshes in \a a are of different dimension (getMeshDimension()).
6795  */
6796 MEDCouplingUMesh *MEDCouplingUMesh::MergeUMeshesOnSameCoords(const std::vector<const MEDCouplingUMesh *>& meshes)
6797 {
6798   if(meshes.empty())
6799     throw INTERP_KERNEL::Exception("meshes input parameter is expected to be non empty.");
6800   for(std::size_t ii=0;ii<meshes.size();ii++)
6801     if(!meshes[ii])
6802       {
6803         std::ostringstream oss; oss << "MEDCouplingUMesh::MergeUMeshesOnSameCoords : item #" << ii << " in input array of size "<< meshes.size() << " is empty !";
6804         throw INTERP_KERNEL::Exception(oss.str());
6805       }
6806   const DataArrayDouble *coords=meshes.front()->getCoords();
6807   int meshDim=meshes.front()->getMeshDimension();
6808   std::vector<const MEDCouplingUMesh *>::const_iterator iter=meshes.begin();
6809   int meshLgth=0;
6810   int meshIndexLgth=0;
6811   for(;iter!=meshes.end();iter++)
6812     {
6813       if(coords!=(*iter)->getCoords())
6814         throw INTERP_KERNEL::Exception("meshes does not share the same coords ! Try using tryToShareSameCoords method !");
6815       if(meshDim!=(*iter)->getMeshDimension())
6816         throw INTERP_KERNEL::Exception("Mesh dimensions mismatches, FuseUMeshesOnSameCoords impossible !");
6817       meshLgth+=(*iter)->getNodalConnectivityArrayLen();
6818       meshIndexLgth+=(*iter)->getNumberOfCells();
6819     }
6820   MCAuto<DataArrayInt> nodal=DataArrayInt::New();
6821   nodal->alloc(meshLgth,1);
6822   int *nodalPtr=nodal->getPointer();
6823   MCAuto<DataArrayInt> nodalIndex=DataArrayInt::New();
6824   nodalIndex->alloc(meshIndexLgth+1,1);
6825   int *nodalIndexPtr=nodalIndex->getPointer();
6826   int offset=0;
6827   for(iter=meshes.begin();iter!=meshes.end();iter++)
6828     {
6829       const int *nod=(*iter)->getNodalConnectivity()->begin();
6830       const int *index=(*iter)->getNodalConnectivityIndex()->begin();
6831       int nbOfCells=(*iter)->getNumberOfCells();
6832       int meshLgth2=(*iter)->getNodalConnectivityArrayLen();
6833       nodalPtr=std::copy(nod,nod+meshLgth2,nodalPtr);
6834       if(iter!=meshes.begin())
6835         nodalIndexPtr=std::transform(index+1,index+nbOfCells+1,nodalIndexPtr,std::bind2nd(std::plus<int>(),offset));
6836       else
6837         nodalIndexPtr=std::copy(index,index+nbOfCells+1,nodalIndexPtr);
6838       offset+=meshLgth2;
6839     }
6840   MEDCouplingUMesh *ret=MEDCouplingUMesh::New();
6841   ret->setName("merge");
6842   ret->setMeshDimension(meshDim);
6843   ret->setConnectivity(nodal,nodalIndex,true);
6844   ret->setCoords(coords);
6845   return ret;
6846 }
6847
6848 /*!
6849  * Creates a new MEDCouplingUMesh by concatenating cells of all given meshes of same
6850  * dimension and sharing the node coordinates array. Cells of the *i*-th mesh precede
6851  * cells of the (*i*+1)-th mesh within the result mesh. Duplicates of cells are
6852  * removed from \a this mesh and arrays mapping between new and old cell ids in "Old to
6853  * New" mode are returned for each input mesh.
6854  *  \param [in] meshes - a vector of meshes (MEDCouplingUMesh) to concatenate.
6855  *  \param [in] compType - specifies a cell comparison technique. For meaning of its
6856  *          valid values [0,1,2], see zipConnectivityTraducer().
6857  *  \param [in,out] corr - an array of DataArrayInt, of the same size as \a
6858  *          meshes. The *i*-th array describes cell ids mapping for \a meshes[ *i* ]
6859  *          mesh. The caller is to delete each of the arrays using decrRef() as it is
6860  *          no more needed.
6861  *  \return MEDCouplingUMesh * - the result mesh. It is a new instance of
6862  *          MEDCouplingUMesh. The caller is to delete this mesh using decrRef() as it
6863  *          is no more needed.
6864  *  \throw If \a meshes.size() == 0.
6865  *  \throw If \a meshes[ *i* ] == NULL.
6866  *  \throw If the meshes do not share the node coordinates array.
6867  *  \throw If \a meshes[ *i* ]->getMeshDimension() < 0.
6868  *  \throw If the \a meshes are of different dimension (getMeshDimension()).
6869  *  \throw If the nodal connectivity of cells of any of \a meshes is not defined.
6870  *  \throw If the nodal connectivity any of \a meshes includes an invalid id.
6871  */
6872 MEDCouplingUMesh *MEDCouplingUMesh::FuseUMeshesOnSameCoords(const std::vector<const MEDCouplingUMesh *>& meshes, int compType, std::vector<DataArrayInt *>& corr)
6873 {
6874   //All checks are delegated to MergeUMeshesOnSameCoords
6875   MCAuto<MEDCouplingUMesh> ret=MergeUMeshesOnSameCoords(meshes);
6876   MCAuto<DataArrayInt> o2n=ret->zipConnectivityTraducer(compType);
6877   corr.resize(meshes.size());
6878   std::size_t nbOfMeshes=meshes.size();
6879   int offset=0;
6880   const int *o2nPtr=o2n->begin();
6881   for(std::size_t i=0;i<nbOfMeshes;i++)
6882     {
6883       DataArrayInt *tmp=DataArrayInt::New();
6884       int curNbOfCells=meshes[i]->getNumberOfCells();
6885       tmp->alloc(curNbOfCells,1);
6886       std::copy(o2nPtr+offset,o2nPtr+offset+curNbOfCells,tmp->getPointer());
6887       offset+=curNbOfCells;
6888       tmp->setName(meshes[i]->getName());
6889       corr[i]=tmp;
6890     }
6891   return ret.retn();
6892 }
6893
6894 /*!
6895  * Makes all given meshes share the nodal connectivity array. The common connectivity
6896  * array is created by concatenating the connectivity arrays of all given meshes. All
6897  * the given meshes must be of the same space dimension but dimension of cells **can
6898  * differ**. This method is particularly useful in MEDLoader context to build a \ref
6899  * MEDCoupling::MEDFileUMesh "MEDFileUMesh" instance that expects that underlying
6900  * MEDCouplingUMesh'es of different dimension share the same nodal connectivity array.
6901  *  \param [in,out] meshes - a vector of meshes to update.
6902  *  \throw If any of \a meshes is NULL.
6903  *  \throw If the coordinates array is not set in any of \a meshes.
6904  *  \throw If the nodal connectivity of cells is not defined in any of \a meshes.
6905  *  \throw If \a meshes are of different space dimension.
6906  */
6907 void MEDCouplingUMesh::PutUMeshesOnSameAggregatedCoords(const std::vector<MEDCouplingUMesh *>& meshes)
6908 {
6909   std::size_t sz=meshes.size();
6910   if(sz==0 || sz==1)
6911     return;
6912   std::vector< const DataArrayDouble * > coords(meshes.size());
6913   std::vector< const DataArrayDouble * >::iterator it2=coords.begin();
6914   for(std::vector<MEDCouplingUMesh *>::const_iterator it=meshes.begin();it!=meshes.end();it++,it2++)
6915     {
6916       if((*it))
6917         {
6918           (*it)->checkConnectivityFullyDefined();
6919           const DataArrayDouble *coo=(*it)->getCoords();
6920           if(coo)
6921             *it2=coo;
6922           else
6923             {
6924               std::ostringstream oss; oss << " MEDCouplingUMesh::PutUMeshesOnSameAggregatedCoords : Item #" << std::distance(meshes.begin(),it) << " inside the vector of length " << meshes.size();
6925               oss << " has no coordinate array defined !";
6926               throw INTERP_KERNEL::Exception(oss.str());
6927             }
6928         }
6929       else
6930         {
6931           std::ostringstream oss; oss << " MEDCouplingUMesh::PutUMeshesOnSameAggregatedCoords : Item #" << std::distance(meshes.begin(),it) << " inside the vector of length " << meshes.size();
6932           oss << " is null !";
6933           throw INTERP_KERNEL::Exception(oss.str());
6934         }
6935     }
6936   MCAuto<DataArrayDouble> res=DataArrayDouble::Aggregate(coords);
6937   std::vector<MEDCouplingUMesh *>::const_iterator it=meshes.begin();
6938   int offset=(*it)->getNumberOfNodes();
6939   (*it++)->setCoords(res);
6940   for(;it!=meshes.end();it++)
6941     {
6942       int oldNumberOfNodes=(*it)->getNumberOfNodes();
6943       (*it)->setCoords(res);
6944       (*it)->shiftNodeNumbersInConn(offset);
6945       offset+=oldNumberOfNodes;
6946     }
6947 }
6948
6949 /*!
6950  * Merges nodes coincident with a given precision within all given meshes that share
6951  * the nodal connectivity array. The given meshes **can be of different** mesh
6952  * dimension. This method is particularly useful in MEDLoader context to build a \ref
6953  * MEDCoupling::MEDFileUMesh "MEDFileUMesh" instance that expects that underlying
6954  * MEDCouplingUMesh'es of different dimension share the same nodal connectivity array.
6955  *  \param [in,out] meshes - a vector of meshes to update.
6956  *  \param [in] eps - the precision used to detect coincident nodes (infinite norm).
6957  *  \throw If any of \a meshes is NULL.
6958  *  \throw If the \a meshes do not share the same node coordinates array.
6959  *  \throw If the nodal connectivity of cells is not defined in any of \a meshes.
6960  */
6961 void MEDCouplingUMesh::MergeNodesOnUMeshesSharingSameCoords(const std::vector<MEDCouplingUMesh *>& meshes, double eps)
6962 {
6963   if(meshes.empty())
6964     return ;
6965   std::set<const DataArrayDouble *> s;
6966   for(std::vector<MEDCouplingUMesh *>::const_iterator it=meshes.begin();it!=meshes.end();it++)
6967     {
6968       if(*it)
6969         s.insert((*it)->getCoords());
6970       else
6971         {
6972           std::ostringstream oss; oss << "MEDCouplingUMesh::MergeNodesOnUMeshesSharingSameCoords : In input vector of unstructured meshes of size " << meshes.size() << " the element #" << std::distance(meshes.begin(),it) << " is null !";
6973           throw INTERP_KERNEL::Exception(oss.str());
6974         }
6975     }
6976   if(s.size()!=1)
6977     {
6978       std::ostringstream oss; oss << "MEDCouplingUMesh::MergeNodesOnUMeshesSharingSameCoords : In input vector of unstructured meshes of size " << meshes.size() << ", it appears that they do not share the same instance of DataArrayDouble for coordiantes ! tryToShareSameCoordsPermute method can help to reach that !";
6979       throw INTERP_KERNEL::Exception(oss.str());
6980     }
6981   const DataArrayDouble *coo=*(s.begin());
6982   if(!coo)
6983     return;
6984   //
6985   DataArrayInt *comm,*commI;
6986   coo->findCommonTuples(eps,-1,comm,commI);
6987   MCAuto<DataArrayInt> tmp1(comm),tmp2(commI);
6988   int oldNbOfNodes=coo->getNumberOfTuples();
6989   int newNbOfNodes;
6990   MCAuto<DataArrayInt> o2n=DataArrayInt::ConvertIndexArrayToO2N(oldNbOfNodes,comm->begin(),commI->begin(),commI->end(),newNbOfNodes);
6991   if(oldNbOfNodes==newNbOfNodes)
6992     return ;
6993   MCAuto<DataArrayDouble> newCoords=coo->renumberAndReduce(o2n->begin(),newNbOfNodes);
6994   for(std::vector<MEDCouplingUMesh *>::const_iterator it=meshes.begin();it!=meshes.end();it++)
6995     {
6996       (*it)->renumberNodesInConn(o2n->begin());
6997       (*it)->setCoords(newCoords);
6998     }
6999 }
7000
7001
7002 /*!
7003  * This static operates only for coords in 3D. The polygon is specified by its connectivity nodes in [ \a begin , \a end ).
7004  */
7005 bool MEDCouplingUMesh::IsPolygonWellOriented(bool isQuadratic, const double *vec, const int *begin, const int *end, const double *coords)
7006 {
7007   std::size_t i, ip1;
7008   double v[3]={0.,0.,0.};
7009   std::size_t sz=std::distance(begin,end);
7010   if(!isQuadratic)
7011     for(i=0;i<sz;i++)
7012       {
7013         // Algorithm: sum in v the cross products of (e1, e2) where e_i it the vector between (0,0,0) and point i
7014         // and e2 is linear point directly following e1 in the connectivity. All points are used.
7015         v[0]+=coords[3*begin[i]+1]*coords[3*begin[(i+1)%sz]+2]-coords[3*begin[i]+2]*coords[3*begin[(i+1)%sz]+1];
7016         v[1]+=coords[3*begin[i]+2]*coords[3*begin[(i+1)%sz]]-coords[3*begin[i]]*coords[3*begin[(i+1)%sz]+2];
7017         v[2]+=coords[3*begin[i]]*coords[3*begin[(i+1)%sz]+1]-coords[3*begin[i]+1]*coords[3*begin[(i+1)%sz]];
7018       }
7019   else
7020     {
7021       // Same algorithm as above but also using intermediate quadratic points.
7022       // (taking only linear points might lead to issues if the linearized version of the
7023       // polygon is not convex or self-intersecting ... see testCellOrientation4)
7024       int hsz = sz/2;
7025       for(std::size_t j=0;j<sz;j++)
7026         {
7027           if (j%2)  // current point i is quadratic, next point i+1 is standard
7028             {
7029               i = hsz+(j-1)/2;
7030               ip1 = ((j-1)/2 + 1)%hsz; // ip1 means "i+1", i.e. next point
7031             }
7032           else      // current point i is standard, next point i+1 is quadratic
7033             {
7034               i = j/2;
7035               ip1 = j/2+hsz;
7036             }
7037           v[0]+=coords[3*begin[i]+1]*coords[3*begin[ip1]+2]-coords[3*begin[i]+2]*coords[3*begin[ip1]+1];
7038           v[1]+=coords[3*begin[i]+2]*coords[3*begin[ip1]]-coords[3*begin[i]]*coords[3*begin[ip1]+2];
7039           v[2]+=coords[3*begin[i]]*coords[3*begin[ip1]+1]-coords[3*begin[i]+1]*coords[3*begin[ip1]];
7040         }
7041     }
7042   double ret = vec[0]*v[0]+vec[1]*v[1]+vec[2]*v[2];
7043   return (ret>0.);
7044 }
7045
7046 /*!
7047  * The polyhedron is specified by its connectivity nodes in [ \a begin , \a end ).
7048  */
7049 bool MEDCouplingUMesh::IsPolyhedronWellOriented(const int *begin, const int *end, const double *coords)
7050 {
7051   std::vector<std::pair<int,int> > edges;
7052   std::size_t nbOfFaces=std::count(begin,end,-1)+1;
7053   const int *bgFace=begin;
7054   for(std::size_t i=0;i<nbOfFaces;i++)
7055     {
7056       const int *endFace=std::find(bgFace+1,end,-1);
7057       std::size_t nbOfEdgesInFace=std::distance(bgFace,endFace);
7058       for(std::size_t j=0;j<nbOfEdgesInFace;j++)
7059         {
7060           std::pair<int,int> p1(bgFace[j],bgFace[(j+1)%nbOfEdgesInFace]);
7061           if(std::find(edges.begin(),edges.end(),p1)!=edges.end())
7062             return false;
7063           edges.push_back(p1);
7064         }
7065       bgFace=endFace+1;
7066     }
7067   return INTERP_KERNEL::calculateVolumeForPolyh2<int,INTERP_KERNEL::ALL_C_MODE>(begin,(int)std::distance(begin,end),coords)>-EPS_FOR_POLYH_ORIENTATION;
7068 }
7069
7070 /*!
7071  * The 3D extruded static cell (PENTA6,HEXA8,HEXAGP12...) its connectivity nodes in [ \a begin , \a end ).
7072  */
7073 bool MEDCouplingUMesh::Is3DExtrudedStaticCellWellOriented(const int *begin, const int *end, const double *coords)
7074 {
7075   double vec0[3],vec1[3];
7076   std::size_t sz=std::distance(begin,end);
7077   if(sz%2!=0)
7078     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::Is3DExtrudedStaticCellWellOriented : the length of nodal connectivity of extruded cell is not even !");
7079   int nbOfNodes=(int)sz/2;
7080   INTERP_KERNEL::areaVectorOfPolygon<int,INTERP_KERNEL::ALL_C_MODE>(begin,nbOfNodes,coords,vec0);
7081   const double *pt0=coords+3*begin[0];
7082   const double *pt1=coords+3*begin[nbOfNodes];
7083   vec1[0]=pt1[0]-pt0[0]; vec1[1]=pt1[1]-pt0[1]; vec1[2]=pt1[2]-pt0[2];
7084   return (vec0[0]*vec1[0]+vec0[1]*vec1[1]+vec0[2]*vec1[2])<0.;
7085 }
7086
7087 void MEDCouplingUMesh::CorrectExtrudedStaticCell(int *begin, int *end)
7088 {
7089   std::size_t sz=std::distance(begin,end);
7090   INTERP_KERNEL::AutoPtr<int> tmp=new int[sz];
7091   std::size_t nbOfNodes(sz/2);
7092   std::copy(begin,end,(int *)tmp);
7093   for(std::size_t j=1;j<nbOfNodes;j++)
7094     {
7095       begin[j]=tmp[nbOfNodes-j];
7096       begin[j+nbOfNodes]=tmp[nbOfNodes+nbOfNodes-j];
7097     }
7098 }
7099
7100 bool MEDCouplingUMesh::IsTetra4WellOriented(const int *begin, const int *end, const double *coords)
7101 {
7102   std::size_t sz=std::distance(begin,end);
7103   if(sz!=4)
7104     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::IsTetra4WellOriented : Tetra4 cell with not 4 nodes ! Call checkConsistency !");
7105   double vec0[3],vec1[3];
7106   const double *pt0=coords+3*begin[0],*pt1=coords+3*begin[1],*pt2=coords+3*begin[2],*pt3=coords+3*begin[3];
7107   vec0[0]=pt1[0]-pt0[0]; vec0[1]=pt1[1]-pt0[1]; vec0[2]=pt1[2]-pt0[2]; vec1[0]=pt2[0]-pt0[0]; vec1[1]=pt2[1]-pt0[1]; vec1[2]=pt2[2]-pt0[2];
7108   return ((vec0[1]*vec1[2]-vec0[2]*vec1[1])*(pt3[0]-pt0[0])+(vec0[2]*vec1[0]-vec0[0]*vec1[2])*(pt3[1]-pt0[1])+(vec0[0]*vec1[1]-vec0[1]*vec1[0])*(pt3[2]-pt0[2]))<0;
7109 }
7110
7111 bool MEDCouplingUMesh::IsPyra5WellOriented(const int *begin, const int *end, const double *coords)
7112 {
7113   std::size_t sz=std::distance(begin,end);
7114   if(sz!=5)
7115     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::IsPyra5WellOriented : Pyra5 cell with not 5 nodes ! Call checkConsistency !");
7116   double vec0[3];
7117   INTERP_KERNEL::areaVectorOfPolygon<int,INTERP_KERNEL::ALL_C_MODE>(begin,4,coords,vec0);
7118   const double *pt0=coords+3*begin[0],*pt1=coords+3*begin[4];
7119   return (vec0[0]*(pt1[0]-pt0[0])+vec0[1]*(pt1[1]-pt0[1])+vec0[2]*(pt1[2]-pt0[2]))<0.;
7120 }
7121
7122 /*!
7123  * This method performs a simplyfication of a single polyedron cell. To do that each face of cell whose connectivity is defined by [ \b begin , \b end )
7124  * is compared with the others in order to find faces in the same plane (with approx of eps). If any, the cells are grouped together and projected to
7125  * a 2D space.
7126  *
7127  * \param [in] eps is a relative precision that allows to establish if some 3D plane are coplanar or not.
7128  * \param [in] coords the coordinates with nb of components exactly equal to 3
7129  * \param [in] begin begin of the nodal connectivity (geometric type included) of a single polyhedron cell
7130  * \param [in] end end of nodal connectivity of a single polyhedron cell (excluded)
7131  * \param [out] res the result is put at the end of the vector without any alteration of the data.
7132  */
7133 void MEDCouplingUMesh::SimplifyPolyhedronCell(double eps, const DataArrayDouble *coords, int index, DataArrayInt *res, MEDCouplingUMesh *faces,
7134                                               DataArrayInt *E_Fi, DataArrayInt *E_F, DataArrayInt *F_Ei, DataArrayInt *F_E)
7135 {
7136   int nbFaces = E_Fi->getIJ(index + 1, 0) - E_Fi->getIJ(index, 0);
7137   MCAuto<DataArrayDouble> v=DataArrayDouble::New(); v->alloc(nbFaces,3);
7138   double *vPtr=v->getPointer();
7139   MCAuto<DataArrayDouble> p=DataArrayDouble::New(); p->alloc(nbFaces,2);
7140   double *pPtr=p->getPointer();
7141   int *e_fi = E_Fi->getPointer(), *e_f = E_F->getPointer(), *f_ei = F_Ei->getPointer(), *f_e = F_E->getPointer();
7142   const int *f_idx = faces->getNodalConnectivityIndex()->getPointer(), *f_cnn = faces->getNodalConnectivity()->getPointer();
7143   for(int i=0;i<nbFaces;i++,vPtr+=3,pPtr++)
7144     {
7145       int face = e_f[e_fi[index] + i];
7146       ComputeVecAndPtOfFace(eps, coords->begin(), f_cnn + f_idx[face] + 1, f_cnn + f_idx[face + 1], vPtr, pPtr);
7147       // to differentiate faces going to different cells:
7148       pPtr++, *pPtr = 0;
7149       for (int j = f_ei[face]; j < f_ei[face + 1]; j++)
7150         *pPtr += f_e[j];
7151     }
7152   pPtr=p->getPointer(); vPtr=v->getPointer();
7153   DataArrayInt *comm1=0,*commI1=0;
7154   v->findCommonTuples(eps,-1,comm1,commI1);
7155   for (int i = 0; i < nbFaces; i++)
7156     if (comm1->findIdFirstEqual(i) < 0)
7157       {
7158         comm1->pushBackSilent(i);
7159         commI1->pushBackSilent(comm1->getNumberOfTuples());
7160       }
7161   MCAuto<DataArrayInt> comm1Auto(comm1),commI1Auto(commI1);
7162   const int *comm1Ptr=comm1->begin();
7163   const int *commI1Ptr=commI1->begin();
7164   int nbOfGrps1=commI1Auto->getNumberOfTuples()-1;
7165   res->pushBackSilent((int)INTERP_KERNEL::NORM_POLYHED);
7166   //
7167   for(int i=0;i<nbOfGrps1;i++)
7168     {
7169       int vecId=comm1Ptr[commI1Ptr[i]];
7170       MCAuto<DataArrayDouble> tmpgrp2=p->selectByTupleId(comm1Ptr+commI1Ptr[i],comm1Ptr+commI1Ptr[i+1]);
7171       DataArrayInt *comm2=0,*commI2=0;
7172       tmpgrp2->findCommonTuples(eps,-1,comm2,commI2);
7173       for (int j = 0; j < commI1Ptr[i+1] - commI1Ptr[i]; j++)
7174         if (comm2->findIdFirstEqual(j) < 0)
7175           {
7176             comm2->pushBackSilent(j);
7177             commI2->pushBackSilent(comm2->getNumberOfTuples());
7178           }
7179       MCAuto<DataArrayInt> comm2Auto(comm2),commI2Auto(commI2);
7180       const int *comm2Ptr=comm2->begin();
7181       const int *commI2Ptr=commI2->begin();
7182       int nbOfGrps2=commI2Auto->getNumberOfTuples()-1;
7183       for(int j=0;j<nbOfGrps2;j++)
7184         {
7185           if(commI2Ptr[j+1] == commI2Ptr[j] + 1)
7186             {
7187               int face = e_f[e_fi[index] + comm1Ptr[commI1Ptr[i] + comm2Ptr[commI2Ptr[j]]]]; //hmmm
7188               res->insertAtTheEnd(f_cnn + f_idx[face] + 1, f_cnn + f_idx[face + 1]);
7189               res->pushBackSilent(-1);
7190             }
7191           else
7192             {
7193               int pointId=comm1Ptr[commI1Ptr[i]+comm2Ptr[commI2Ptr[j]]];
7194               MCAuto<DataArrayInt> ids2=comm2->selectByTupleIdSafeSlice(commI2Ptr[j],commI2Ptr[j+1],1);
7195               ids2->transformWithIndArr(comm1Ptr+commI1Ptr[i],comm1Ptr+commI1Ptr[i+1]);
7196               ids2->transformWithIndArr(e_f + e_fi[index], e_f + e_fi[index + 1]);
7197               MCAuto<MEDCouplingUMesh> mm3=static_cast<MEDCouplingUMesh *>(faces->buildPartOfMySelf(ids2->begin(),ids2->end(),true));
7198               MCAuto<DataArrayInt> idsNodeTmp=mm3->zipCoordsTraducer();
7199               MCAuto<DataArrayInt> idsNode=idsNodeTmp->invertArrayO2N2N2O(mm3->getNumberOfNodes());
7200               const int *idsNodePtr=idsNode->begin();
7201               double center[3]; center[0]=pPtr[2*pointId]*vPtr[3*vecId]; center[1]=pPtr[2*pointId]*vPtr[3*vecId+1]; center[2]=pPtr[2*pointId]*vPtr[3*vecId+2];
7202               double vec[3]; vec[0]=vPtr[3*vecId+1]; vec[1]=-vPtr[3*vecId]; vec[2]=0.;
7203               double norm=vec[0]*vec[0]+vec[1]*vec[1]+vec[2]*vec[2];
7204               if(std::abs(norm)>eps)
7205                 {
7206                   double angle=INTERP_KERNEL::EdgeArcCircle::SafeAsin(norm);
7207                   mm3->rotate(center,vec,angle);
7208                 }
7209               mm3->changeSpaceDimension(2);
7210               MCAuto<MEDCouplingUMesh> mm4=mm3->buildSpreadZonesWithPoly();
7211               const int *conn4=mm4->getNodalConnectivity()->begin();
7212               const int *connI4=mm4->getNodalConnectivityIndex()->begin();
7213               int nbOfCells=mm4->getNumberOfCells();
7214               for(int k=0;k<nbOfCells;k++)
7215                 {
7216                   int l=0;
7217                   for(const int *work=conn4+connI4[k]+1;work!=conn4+connI4[k+1];work++,l++)
7218                     res->pushBackSilent(idsNodePtr[*work]);
7219                   res->pushBackSilent(-1);
7220                 }
7221             }
7222         }
7223     }
7224   res->popBackSilent();
7225 }
7226
7227 /*!
7228  * This method computes the normalized vector of the plane and the pos of the point belonging to the plane and the line defined by the vector going
7229  * through origin. The plane is defined by its nodal connectivity [ \b begin, \b end ).
7230  *
7231  * \param [in] eps below that value the dot product of 2 vectors is considered as colinears
7232  * \param [in] coords coordinates expected to have 3 components.
7233  * \param [in] begin start of the nodal connectivity of the face.
7234  * \param [in] end end of the nodal connectivity (excluded) of the face.
7235  * \param [out] v the normalized vector of size 3
7236  * \param [out] p the pos of plane
7237  */
7238 void MEDCouplingUMesh::ComputeVecAndPtOfFace(double eps, const double *coords, const int *begin, const int *end, double *v, double *p)
7239 {
7240   std::size_t nbPoints=std::distance(begin,end);
7241   if(nbPoints<3)
7242     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ComputeVecAndPtOfFace : < of 3 points in face ! not able to find a plane on that face !");
7243   double vec[3]={0.,0.,0.};
7244   std::size_t j=0;
7245   bool refFound=false;
7246   for(;j<nbPoints-1 && !refFound;j++)
7247     {
7248       vec[0]=coords[3*begin[j+1]]-coords[3*begin[j]];
7249       vec[1]=coords[3*begin[j+1]+1]-coords[3*begin[j]+1];
7250       vec[2]=coords[3*begin[j+1]+2]-coords[3*begin[j]+2];
7251       double norm=sqrt(vec[0]*vec[0]+vec[1]*vec[1]+vec[2]*vec[2]);
7252       if(norm>eps)
7253         {
7254           refFound=true;
7255           vec[0]/=norm; vec[1]/=norm; vec[2]/=norm;
7256         }
7257     }
7258   for(std::size_t i=j;i<nbPoints-1;i++)
7259     {
7260       double curVec[3];
7261       curVec[0]=coords[3*begin[i+1]]-coords[3*begin[i]];
7262       curVec[1]=coords[3*begin[i+1]+1]-coords[3*begin[i]+1];
7263       curVec[2]=coords[3*begin[i+1]+2]-coords[3*begin[i]+2];
7264       double norm=sqrt(curVec[0]*curVec[0]+curVec[1]*curVec[1]+curVec[2]*curVec[2]);
7265       if(norm<eps)
7266         continue;
7267       curVec[0]/=norm; curVec[1]/=norm; curVec[2]/=norm;
7268       v[0]=vec[1]*curVec[2]-vec[2]*curVec[1]; v[1]=vec[2]*curVec[0]-vec[0]*curVec[2]; v[2]=vec[0]*curVec[1]-vec[1]*curVec[0];
7269       norm=sqrt(v[0]*v[0]+v[1]*v[1]+v[2]*v[2]);
7270       if(norm>eps)
7271         {
7272           v[0]/=norm; v[1]/=norm; v[2]/=norm;
7273           *p=v[0]*coords[3*begin[i]]+v[1]*coords[3*begin[i]+1]+v[2]*coords[3*begin[i]+2];
7274           return ;
7275         }
7276     }
7277   throw INTERP_KERNEL::Exception("Not able to find a normal vector of that 3D face !");
7278 }
7279
7280 /*!
7281  * This method tries to obtain a well oriented polyhedron.
7282  * If the algorithm fails, an exception will be thrown.
7283  */
7284 void MEDCouplingUMesh::TryToCorrectPolyhedronOrientation(int *begin, int *end, const double *coords)
7285 {
7286   std::list< std::pair<int,int> > edgesOK,edgesFinished;
7287   std::size_t nbOfFaces=std::count(begin,end,-1)+1;
7288   std::vector<bool> isPerm(nbOfFaces,false);//field on faces False: I don't know, True : oriented
7289   isPerm[0]=true;
7290   int *bgFace=begin,*endFace=std::find(begin+1,end,-1);
7291   std::size_t nbOfEdgesInFace=std::distance(bgFace,endFace);
7292   for(std::size_t l=0;l<nbOfEdgesInFace;l++) { std::pair<int,int> p1(bgFace[l],bgFace[(l+1)%nbOfEdgesInFace]); edgesOK.push_back(p1); }
7293   //
7294   while(std::find(isPerm.begin(),isPerm.end(),false)!=isPerm.end())
7295     {
7296       bgFace=begin;
7297       std::size_t smthChanged=0;
7298       for(std::size_t i=0;i<nbOfFaces;i++)
7299         {
7300           endFace=std::find(bgFace+1,end,-1);
7301           nbOfEdgesInFace=std::distance(bgFace,endFace);
7302           if(!isPerm[i])
7303             {
7304               bool b;
7305               for(std::size_t j=0;j<nbOfEdgesInFace;j++)
7306                 {
7307                   std::pair<int,int> p1(bgFace[j],bgFace[(j+1)%nbOfEdgesInFace]);
7308                   std::pair<int,int> p2(p1.second,p1.first);
7309                   bool b1=std::find(edgesOK.begin(),edgesOK.end(),p1)!=edgesOK.end();
7310                   bool b2=std::find(edgesOK.begin(),edgesOK.end(),p2)!=edgesOK.end();
7311                   if(b1 || b2) { b=b2; isPerm[i]=true; smthChanged++; break; }
7312                 }
7313               if(isPerm[i])
7314                 {
7315                   if(!b)
7316                     std::reverse(bgFace+1,endFace);
7317                   for(std::size_t j=0;j<nbOfEdgesInFace;j++)
7318                     {
7319                       std::pair<int,int> p1(bgFace[j],bgFace[(j+1)%nbOfEdgesInFace]);
7320                       std::pair<int,int> p2(p1.second,p1.first);
7321                       if(std::find(edgesOK.begin(),edgesOK.end(),p1)!=edgesOK.end())
7322                         { std::ostringstream oss; oss << "Face #" << j << " of polyhedron looks bad !"; throw INTERP_KERNEL::Exception(oss.str()); }
7323                       if(std::find(edgesFinished.begin(),edgesFinished.end(),p1)!=edgesFinished.end() || std::find(edgesFinished.begin(),edgesFinished.end(),p2)!=edgesFinished.end())
7324                         { std::ostringstream oss; oss << "Face #" << j << " of polyhedron looks bad !"; throw INTERP_KERNEL::Exception(oss.str()); }
7325                       std::list< std::pair<int,int> >::iterator it=std::find(edgesOK.begin(),edgesOK.end(),p2);
7326                       if(it!=edgesOK.end())
7327                         {
7328                           edgesOK.erase(it);
7329                           edgesFinished.push_back(p1);
7330                         }
7331                       else
7332                         edgesOK.push_back(p1);
7333                     }
7334                 }
7335             }
7336           bgFace=endFace+1;
7337         }
7338       if(smthChanged==0)
7339         { throw INTERP_KERNEL::Exception("The polyhedron looks too bad to be repaired !"); }
7340     }
7341   if(!edgesOK.empty())
7342     { throw INTERP_KERNEL::Exception("The polyhedron looks too bad to be repaired : Some edges are shared only once !"); }
7343   if(INTERP_KERNEL::calculateVolumeForPolyh2<int,INTERP_KERNEL::ALL_C_MODE>(begin,(int)std::distance(begin,end),coords)<-EPS_FOR_POLYH_ORIENTATION)
7344     {//not lucky ! The first face was not correctly oriented : reorient all faces...
7345       bgFace=begin;
7346       for(std::size_t i=0;i<nbOfFaces;i++)
7347         {
7348           endFace=std::find(bgFace+1,end,-1);
7349           std::reverse(bgFace+1,endFace);
7350           bgFace=endFace+1;
7351         }
7352     }
7353 }
7354
7355
7356 /*!
7357  * This method makes the assumption spacedimension == meshdimension == 2.
7358  * This method works only for linear cells.
7359  *
7360  * \return a newly allocated array containing the connectivity of a polygon type enum included (NORM_POLYGON in pos#0)
7361  */
7362 DataArrayInt *MEDCouplingUMesh::buildUnionOf2DMesh() const
7363 {
7364   if(getMeshDimension()!=2 || getSpaceDimension()!=2)
7365     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildUnionOf2DMesh : meshdimension, spacedimension must be equal to 2 !");
7366   MCAuto<MEDCouplingUMesh> skin(computeSkin());
7367   int oldNbOfNodes(skin->getNumberOfNodes());
7368   MCAuto<DataArrayInt> o2n(skin->zipCoordsTraducer());
7369   int nbOfNodesExpected(skin->getNumberOfNodes());
7370   MCAuto<DataArrayInt> n2o(o2n->invertArrayO2N2N2O(oldNbOfNodes));
7371   int nbCells(skin->getNumberOfCells());
7372   if(nbCells==nbOfNodesExpected)
7373     return buildUnionOf2DMeshLinear(skin,n2o);
7374   else if(2*nbCells==nbOfNodesExpected)
7375     return buildUnionOf2DMeshQuadratic(skin,n2o);
7376   else
7377     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildUnionOf2DMesh : the mesh 2D in input appears to be not in a single part of a 2D mesh !");
7378 }
7379
7380 /*!
7381  * This method makes the assumption spacedimension == meshdimension == 3.
7382  * This method works only for linear cells.
7383  *
7384  * \return a newly allocated array containing the connectivity of a polygon type enum included (NORM_POLYHED in pos#0)
7385  */
7386 DataArrayInt *MEDCouplingUMesh::buildUnionOf3DMesh() const
7387 {
7388   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
7389     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildUnionOf3DMesh : meshdimension, spacedimension must be equal to 2 !");
7390   MCAuto<MEDCouplingUMesh> m=computeSkin();
7391   const int *conn=m->getNodalConnectivity()->begin();
7392   const int *connI=m->getNodalConnectivityIndex()->begin();
7393   int nbOfCells=m->getNumberOfCells();
7394   MCAuto<DataArrayInt> ret=DataArrayInt::New(); ret->alloc(m->getNodalConnectivity()->getNumberOfTuples(),1);
7395   int *work=ret->getPointer();  *work++=INTERP_KERNEL::NORM_POLYHED;
7396   if(nbOfCells<1)
7397     return ret.retn();
7398   work=std::copy(conn+connI[0]+1,conn+connI[1],work);
7399   for(int i=1;i<nbOfCells;i++)
7400     {
7401       *work++=-1;
7402       work=std::copy(conn+connI[i]+1,conn+connI[i+1],work);
7403     }
7404   return ret.retn();
7405 }
7406
7407 /*!
7408  * \brief Creates a graph of cell neighbors
7409  *  \return MEDCouplingSkyLineArray * - an sky line array the user should delete.
7410  *  In the sky line array, graph arcs are stored in terms of (index,value) notation.
7411  *  For example
7412  *  - index:  0 3 5 6 6
7413  *  - value:  1 2 3 2 3 3
7414  *  means 6 arcs (0,1), (0,2), (0,3), (1,2), (1,3), (2,3)
7415  *  Arcs are not doubled but reflexive (1,1) arcs are present for each cell
7416  */
7417 MEDCouplingSkyLineArray* MEDCouplingUMesh::generateGraph() const
7418 {
7419   checkConnectivityFullyDefined();
7420
7421   int meshDim = this->getMeshDimension();
7422   MEDCoupling::DataArrayInt* indexr=MEDCoupling::DataArrayInt::New();
7423   MEDCoupling::DataArrayInt* revConn=MEDCoupling::DataArrayInt::New();
7424   this->getReverseNodalConnectivity(revConn,indexr);
7425   const int* indexr_ptr=indexr->begin();
7426   const int* revConn_ptr=revConn->begin();
7427
7428   const MEDCoupling::DataArrayInt* index;
7429   const MEDCoupling::DataArrayInt* conn;
7430   conn=this->getNodalConnectivity(); // it includes a type as the 1st element!!!
7431   index=this->getNodalConnectivityIndex();
7432   int nbCells=this->getNumberOfCells();
7433   const int* index_ptr=index->begin();
7434   const int* conn_ptr=conn->begin();
7435
7436   //creating graph arcs (cell to cell relations)
7437   //arcs are stored in terms of (index,value) notation
7438   // 0 3 5 6 6
7439   // 1 2 3 2 3 3
7440   // means 6 arcs (0,1), (0,2), (0,3), (1,2), (1,3), (2,3)
7441   // in present version arcs are not doubled but reflexive (1,1) arcs are present for each cell
7442
7443   //warning here one node have less than or equal effective number of cell with it
7444   //but cell could have more than effective nodes
7445   //because other equals nodes in other domain (with other global inode)
7446   std::vector <int> cell2cell_index(nbCells+1,0);
7447   std::vector <int> cell2cell;
7448   cell2cell.reserve(3*nbCells);
7449
7450   for (int icell=0; icell<nbCells;icell++)
7451     {
7452       std::map<int,int > counter;
7453       for (int iconn=index_ptr[icell]+1; iconn<index_ptr[icell+1];iconn++)
7454         {
7455           int inode=conn_ptr[iconn];
7456           for (int iconnr=indexr_ptr[inode]; iconnr<indexr_ptr[inode+1];iconnr++)
7457             {
7458               int icell2=revConn_ptr[iconnr];
7459               std::map<int,int>::iterator iter=counter.find(icell2);
7460               if (iter!=counter.end()) (iter->second)++;
7461               else counter.insert(std::make_pair(icell2,1));
7462             }
7463         }
7464       for (std::map<int,int>::const_iterator iter=counter.begin();
7465            iter!=counter.end(); iter++)
7466         if (iter->second >= meshDim)
7467           {
7468             cell2cell_index[icell+1]++;
7469             cell2cell.push_back(iter->first);
7470           }
7471     }
7472   indexr->decrRef();
7473   revConn->decrRef();
7474   cell2cell_index[0]=0;
7475   for (int icell=0; icell<nbCells;icell++)
7476     cell2cell_index[icell+1]=cell2cell_index[icell]+cell2cell_index[icell+1];
7477
7478   //filling up index and value to create skylinearray structure
7479   MEDCouplingSkyLineArray * array(MEDCouplingSkyLineArray::New(cell2cell_index,cell2cell));
7480   return array;
7481 }
7482
7483
7484 void MEDCouplingUMesh::writeVTKLL(std::ostream& ofs, const std::string& cellData, const std::string& pointData, DataArrayByte *byteData) const
7485 {
7486   int nbOfCells=getNumberOfCells();
7487   if(nbOfCells<=0)
7488     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::writeVTK : the unstructured mesh has no cells !");
7489   ofs << "  <" << getVTKDataSetType() << ">\n";
7490   ofs << "    <Piece NumberOfPoints=\"" << getNumberOfNodes() << "\" NumberOfCells=\"" << nbOfCells << "\">\n";
7491   ofs << "      <PointData>\n" << pointData << std::endl;
7492   ofs << "      </PointData>\n";
7493   ofs << "      <CellData>\n" << cellData << std::endl;
7494   ofs << "      </CellData>\n";
7495   ofs << "      <Points>\n";
7496   if(getSpaceDimension()==3)
7497     _coords->writeVTK(ofs,8,"Points",byteData);
7498   else
7499     {
7500       MCAuto<DataArrayDouble> coo=_coords->changeNbOfComponents(3,0.);
7501       coo->writeVTK(ofs,8,"Points",byteData);
7502     }
7503   ofs << "      </Points>\n";
7504   ofs << "      <Cells>\n";
7505   const int *cPtr=_nodal_connec->begin();
7506   const int *cIPtr=_nodal_connec_index->begin();
7507   MCAuto<DataArrayInt> faceoffsets=DataArrayInt::New(); faceoffsets->alloc(nbOfCells,1);
7508   MCAuto<DataArrayInt> types=DataArrayInt::New(); types->alloc(nbOfCells,1);
7509   MCAuto<DataArrayInt> offsets=DataArrayInt::New(); offsets->alloc(nbOfCells,1);
7510   MCAuto<DataArrayInt> connectivity=DataArrayInt::New(); connectivity->alloc(_nodal_connec->getNumberOfTuples()-nbOfCells,1);
7511   int *w1=faceoffsets->getPointer(),*w2=types->getPointer(),*w3=offsets->getPointer(),*w4=connectivity->getPointer();
7512   int szFaceOffsets=0,szConn=0;
7513   for(int i=0;i<nbOfCells;i++,w1++,w2++,w3++)
7514     {
7515       *w2=cPtr[cIPtr[i]];
7516       if((INTERP_KERNEL::NormalizedCellType)cPtr[cIPtr[i]]!=INTERP_KERNEL::NORM_POLYHED)
7517         {
7518           *w1=-1;
7519           *w3=szConn+cIPtr[i+1]-cIPtr[i]-1; szConn+=cIPtr[i+1]-cIPtr[i]-1;
7520           w4=std::copy(cPtr+cIPtr[i]+1,cPtr+cIPtr[i+1],w4);
7521         }
7522       else
7523         {
7524           int deltaFaceOffset=cIPtr[i+1]-cIPtr[i]+1;
7525           *w1=szFaceOffsets+deltaFaceOffset; szFaceOffsets+=deltaFaceOffset;
7526           std::set<int> c(cPtr+cIPtr[i]+1,cPtr+cIPtr[i+1]); c.erase(-1);
7527           *w3=szConn+(int)c.size(); szConn+=(int)c.size();
7528           w4=std::copy(c.begin(),c.end(),w4);
7529         }
7530     }
7531   types->transformWithIndArr(MEDCOUPLING2VTKTYPETRADUCER,MEDCOUPLING2VTKTYPETRADUCER+INTERP_KERNEL::NORM_MAXTYPE+1);
7532   types->writeVTK(ofs,8,"UInt8","types",byteData);
7533   offsets->writeVTK(ofs,8,"Int32","offsets",byteData);
7534   if(szFaceOffsets!=0)
7535     {//presence of Polyhedra
7536       connectivity->reAlloc(szConn);
7537       faceoffsets->writeVTK(ofs,8,"Int32","faceoffsets",byteData);
7538       MCAuto<DataArrayInt> faces=DataArrayInt::New(); faces->alloc(szFaceOffsets,1);
7539       w1=faces->getPointer();
7540       for(int i=0;i<nbOfCells;i++)
7541         if((INTERP_KERNEL::NormalizedCellType)cPtr[cIPtr[i]]==INTERP_KERNEL::NORM_POLYHED)
7542           {
7543             int nbFaces=std::count(cPtr+cIPtr[i]+1,cPtr+cIPtr[i+1],-1)+1;
7544             *w1++=nbFaces;
7545             const int *w6=cPtr+cIPtr[i]+1,*w5=0;
7546             for(int j=0;j<nbFaces;j++)
7547               {
7548                 w5=std::find(w6,cPtr+cIPtr[i+1],-1);
7549                 *w1++=(int)std::distance(w6,w5);
7550                 w1=std::copy(w6,w5,w1);
7551                 w6=w5+1;
7552               }
7553           }
7554       faces->writeVTK(ofs,8,"Int32","faces",byteData);
7555     }
7556   connectivity->writeVTK(ofs,8,"Int32","connectivity",byteData);
7557   ofs << "      </Cells>\n";
7558   ofs << "    </Piece>\n";
7559   ofs << "  </" << getVTKDataSetType() << ">\n";
7560 }
7561
7562 void MEDCouplingUMesh::reprQuickOverview(std::ostream& stream) const
7563 {
7564   stream << "MEDCouplingUMesh C++ instance at " << this << ". Name : \"" << getName() << "\".";
7565   if(_mesh_dim==-2)
7566     { stream << " Not set !"; return ; }
7567   stream << " Mesh dimension : " << _mesh_dim << ".";
7568   if(_mesh_dim==-1)
7569     return ;
7570   if(!_coords)
7571     { stream << " No coordinates set !"; return ; }
7572   if(!_coords->isAllocated())
7573     { stream << " Coordinates set but not allocated !"; return ; }
7574   stream << " Space dimension : " << _coords->getNumberOfComponents() << "." << std::endl;
7575   stream << "Number of nodes : " << _coords->getNumberOfTuples() << ".";
7576   if(!_nodal_connec_index)
7577     { stream << std::endl << "Nodal connectivity NOT set !"; return ; }
7578   if(!_nodal_connec_index->isAllocated())
7579     { stream << std::endl << "Nodal connectivity set but not allocated !"; return ; }
7580   int lgth=_nodal_connec_index->getNumberOfTuples();
7581   int cpt=_nodal_connec_index->getNumberOfComponents();
7582   if(cpt!=1 || lgth<1)
7583     return ;
7584   stream << std::endl << "Number of cells : " << lgth-1 << ".";
7585 }
7586
7587 std::string MEDCouplingUMesh::getVTKDataSetType() const
7588 {
7589   return std::string("UnstructuredGrid");
7590 }
7591
7592 std::string MEDCouplingUMesh::getVTKFileExtension() const
7593 {
7594   return std::string("vtu");
7595 }
7596
7597
7598
7599 /**
7600  * Provides a renumbering of the cells of this (which has to be a piecewise connected 1D line), so that
7601  * the segments of the line are indexed in consecutive order (i.e. cells \a i and \a i+1 are neighbors).
7602  * This doesn't modify the mesh. This method only works using nodal connectivity consideration. Coordinates of nodes are ignored here.
7603  * The caller is to deal with the resulting DataArrayInt.
7604  *  \throw If the coordinate array is not set.
7605  *  \throw If the nodal connectivity of the cells is not defined.
7606  *  \throw If m1 is not a mesh of dimension 2, or m1 is not a mesh of dimension 1
7607  *  \throw If m2 is not a (piecewise) line (i.e. if a point has more than 2 adjacent segments)
7608  *
7609  * \sa DataArrayInt::sortEachPairToMakeALinkedList
7610  */
7611 DataArrayInt *MEDCouplingUMesh::orderConsecutiveCells1D() const
7612 {
7613   checkFullyDefined();
7614   if(getMeshDimension()!=1)
7615     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::orderConsecutiveCells1D works on unstructured mesh with meshdim = 1 !");
7616
7617   // Check that this is a line (and not a more complex 1D mesh) - each point is used at most by 2 segments:
7618   MCAuto<DataArrayInt> _d(DataArrayInt::New()),_dI(DataArrayInt::New());
7619   MCAuto<DataArrayInt> _rD(DataArrayInt::New()),_rDI(DataArrayInt::New());
7620   MCAuto<MEDCouplingUMesh> m_points(buildDescendingConnectivity(_d, _dI, _rD, _rDI));
7621   const int *d(_d->begin()), *dI(_dI->begin());
7622   const int *rD(_rD->begin()), *rDI(_rDI->begin());
7623   MCAuto<DataArrayInt> _dsi(_rDI->deltaShiftIndex());
7624   const int * dsi(_dsi->begin());
7625   MCAuto<DataArrayInt> dsii = _dsi->findIdsNotInRange(0,3);
7626   m_points=0;
7627   if (dsii->getNumberOfTuples())
7628     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::orderConsecutiveCells1D only work with a mesh being a (piecewise) connected line!");
7629
7630   int nc(getNumberOfCells());
7631   MCAuto<DataArrayInt> result(DataArrayInt::New());
7632   result->alloc(nc,1);
7633
7634   // set of edges not used so far
7635   std::set<int> edgeSet;
7636   for (int i=0; i<nc; edgeSet.insert(i), i++);
7637
7638   int startSeg=0;
7639   int newIdx=0;
7640   // while we have points with only one neighbor segments
7641   do
7642     {
7643       std::list<int> linePiece;
7644       // fills a list of consecutive segment linked to startSeg. This can go forward or backward.
7645       for (int direction=0;direction<2;direction++) // direction=0 --> forward, direction=1 --> backward
7646         {
7647           // Fill the list forward (resp. backward) from the start segment:
7648           int activeSeg = startSeg;
7649           int prevPointId = -20;
7650           int ptId;
7651           while (!edgeSet.empty())
7652             {
7653               if (!(direction == 1 && prevPointId==-20)) // prevent adding twice startSeg
7654                 {
7655                   if (direction==0)
7656                     linePiece.push_back(activeSeg);
7657                   else
7658                     linePiece.push_front(activeSeg);
7659                   edgeSet.erase(activeSeg);
7660                 }
7661
7662               int ptId1 = d[dI[activeSeg]], ptId2 = d[dI[activeSeg]+1];
7663               ptId = direction ? (ptId1 == prevPointId ? ptId2 : ptId1) : (ptId2 == prevPointId ? ptId1 : ptId2);
7664               if (dsi[ptId] == 1) // hitting the end of the line
7665                 break;
7666               prevPointId = ptId;
7667               int seg1 = rD[rDI[ptId]], seg2 = rD[rDI[ptId]+1];
7668               activeSeg = (seg1 == activeSeg) ? seg2 : seg1;
7669             }
7670         }
7671       // Done, save final piece into DA:
7672       std::copy(linePiece.begin(), linePiece.end(), result->getPointer()+newIdx);
7673       newIdx += linePiece.size();
7674
7675       // identify next valid start segment (one which is not consumed)
7676       if(!edgeSet.empty())
7677         startSeg = *(edgeSet.begin());
7678     }
7679   while (!edgeSet.empty());
7680   return result.retn();
7681 }
7682
7683 /**
7684  * This method split some of edges of 2D cells in \a this. The edges to be split are specified in \a subNodesInSeg
7685  * and in \a subNodesInSegI using \ref numbering-indirect storage mode.
7686  * To do the work this method can optionally needs information about middle of subedges for quadratic cases if
7687  * a minimal creation of new nodes is wanted.
7688  * So this method try to reduce at most the number of new nodes. The only case that can lead this method to add
7689  * nodes if a SEG3 is split without information of middle.
7690  * \b WARNING : is returned value is different from 0 a call to MEDCouplingUMesh::mergeNodes is necessary to
7691  * avoid to have a non conform mesh.
7692  *
7693  * \return int - the number of new nodes created (in most of cases 0).
7694  *
7695  * \throw If \a this is not coherent.
7696  * \throw If \a this has not spaceDim equal to 2.
7697  * \throw If \a this has not meshDim equal to 2.
7698  * \throw If some subcells needed to be split are orphan.
7699  * \sa MEDCouplingUMesh::conformize2D
7700  */
7701 int MEDCouplingUMesh::split2DCells(const DataArrayInt *desc, const DataArrayInt *descI, const DataArrayInt *subNodesInSeg, const DataArrayInt *subNodesInSegI, const DataArrayInt *midOpt, const DataArrayInt *midOptI)
7702 {
7703   if(!desc || !descI || !subNodesInSeg || !subNodesInSegI)
7704     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::split2DCells : the 4 first arrays must be not null !");
7705   desc->checkAllocated(); descI->checkAllocated(); subNodesInSeg->checkAllocated(); subNodesInSegI->checkAllocated();
7706   if(getSpaceDimension()!=2 || getMeshDimension()!=2)
7707     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::split2DCells : This method only works for meshes with spaceDim=2 and meshDim=2 !");
7708   if(midOpt==0 && midOptI==0)
7709     {
7710       split2DCellsLinear(desc,descI,subNodesInSeg,subNodesInSegI);
7711       return 0;
7712     }
7713   else if(midOpt!=0 && midOptI!=0)
7714     return split2DCellsQuadratic(desc,descI,subNodesInSeg,subNodesInSegI,midOpt,midOptI);
7715   else
7716     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::split2DCells : middle parameters must be set to null for all or not null for all.");
7717 }
7718
7719 /*!
7720  * This method compute the convex hull of a single 2D cell. This method tries to conserve at maximum the given input connectivity. In particular, if the orientation of cell is not clockwise
7721  * as in MED format norm. If definitely the result of Jarvis algorithm is not matchable with the input connectivity, the result will be copied into \b nodalConnecOut parameter and
7722  * the geometric cell type set to INTERP_KERNEL::NORM_POLYGON.
7723  * This method excepts that \b coords parameter is expected to be in dimension 2. [ \b nodalConnBg , \b nodalConnEnd ) is the nodal connectivity of the input
7724  * cell (geometric cell type included at the position 0). If the meshdimension of the input cell is not equal to 2 an INTERP_KERNEL::Exception will be thrown.
7725  *
7726  * \return false if the input connectivity represents already the convex hull, true if the input cell needs to be reordered.
7727  */
7728 bool MEDCouplingUMesh::BuildConvexEnvelopOf2DCellJarvis(const double *coords, const int *nodalConnBg, const int *nodalConnEnd, DataArrayInt *nodalConnecOut)
7729 {
7730   std::size_t sz=std::distance(nodalConnBg,nodalConnEnd);
7731   if(sz>=4)
7732     {
7733       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)*nodalConnBg);
7734       if(cm.getDimension()==2)
7735         {
7736           const int *node=nodalConnBg+1;
7737           int startNode=*node++;
7738           double refX=coords[2*startNode];
7739           for(;node!=nodalConnEnd;node++)
7740             {
7741               if(coords[2*(*node)]<refX)
7742                 {
7743                   startNode=*node;
7744                   refX=coords[2*startNode];
7745                 }
7746             }
7747           std::vector<int> tmpOut; tmpOut.reserve(sz); tmpOut.push_back(startNode);
7748           refX=1e300;
7749           double tmp1;
7750           double tmp2[2];
7751           double angle0=-M_PI/2;
7752           //
7753           int nextNode=-1;
7754           int prevNode=-1;
7755           double resRef;
7756           double angleNext=0.;
7757           while(nextNode!=startNode)
7758             {
7759               nextNode=-1;
7760               resRef=1e300;
7761               for(node=nodalConnBg+1;node!=nodalConnEnd;node++)
7762                 {
7763                   if(*node!=tmpOut.back() && *node!=prevNode)
7764                     {
7765                       tmp2[0]=coords[2*(*node)]-coords[2*tmpOut.back()]; tmp2[1]=coords[2*(*node)+1]-coords[2*tmpOut.back()+1];
7766                       double angleM=INTERP_KERNEL::EdgeArcCircle::GetAbsoluteAngle(tmp2,tmp1);
7767                       double res;
7768                       if(angleM<=angle0)
7769                         res=angle0-angleM;
7770                       else
7771                         res=angle0-angleM+2.*M_PI;
7772                       if(res<resRef)
7773                         {
7774                           nextNode=*node;
7775                           resRef=res;
7776                           angleNext=angleM;
7777                         }
7778                     }
7779                 }
7780               if(nextNode!=startNode)
7781                 {
7782                   angle0=angleNext-M_PI;
7783                   if(angle0<-M_PI)
7784                     angle0+=2*M_PI;
7785                   prevNode=tmpOut.back();
7786                   tmpOut.push_back(nextNode);
7787                 }
7788             }
7789           std::vector<int> tmp3(2*(sz-1));
7790           std::vector<int>::iterator it=std::copy(nodalConnBg+1,nodalConnEnd,tmp3.begin());
7791           std::copy(nodalConnBg+1,nodalConnEnd,it);
7792           if(std::search(tmp3.begin(),tmp3.end(),tmpOut.begin(),tmpOut.end())!=tmp3.end())
7793             {
7794               nodalConnecOut->insertAtTheEnd(nodalConnBg,nodalConnEnd);
7795               return false;
7796             }
7797           if(std::search(tmp3.rbegin(),tmp3.rend(),tmpOut.begin(),tmpOut.end())!=tmp3.rend())
7798             {
7799               nodalConnecOut->insertAtTheEnd(nodalConnBg,nodalConnEnd);
7800               return false;
7801             }
7802           else
7803             {
7804               nodalConnecOut->pushBackSilent((int)INTERP_KERNEL::NORM_POLYGON);
7805               nodalConnecOut->insertAtTheEnd(tmpOut.begin(),tmpOut.end());
7806               return true;
7807             }
7808         }
7809       else
7810         throw INTERP_KERNEL::Exception("MEDCouplingUMesh::BuildConvexEnvelopOf2DCellJarvis : invalid 2D cell connectivity !");
7811     }
7812   else
7813     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::BuildConvexEnvelopOf2DCellJarvis : invalid 2D cell connectivity !");
7814 }
7815
7816 /*!
7817  * This method works on an input pair (\b arr, \b arrIndx) where \b arr indexes is in \b arrIndx.
7818  * This method will not impact the size of inout parameter \b arrIndx but the size of \b arr will be modified in case of suppression.
7819  *
7820  * \param [in] idsToRemoveBg begin of set of ids to remove in \b arr (included)
7821  * \param [in] idsToRemoveEnd end of set of ids to remove in \b arr (excluded)
7822  * \param [in,out] arr array in which the remove operation will be done.
7823  * \param [in,out] arrIndx array in the remove operation will modify
7824  * \param [in] offsetForRemoval (by default 0) offset so that for each i in [0,arrIndx->getNumberOfTuples()-1) removal process will be performed in the following range [arr+arrIndx[i]+offsetForRemoval,arr+arr[i+1])
7825  * \return true if \b arr and \b arrIndx have been modified, false if not.
7826  */
7827 bool MEDCouplingUMesh::RemoveIdsFromIndexedArrays(const int *idsToRemoveBg, const int *idsToRemoveEnd, DataArrayInt *arr, DataArrayInt *arrIndx, int offsetForRemoval)
7828 {
7829   if(!arrIndx || !arr)
7830     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::RemoveIdsFromIndexedArrays : some input arrays are empty !");
7831   if(offsetForRemoval<0)
7832     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::RemoveIdsFromIndexedArrays : offsetForRemoval should be >=0 !");
7833   std::set<int> s(idsToRemoveBg,idsToRemoveEnd);
7834   int nbOfGrps=arrIndx->getNumberOfTuples()-1;
7835   int *arrIPtr=arrIndx->getPointer();
7836   *arrIPtr++=0;
7837   int previousArrI=0;
7838   const int *arrPtr=arr->begin();
7839   std::vector<int> arrOut;//no utility to switch to DataArrayInt because copy always needed
7840   for(int i=0;i<nbOfGrps;i++,arrIPtr++)
7841     {
7842       if(*arrIPtr-previousArrI>offsetForRemoval)
7843         {
7844           for(const int *work=arrPtr+previousArrI+offsetForRemoval;work!=arrPtr+*arrIPtr;work++)
7845             {
7846               if(s.find(*work)==s.end())
7847                 arrOut.push_back(*work);
7848             }
7849         }
7850       previousArrI=*arrIPtr;
7851       *arrIPtr=(int)arrOut.size();
7852     }
7853   if(arr->getNumberOfTuples()==arrOut.size())
7854     return false;
7855   arr->alloc((int)arrOut.size(),1);
7856   std::copy(arrOut.begin(),arrOut.end(),arr->getPointer());
7857   return true;
7858 }
7859
7860 /*!
7861  * This method works on a pair input (\b arrIn, \b arrIndxIn) where \b arrIn indexes is in \b arrIndxIn
7862  * (\ref numbering-indirect).
7863  * This method returns the result of the extraction ( specified by a set of ids in [\b idsOfSelectBg , \b idsOfSelectEnd ) ).
7864  * The selection of extraction is done standardly in new2old format.
7865  * This method returns indexed arrays (\ref numbering-indirect) using 2 arrays (arrOut,arrIndexOut).
7866  *
7867  * \param [in] idsOfSelectBg begin of set of ids of the input extraction (included)
7868  * \param [in] idsOfSelectEnd end of set of ids of the input extraction (excluded)
7869  * \param [in] arrIn arr origin array from which the extraction will be done.
7870  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
7871  * \param [out] arrOut the resulting array
7872  * \param [out] arrIndexOut the index array of the resulting array \b arrOut
7873  * \sa MEDCouplingUMesh::ExtractFromIndexedArraysSlice
7874  */
7875 void MEDCouplingUMesh::ExtractFromIndexedArrays(const int *idsOfSelectBg, const int *idsOfSelectEnd, const DataArrayInt *arrIn, const DataArrayInt *arrIndxIn,
7876                                                 DataArrayInt* &arrOut, DataArrayInt* &arrIndexOut)
7877 {
7878   if(!arrIn || !arrIndxIn)
7879     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ExtractFromIndexedArrays : input pointer is NULL !");
7880   arrIn->checkAllocated(); arrIndxIn->checkAllocated();
7881   if(arrIn->getNumberOfComponents()!=1 || arrIndxIn->getNumberOfComponents()!=1)
7882     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ExtractFromIndexedArrays : input arrays must have exactly one component !");
7883   std::size_t sz=std::distance(idsOfSelectBg,idsOfSelectEnd);
7884   const int *arrInPtr=arrIn->begin();
7885   const int *arrIndxPtr=arrIndxIn->begin();
7886   int nbOfGrps=arrIndxIn->getNumberOfTuples()-1;
7887   if(nbOfGrps<0)
7888     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ExtractFromIndexedArrays : The format of \"arrIndxIn\" is invalid ! Its nb of tuples should be >=1 !");
7889   int maxSizeOfArr=arrIn->getNumberOfTuples();
7890   MCAuto<DataArrayInt> arro=DataArrayInt::New();
7891   MCAuto<DataArrayInt> arrIo=DataArrayInt::New();
7892   arrIo->alloc((int)(sz+1),1);
7893   const int *idsIt=idsOfSelectBg;
7894   int *work=arrIo->getPointer();
7895   *work++=0;
7896   int lgth=0;
7897   for(std::size_t i=0;i<sz;i++,work++,idsIt++)
7898     {
7899       if(*idsIt>=0 && *idsIt<nbOfGrps)
7900         lgth+=arrIndxPtr[*idsIt+1]-arrIndxPtr[*idsIt];
7901       else
7902         {
7903           std::ostringstream oss; oss << "MEDCouplingUMesh::ExtractFromIndexedArrays : id located on pos #" << i << " value is " << *idsIt << " ! Must be in [0," << nbOfGrps << ") !";
7904           throw INTERP_KERNEL::Exception(oss.str());
7905         }
7906       if(lgth>=work[-1])
7907         *work=lgth;
7908       else
7909         {
7910           std::ostringstream oss; oss << "MEDCouplingUMesh::ExtractFromIndexedArrays : id located on pos #" << i << " value is " << *idsIt << " and at this pos arrIndxIn[" << *idsIt;
7911           oss << "+1]-arrIndxIn[" << *idsIt << "] < 0 ! The input index array is bugged !";
7912           throw INTERP_KERNEL::Exception(oss.str());
7913         }
7914     }
7915   arro->alloc(lgth,1);
7916   work=arro->getPointer();
7917   idsIt=idsOfSelectBg;
7918   for(std::size_t i=0;i<sz;i++,idsIt++)
7919     {
7920       if(arrIndxPtr[*idsIt]>=0 && arrIndxPtr[*idsIt+1]<=maxSizeOfArr)
7921         work=std::copy(arrInPtr+arrIndxPtr[*idsIt],arrInPtr+arrIndxPtr[*idsIt+1],work);
7922       else
7923         {
7924           std::ostringstream oss; oss << "MEDCouplingUMesh::ExtractFromIndexedArrays : id located on pos #" << i << " value is " << *idsIt << " arrIndx[" << *idsIt << "] must be >= 0 and arrIndx[";
7925           oss << *idsIt << "+1] <= " << maxSizeOfArr << " (the size of arrIn)!";
7926           throw INTERP_KERNEL::Exception(oss.str());
7927         }
7928     }
7929   arrOut=arro.retn();
7930   arrIndexOut=arrIo.retn();
7931 }
7932
7933 /*!
7934  * This method works on a pair input (\b arrIn, \b arrIndxIn) where \b arrIn indexes is in \b arrIndxIn
7935  * (\ref numbering-indirect).
7936  * This method returns the result of the extraction ( specified by a set of ids with a slice given by \a idsOfSelectStart, \a idsOfSelectStop and \a idsOfSelectStep ).
7937  * The selection of extraction is done standardly in new2old format.
7938  * This method returns indexed arrays (\ref numbering-indirect) using 2 arrays (arrOut,arrIndexOut).
7939  *
7940  * \param [in] idsOfSelectStart begin of set of ids of the input extraction (included)
7941  * \param [in] idsOfSelectStop end of set of ids of the input extraction (excluded)
7942  * \param [in] idsOfSelectStep
7943  * \param [in] arrIn arr origin array from which the extraction will be done.
7944  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
7945  * \param [out] arrOut the resulting array
7946  * \param [out] arrIndexOut the index array of the resulting array \b arrOut
7947  * \sa MEDCouplingUMesh::ExtractFromIndexedArrays
7948  */
7949 void MEDCouplingUMesh::ExtractFromIndexedArraysSlice(int idsOfSelectStart, int idsOfSelectStop, int idsOfSelectStep, const DataArrayInt *arrIn, const DataArrayInt *arrIndxIn,
7950                                                  DataArrayInt* &arrOut, DataArrayInt* &arrIndexOut)
7951 {
7952   if(!arrIn || !arrIndxIn)
7953     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ExtractFromIndexedArraysSlice : input pointer is NULL !");
7954   arrIn->checkAllocated(); arrIndxIn->checkAllocated();
7955   if(arrIn->getNumberOfComponents()!=1 || arrIndxIn->getNumberOfComponents()!=1)
7956     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ExtractFromIndexedArraysSlice : input arrays must have exactly one component !");
7957   int sz=DataArrayInt::GetNumberOfItemGivenBESRelative(idsOfSelectStart,idsOfSelectStop,idsOfSelectStep,"MEDCouplingUMesh::ExtractFromIndexedArraysSlice : Input slice ");
7958   const int *arrInPtr=arrIn->begin();
7959   const int *arrIndxPtr=arrIndxIn->begin();
7960   int nbOfGrps=arrIndxIn->getNumberOfTuples()-1;
7961   if(nbOfGrps<0)
7962     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ExtractFromIndexedArraysSlice : The format of \"arrIndxIn\" is invalid ! Its nb of tuples should be >=1 !");
7963   int maxSizeOfArr=arrIn->getNumberOfTuples();
7964   MCAuto<DataArrayInt> arro=DataArrayInt::New();
7965   MCAuto<DataArrayInt> arrIo=DataArrayInt::New();
7966   arrIo->alloc((int)(sz+1),1);
7967   int idsIt=idsOfSelectStart;
7968   int *work=arrIo->getPointer();
7969   *work++=0;
7970   int lgth=0;
7971   for(int i=0;i<sz;i++,work++,idsIt+=idsOfSelectStep)
7972     {
7973       if(idsIt>=0 && idsIt<nbOfGrps)
7974         lgth+=arrIndxPtr[idsIt+1]-arrIndxPtr[idsIt];
7975       else
7976         {
7977           std::ostringstream oss; oss << "MEDCouplingUMesh::ExtractFromIndexedArraysSlice : id located on pos #" << i << " value is " << idsIt << " ! Must be in [0," << nbOfGrps << ") !";
7978           throw INTERP_KERNEL::Exception(oss.str());
7979         }
7980       if(lgth>=work[-1])
7981         *work=lgth;
7982       else
7983         {
7984           std::ostringstream oss; oss << "MEDCouplingUMesh::ExtractFromIndexedArraysSlice : id located on pos #" << i << " value is " << idsIt << " and at this pos arrIndxIn[" << idsIt;
7985           oss << "+1]-arrIndxIn[" << idsIt << "] < 0 ! The input index array is bugged !";
7986           throw INTERP_KERNEL::Exception(oss.str());
7987         }
7988     }
7989   arro->alloc(lgth,1);
7990   work=arro->getPointer();
7991   idsIt=idsOfSelectStart;
7992   for(int i=0;i<sz;i++,idsIt+=idsOfSelectStep)
7993     {
7994       if(arrIndxPtr[idsIt]>=0 && arrIndxPtr[idsIt+1]<=maxSizeOfArr)
7995         work=std::copy(arrInPtr+arrIndxPtr[idsIt],arrInPtr+arrIndxPtr[idsIt+1],work);
7996       else
7997         {
7998           std::ostringstream oss; oss << "MEDCouplingUMesh::ExtractFromIndexedArraysSlice : id located on pos #" << i << " value is " << idsIt << " arrIndx[" << idsIt << "] must be >= 0 and arrIndx[";
7999           oss << idsIt << "+1] <= " << maxSizeOfArr << " (the size of arrIn)!";
8000           throw INTERP_KERNEL::Exception(oss.str());
8001         }
8002     }
8003   arrOut=arro.retn();
8004   arrIndexOut=arrIo.retn();
8005 }
8006
8007 /*!
8008  * This method works on an input pair (\b arrIn, \b arrIndxIn) where \b arrIn indexes is in \b arrIndxIn.
8009  * This method builds an output pair (\b arrOut,\b arrIndexOut) that is a copy from \b arrIn for all cell ids \b not \b in [ \b idsOfSelectBg , \b idsOfSelectEnd ) and for
8010  * cellIds \b in [ \b idsOfSelectBg , \b idsOfSelectEnd ) a copy coming from the corresponding values in input pair (\b srcArr, \b srcArrIndex).
8011  * This method is an generalization of MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx that performs the same thing but by without building explicitly a result output arrays.
8012  *
8013  * \param [in] idsOfSelectBg begin of set of ids of the input extraction (included)
8014  * \param [in] idsOfSelectEnd end of set of ids of the input extraction (excluded)
8015  * \param [in] arrIn arr origin array from which the extraction will be done.
8016  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
8017  * \param [in] srcArr input array that will be used as source of copy for ids in [ \b idsOfSelectBg, \b idsOfSelectEnd )
8018  * \param [in] srcArrIndex index array of \b srcArr
8019  * \param [out] arrOut the resulting array
8020  * \param [out] arrIndexOut the index array of the resulting array \b arrOut
8021  *
8022  * \sa MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx
8023  */
8024 void MEDCouplingUMesh::SetPartOfIndexedArrays(const int *idsOfSelectBg, const int *idsOfSelectEnd, const DataArrayInt *arrIn, const DataArrayInt *arrIndxIn,
8025                                               const DataArrayInt *srcArr, const DataArrayInt *srcArrIndex,
8026                                               DataArrayInt* &arrOut, DataArrayInt* &arrIndexOut)
8027 {
8028   if(arrIn==0 || arrIndxIn==0 || srcArr==0 || srcArrIndex==0)
8029     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::SetPartOfIndexedArrays : presence of null pointer in input parameter !");
8030   MCAuto<DataArrayInt> arro=DataArrayInt::New();
8031   MCAuto<DataArrayInt> arrIo=DataArrayInt::New();
8032   int nbOfTuples=arrIndxIn->getNumberOfTuples()-1;
8033   std::vector<bool> v(nbOfTuples,true);
8034   int offset=0;
8035   const int *arrIndxInPtr=arrIndxIn->begin();
8036   const int *srcArrIndexPtr=srcArrIndex->begin();
8037   for(const int *it=idsOfSelectBg;it!=idsOfSelectEnd;it++,srcArrIndexPtr++)
8038     {
8039       if(*it>=0 && *it<nbOfTuples)
8040         {
8041           v[*it]=false;
8042           offset+=(srcArrIndexPtr[1]-srcArrIndexPtr[0])-(arrIndxInPtr[*it+1]-arrIndxInPtr[*it]);
8043         }
8044       else
8045         {
8046           std::ostringstream oss; oss << "MEDCouplingUMesh::SetPartOfIndexedArrays : On pos #" << std::distance(idsOfSelectBg,it) << " value is " << *it << " not in [0," << nbOfTuples << ") !";
8047           throw INTERP_KERNEL::Exception(oss.str());
8048         }
8049     }
8050   srcArrIndexPtr=srcArrIndex->begin();
8051   arrIo->alloc(nbOfTuples+1,1);
8052   arro->alloc(arrIn->getNumberOfTuples()+offset,1);
8053   const int *arrInPtr=arrIn->begin();
8054   const int *srcArrPtr=srcArr->begin();
8055   int *arrIoPtr=arrIo->getPointer(); *arrIoPtr++=0;
8056   int *arroPtr=arro->getPointer();
8057   for(int ii=0;ii<nbOfTuples;ii++,arrIoPtr++)
8058     {
8059       if(v[ii])
8060         {
8061           arroPtr=std::copy(arrInPtr+arrIndxInPtr[ii],arrInPtr+arrIndxInPtr[ii+1],arroPtr);
8062           *arrIoPtr=arrIoPtr[-1]+(arrIndxInPtr[ii+1]-arrIndxInPtr[ii]);
8063         }
8064       else
8065         {
8066           std::size_t pos=std::distance(idsOfSelectBg,std::find(idsOfSelectBg,idsOfSelectEnd,ii));
8067           arroPtr=std::copy(srcArrPtr+srcArrIndexPtr[pos],srcArrPtr+srcArrIndexPtr[pos+1],arroPtr);
8068           *arrIoPtr=arrIoPtr[-1]+(srcArrIndexPtr[pos+1]-srcArrIndexPtr[pos]);
8069         }
8070     }
8071   arrOut=arro.retn();
8072   arrIndexOut=arrIo.retn();
8073 }
8074
8075 /*!
8076  * This method works on an input pair (\b arrIn, \b arrIndxIn) where \b arrIn indexes is in \b arrIndxIn.
8077  * This method is an specialization of MEDCouplingUMesh::SetPartOfIndexedArrays in the case of assignment do not modify the index in \b arrIndxIn.
8078  *
8079  * \param [in] idsOfSelectBg begin of set of ids of the input extraction (included)
8080  * \param [in] idsOfSelectEnd end of set of ids of the input extraction (excluded)
8081  * \param [in,out] arrInOut arr origin array from which the extraction will be done.
8082  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
8083  * \param [in] srcArr input array that will be used as source of copy for ids in [ \b idsOfSelectBg , \b idsOfSelectEnd )
8084  * \param [in] srcArrIndex index array of \b srcArr
8085  *
8086  * \sa MEDCouplingUMesh::SetPartOfIndexedArrays
8087  */
8088 void MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx(const int *idsOfSelectBg, const int *idsOfSelectEnd, DataArrayInt *arrInOut, const DataArrayInt *arrIndxIn,
8089                                                      const DataArrayInt *srcArr, const DataArrayInt *srcArrIndex)
8090 {
8091   if(arrInOut==0 || arrIndxIn==0 || srcArr==0 || srcArrIndex==0)
8092     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx : presence of null pointer in input parameter !");
8093   int nbOfTuples=arrIndxIn->getNumberOfTuples()-1;
8094   const int *arrIndxInPtr=arrIndxIn->begin();
8095   const int *srcArrIndexPtr=srcArrIndex->begin();
8096   int *arrInOutPtr=arrInOut->getPointer();
8097   const int *srcArrPtr=srcArr->begin();
8098   for(const int *it=idsOfSelectBg;it!=idsOfSelectEnd;it++,srcArrIndexPtr++)
8099     {
8100       if(*it>=0 && *it<nbOfTuples)
8101         {
8102           if(srcArrIndexPtr[1]-srcArrIndexPtr[0]==arrIndxInPtr[*it+1]-arrIndxInPtr[*it])
8103             std::copy(srcArrPtr+srcArrIndexPtr[0],srcArrPtr+srcArrIndexPtr[1],arrInOutPtr+arrIndxInPtr[*it]);
8104           else
8105             {
8106               std::ostringstream oss; oss << "MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx : On pos #" << std::distance(idsOfSelectBg,it) << " id (idsOfSelectBg[" << std::distance(idsOfSelectBg,it)<< "]) is " << *it << " arrIndxIn[id+1]-arrIndxIn[id]!=srcArrIndex[pos+1]-srcArrIndex[pos] !";
8107               throw INTERP_KERNEL::Exception(oss.str());
8108             }
8109         }
8110       else
8111         {
8112           std::ostringstream oss; oss << "MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx : On pos #" << std::distance(idsOfSelectBg,it) << " value is " << *it << " not in [0," << nbOfTuples << ") !";
8113           throw INTERP_KERNEL::Exception(oss.str());
8114         }
8115     }
8116 }
8117
8118 /*!
8119  * This method works on a pair input (\b arrIn, \b arrIndxIn) where \b arr indexes is in \b arrIndxIn.
8120  * This method expects that these two input arrays come from the output of MEDCouplingUMesh::computeNeighborsOfCells method.
8121  * This method start from id 0 that will be contained in output DataArrayInt. It searches then all neighbors of id0 looking at arrIn[arrIndxIn[0]:arrIndxIn[0+1]].
8122  * Then it is repeated recursively until either all ids are fetched or no more ids are reachable step by step.
8123  * A negative value in \b arrIn means that it is ignored.
8124  * This method is useful to see if a mesh is contiguous regarding its connectivity. If it is not the case the size of returned array is different from arrIndxIn->getNumberOfTuples()-1.
8125  *
8126  * \param [in] arrIn arr origin array from which the extraction will be done.
8127  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
8128  * \return a newly allocated DataArray that stores all ids fetched by the gradually spread process.
8129  * \sa MEDCouplingUMesh::ComputeSpreadZoneGraduallyFromSeed, MEDCouplingUMesh::partitionBySpreadZone
8130  */
8131 DataArrayInt *MEDCouplingUMesh::ComputeSpreadZoneGradually(const DataArrayInt *arrIn, const DataArrayInt *arrIndxIn)
8132 {
8133   int seed=0,nbOfDepthPeelingPerformed=0;
8134   return ComputeSpreadZoneGraduallyFromSeed(&seed,&seed+1,arrIn,arrIndxIn,-1,nbOfDepthPeelingPerformed);
8135 }
8136
8137 /*!
8138  * This method works on a pair input (\b arrIn, \b arrIndxIn) where \b arr indexes is in \b arrIndxIn.
8139  * This method expects that these two input arrays come from the output of MEDCouplingUMesh::computeNeighborsOfCells method.
8140  * This method start from id 0 that will be contained in output DataArrayInt. It searches then all neighbors of id0 regarding arrIn[arrIndxIn[0]:arrIndxIn[0+1]].
8141  * Then it is repeated recursively until either all ids are fetched or no more ids are reachable step by step.
8142  * A negative value in \b arrIn means that it is ignored.
8143  * This method is useful to see if a mesh is contiguous regarding its connectivity. If it is not the case the size of returned array is different from arrIndxIn->getNumberOfTuples()-1.
8144  * \param [in] seedBg the begin pointer (included) of an array containing the seed of the search zone
8145  * \param [in] seedEnd the end pointer (not included) of an array containing the seed of the search zone
8146  * \param [in] arrIn arr origin array from which the extraction will be done.
8147  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
8148  * \param [in] nbOfDepthPeeling the max number of peels requested in search. By default -1, that is to say, no limit.
8149  * \param [out] nbOfDepthPeelingPerformed the number of peels effectively performed. May be different from \a nbOfDepthPeeling
8150  * \return a newly allocated DataArray that stores all ids fetched by the gradually spread process.
8151  * \sa MEDCouplingUMesh::partitionBySpreadZone
8152  */
8153 DataArrayInt *MEDCouplingUMesh::ComputeSpreadZoneGraduallyFromSeed(const int *seedBg, const int *seedEnd, const DataArrayInt *arrIn, const DataArrayInt *arrIndxIn, int nbOfDepthPeeling, int& nbOfDepthPeelingPerformed)
8154 {
8155   nbOfDepthPeelingPerformed=0;
8156   if(!arrIndxIn)
8157     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ComputeSpreadZoneGraduallyFromSeed : arrIndxIn input pointer is NULL !");
8158   int nbOfTuples=arrIndxIn->getNumberOfTuples()-1;
8159   if(nbOfTuples<=0)
8160     {
8161       DataArrayInt *ret=DataArrayInt::New(); ret->alloc(0,1);
8162       return ret;
8163     }
8164   //
8165   std::vector<bool> fetched(nbOfTuples,false);
8166   return ComputeSpreadZoneGraduallyFromSeedAlg(fetched,seedBg,seedEnd,arrIn,arrIndxIn,nbOfDepthPeeling,nbOfDepthPeelingPerformed);
8167 }
8168
8169
8170 /*!
8171  * This method works on an input pair (\b arrIn, \b arrIndxIn) where \b arrIn indexes is in \b arrIndxIn.
8172  * This method builds an output pair (\b arrOut,\b arrIndexOut) that is a copy from \b arrIn for all cell ids \b not \b in [ \b idsOfSelectBg , \b idsOfSelectEnd ) and for
8173  * cellIds \b in [\b idsOfSelectBg, \b idsOfSelectEnd) a copy coming from the corresponding values in input pair (\b srcArr, \b srcArrIndex).
8174  * This method is an generalization of MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx that performs the same thing but by without building explicitly a result output arrays.
8175  *
8176  * \param [in] start begin of set of ids of the input extraction (included)
8177  * \param [in] end end of set of ids of the input extraction (excluded)
8178  * \param [in] step step of the set of ids in range mode.
8179  * \param [in] arrIn arr origin array from which the extraction will be done.
8180  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
8181  * \param [in] srcArr input array that will be used as source of copy for ids in [\b idsOfSelectBg, \b idsOfSelectEnd)
8182  * \param [in] srcArrIndex index array of \b srcArr
8183  * \param [out] arrOut the resulting array
8184  * \param [out] arrIndexOut the index array of the resulting array \b arrOut
8185  *
8186  * \sa MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx MEDCouplingUMesh::SetPartOfIndexedArrays
8187  */
8188 void MEDCouplingUMesh::SetPartOfIndexedArraysSlice(int start, int end, int step, const DataArrayInt *arrIn, const DataArrayInt *arrIndxIn,
8189                                                const DataArrayInt *srcArr, const DataArrayInt *srcArrIndex,
8190                                                DataArrayInt* &arrOut, DataArrayInt* &arrIndexOut)
8191 {
8192   if(arrIn==0 || arrIndxIn==0 || srcArr==0 || srcArrIndex==0)
8193     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::SetPartOfIndexedArraysSlice : presence of null pointer in input parameter !");
8194   MCAuto<DataArrayInt> arro=DataArrayInt::New();
8195   MCAuto<DataArrayInt> arrIo=DataArrayInt::New();
8196   int nbOfTuples=arrIndxIn->getNumberOfTuples()-1;
8197   int offset=0;
8198   const int *arrIndxInPtr=arrIndxIn->begin();
8199   const int *srcArrIndexPtr=srcArrIndex->begin();
8200   int nbOfElemsToSet=DataArray::GetNumberOfItemGivenBESRelative(start,end,step,"MEDCouplingUMesh::SetPartOfIndexedArraysSlice : ");
8201   int it=start;
8202   for(int i=0;i<nbOfElemsToSet;i++,srcArrIndexPtr++,it+=step)
8203     {
8204       if(it>=0 && it<nbOfTuples)
8205         offset+=(srcArrIndexPtr[1]-srcArrIndexPtr[0])-(arrIndxInPtr[it+1]-arrIndxInPtr[it]);
8206       else
8207         {
8208           std::ostringstream oss; oss << "MEDCouplingUMesh::SetPartOfIndexedArraysSlice : On pos #" << i << " value is " << it << " not in [0," << nbOfTuples << ") !";
8209           throw INTERP_KERNEL::Exception(oss.str());
8210         }
8211     }
8212   srcArrIndexPtr=srcArrIndex->begin();
8213   arrIo->alloc(nbOfTuples+1,1);
8214   arro->alloc(arrIn->getNumberOfTuples()+offset,1);
8215   const int *arrInPtr=arrIn->begin();
8216   const int *srcArrPtr=srcArr->begin();
8217   int *arrIoPtr=arrIo->getPointer(); *arrIoPtr++=0;
8218   int *arroPtr=arro->getPointer();
8219   for(int ii=0;ii<nbOfTuples;ii++,arrIoPtr++)
8220     {
8221       int pos=DataArray::GetPosOfItemGivenBESRelativeNoThrow(ii,start,end,step);
8222       if(pos<0)
8223         {
8224           arroPtr=std::copy(arrInPtr+arrIndxInPtr[ii],arrInPtr+arrIndxInPtr[ii+1],arroPtr);
8225           *arrIoPtr=arrIoPtr[-1]+(arrIndxInPtr[ii+1]-arrIndxInPtr[ii]);
8226         }
8227       else
8228         {
8229           arroPtr=std::copy(srcArrPtr+srcArrIndexPtr[pos],srcArrPtr+srcArrIndexPtr[pos+1],arroPtr);
8230           *arrIoPtr=arrIoPtr[-1]+(srcArrIndexPtr[pos+1]-srcArrIndexPtr[pos]);
8231         }
8232     }
8233   arrOut=arro.retn();
8234   arrIndexOut=arrIo.retn();
8235 }
8236
8237 /*!
8238  * This method works on an input pair (\b arrIn, \b arrIndxIn) where \b arrIn indexes is in \b arrIndxIn.
8239  * This method is an specialization of MEDCouplingUMesh::SetPartOfIndexedArrays in the case of assignment do not modify the index in \b arrIndxIn.
8240  *
8241  * \param [in] start begin of set of ids of the input extraction (included)
8242  * \param [in] end end of set of ids of the input extraction (excluded)
8243  * \param [in] step step of the set of ids in range mode.
8244  * \param [in,out] arrInOut arr origin array from which the extraction will be done.
8245  * \param [in] arrIndxIn is the input index array allowing to walk into \b arrIn
8246  * \param [in] srcArr input array that will be used as source of copy for ids in [\b idsOfSelectBg, \b idsOfSelectEnd)
8247  * \param [in] srcArrIndex index array of \b srcArr
8248  *
8249  * \sa MEDCouplingUMesh::SetPartOfIndexedArraysSlice MEDCouplingUMesh::SetPartOfIndexedArraysSameIdx
8250  */
8251 void MEDCouplingUMesh::SetPartOfIndexedArraysSameIdxSlice(int start, int end, int step, DataArrayInt *arrInOut, const DataArrayInt *arrIndxIn,
8252                                                       const DataArrayInt *srcArr, const DataArrayInt *srcArrIndex)
8253 {
8254   if(arrInOut==0 || arrIndxIn==0 || srcArr==0 || srcArrIndex==0)
8255     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::SetPartOfIndexedArraysSameIdxSlice : presence of null pointer in input parameter !");
8256   int nbOfTuples=arrIndxIn->getNumberOfTuples()-1;
8257   const int *arrIndxInPtr=arrIndxIn->begin();
8258   const int *srcArrIndexPtr=srcArrIndex->begin();
8259   int *arrInOutPtr=arrInOut->getPointer();
8260   const int *srcArrPtr=srcArr->begin();
8261   int nbOfElemsToSet=DataArray::GetNumberOfItemGivenBESRelative(start,end,step,"MEDCouplingUMesh::SetPartOfIndexedArraysSameIdxSlice : ");
8262   int it=start;
8263   for(int i=0;i<nbOfElemsToSet;i++,srcArrIndexPtr++,it+=step)
8264     {
8265       if(it>=0 && it<nbOfTuples)
8266         {
8267           if(srcArrIndexPtr[1]-srcArrIndexPtr[0]==arrIndxInPtr[it+1]-arrIndxInPtr[it])
8268             std::copy(srcArrPtr+srcArrIndexPtr[0],srcArrPtr+srcArrIndexPtr[1],arrInOutPtr+arrIndxInPtr[it]);
8269           else
8270             {
8271               std::ostringstream oss; oss << "MEDCouplingUMesh::SetPartOfIndexedArraysSameIdxSlice : On pos #" << i << " id (idsOfSelectBg[" << i << "]) is " << it << " arrIndxIn[id+1]-arrIndxIn[id]!=srcArrIndex[pos+1]-srcArrIndex[pos] !";
8272               throw INTERP_KERNEL::Exception(oss.str());
8273             }
8274         }
8275       else
8276         {
8277           std::ostringstream oss; oss << "MEDCouplingUMesh::SetPartOfIndexedArraysSameIdxSlice : On pos #" << i << " value is " << it << " not in [0," << nbOfTuples << ") !";
8278           throw INTERP_KERNEL::Exception(oss.str());
8279         }
8280     }
8281 }
8282
8283 /*!
8284  * \b this is expected to be a mesh fully defined whose spaceDim==meshDim.
8285  * It returns a new allocated mesh having the same mesh dimension and lying on same coordinates.
8286  * The returned mesh contains as poly cells as number of contiguous zone (regarding connectivity).
8287  * A spread contiguous zone is built using poly cells (polyhedra in 3D, polygons in 2D and polyline in 1D).
8288  * The sum of measure field of returned mesh is equal to the sum of measure field of this.
8289  *
8290  * \return a newly allocated mesh lying on the same coords than \b this with same meshdimension than \b this.
8291  */
8292 MEDCouplingUMesh *MEDCouplingUMesh::buildSpreadZonesWithPoly() const
8293 {
8294   checkFullyDefined();
8295   int mdim=getMeshDimension();
8296   int spaceDim=getSpaceDimension();
8297   if(mdim!=spaceDim)
8298     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSpreadZonesWithPoly : meshdimension and spacedimension do not match !");
8299   std::vector<DataArrayInt *> partition=partitionBySpreadZone();
8300   std::vector< MCAuto<DataArrayInt> > partitionAuto; partitionAuto.reserve(partition.size());
8301   std::copy(partition.begin(),partition.end(),std::back_insert_iterator<std::vector< MCAuto<DataArrayInt> > >(partitionAuto));
8302   MCAuto<MEDCouplingUMesh> ret=MEDCouplingUMesh::New(getName(),mdim);
8303   ret->setCoords(getCoords());
8304   ret->allocateCells((int)partition.size());
8305   //
8306   for(std::vector<DataArrayInt *>::const_iterator it=partition.begin();it!=partition.end();it++)
8307     {
8308       MCAuto<MEDCouplingUMesh> tmp=static_cast<MEDCouplingUMesh *>(buildPartOfMySelf((*it)->begin(),(*it)->end(),true));
8309       MCAuto<DataArrayInt> cell;
8310       switch(mdim)
8311       {
8312         case 2:
8313           cell=tmp->buildUnionOf2DMesh();
8314           break;
8315         case 3:
8316           cell=tmp->buildUnionOf3DMesh();
8317           break;
8318         default:
8319           throw INTERP_KERNEL::Exception("MEDCouplingUMesh::buildSpreadZonesWithPoly : meshdimension supported are [2,3] ! Not implemented yet for others !");
8320       }
8321
8322       ret->insertNextCell((INTERP_KERNEL::NormalizedCellType)cell->getIJSafe(0,0),cell->getNumberOfTuples()-1,cell->begin()+1);
8323     }
8324   //
8325   ret->finishInsertingCells();
8326   return ret.retn();
8327 }
8328
8329 /*!
8330  * This method partitions \b this into contiguous zone.
8331  * This method only needs a well defined connectivity. Coordinates are not considered here.
8332  * This method returns a vector of \b newly allocated arrays that the caller has to deal with.
8333  */
8334 std::vector<DataArrayInt *> MEDCouplingUMesh::partitionBySpreadZone() const
8335 {
8336   DataArrayInt *neigh=0,*neighI=0;
8337   computeNeighborsOfCells(neigh,neighI);
8338   MCAuto<DataArrayInt> neighAuto(neigh),neighIAuto(neighI);
8339   return PartitionBySpreadZone(neighAuto,neighIAuto);
8340 }
8341
8342 std::vector<DataArrayInt *> MEDCouplingUMesh::PartitionBySpreadZone(const DataArrayInt *arrIn, const DataArrayInt *arrIndxIn)
8343 {
8344   if(!arrIn || !arrIndxIn)
8345     throw INTERP_KERNEL::Exception("PartitionBySpreadZone : null input pointers !");
8346   arrIn->checkAllocated(); arrIndxIn->checkAllocated();
8347   int nbOfTuples(arrIndxIn->getNumberOfTuples());
8348   if(arrIn->getNumberOfComponents()!=1 || arrIndxIn->getNumberOfComponents()!=1 || nbOfTuples<1)
8349     throw INTERP_KERNEL::Exception("PartitionBySpreadZone : invalid arrays in input !");
8350   int nbOfCellsCur(nbOfTuples-1);
8351   std::vector<DataArrayInt *> ret;
8352   if(nbOfCellsCur<=0)
8353     return ret;
8354   std::vector<bool> fetchedCells(nbOfCellsCur,false);
8355   std::vector< MCAuto<DataArrayInt> > ret2;
8356   int seed=0;
8357   while(seed<nbOfCellsCur)
8358     {
8359       int nbOfPeelPerformed=0;
8360       ret2.push_back(ComputeSpreadZoneGraduallyFromSeedAlg(fetchedCells,&seed,&seed+1,arrIn,arrIndxIn,-1,nbOfPeelPerformed));
8361       seed=(int)std::distance(fetchedCells.begin(),std::find(fetchedCells.begin()+seed,fetchedCells.end(),false));
8362     }
8363   for(std::vector< MCAuto<DataArrayInt> >::iterator it=ret2.begin();it!=ret2.end();it++)
8364     ret.push_back((*it).retn());
8365   return ret;
8366 }
8367
8368 /*!
8369  * This method returns given a distribution of cell type (returned for example by MEDCouplingUMesh::getDistributionOfTypes method and customized after) a
8370  * newly allocated DataArrayInt instance with 2 components ready to be interpreted as input of DataArrayInt::findRangeIdForEachTuple method.
8371  *
8372  * \param [in] code a code with the same format than those returned by MEDCouplingUMesh::getDistributionOfTypes except for the code[3*k+2] that should contain start id of chunck.
8373  * \return a newly allocated DataArrayInt to be managed by the caller.
8374  * \throw In case of \a code has not the right format (typically of size 3*n)
8375  */
8376 DataArrayInt *MEDCouplingUMesh::ComputeRangesFromTypeDistribution(const std::vector<int>& code)
8377 {
8378   MCAuto<DataArrayInt> ret=DataArrayInt::New();
8379   std::size_t nb=code.size()/3;
8380   if(code.size()%3!=0)
8381     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::ComputeRangesFromTypeDistribution : invalid input code !");
8382   ret->alloc((int)nb,2);
8383   int *retPtr=ret->getPointer();
8384   for(std::size_t i=0;i<nb;i++,retPtr+=2)
8385     {
8386       retPtr[0]=code[3*i+2];
8387       retPtr[1]=code[3*i+2]+code[3*i+1];
8388     }
8389   return ret.retn();
8390 }
8391
8392 /*!
8393  * This method expects that \a this a 3D mesh (spaceDim=3 and meshDim=3) with all coordinates and connectivities set.
8394  * All cells in \a this are expected to be linear 3D cells.
8395  * This method will split **all** 3D cells in \a this into INTERP_KERNEL::NORM_TETRA4 cells and put them in the returned mesh.
8396  * It leads to an increase to number of cells.
8397  * This method contrary to MEDCouplingUMesh::simplexize can append coordinates in \a this to perform its work.
8398  * The \a nbOfAdditionalPoints returned value informs about it. If > 0, the coordinates array in returned mesh will have \a nbOfAdditionalPoints
8399  * more tuples (nodes) than in \a this. Anyway, all the nodes in \a this (with the same order) will be in the returned mesh.
8400  *
8401  * \param [in] policy - the policy of splitting that must be in (PLANAR_FACE_5, PLANAR_FACE_6, GENERAL_24, GENERAL_48). The policy will be used only for INTERP_KERNEL::NORM_HEXA8 cells.
8402  *                      For all other cells, the splitting policy will be ignored. See INTERP_KERNEL::SplittingPolicy for the images.
8403  * \param [out] nbOfAdditionalPoints - number of nodes added to \c this->_coords. If > 0 a new coordinates object will be constructed result of the aggregation of the old one and the new points added.
8404  * \param [out] n2oCells - A new instance of DataArrayInt holding, for each new cell,
8405  *          an id of old cell producing it. The caller is to delete this array using
8406  *         decrRef() as it is no more needed.
8407  * \return MEDCoupling1SGTUMesh * - the mesh containing only INTERP_KERNEL::NORM_TETRA4 cells.
8408  *
8409  * \warning This method operates on each cells in this independently ! So it can leads to non conform mesh in returned value ! If you expect to have a conform mesh in output
8410  * the policy PLANAR_FACE_6 should be used on a mesh sorted with MEDCoupling1SGTUMesh::sortHexa8EachOther.
8411  *
8412  * \throw If \a this is not a 3D mesh (spaceDim==3 and meshDim==3).
8413  * \throw If \a this is not fully constituted with linear 3D cells.
8414  * \sa MEDCouplingUMesh::simplexize, MEDCoupling1SGTUMesh::sortHexa8EachOther
8415  */
8416 MEDCoupling1SGTUMesh *MEDCouplingUMesh::tetrahedrize(int policy, DataArrayInt *& n2oCells, int& nbOfAdditionalPoints) const
8417 {
8418   INTERP_KERNEL::SplittingPolicy pol((INTERP_KERNEL::SplittingPolicy)policy);
8419   checkConnectivityFullyDefined();
8420   if(getMeshDimension()!=3 || getSpaceDimension()!=3)
8421     throw INTERP_KERNEL::Exception("MEDCouplingUMesh::tetrahedrize : only available for mesh with meshdim == 3 and spacedim == 3 !");
8422   int nbOfCells(getNumberOfCells()),nbNodes(getNumberOfNodes());
8423   MCAuto<MEDCoupling1SGTUMesh> ret0(MEDCoupling1SGTUMesh::New(getName(),INTERP_KERNEL::NORM_TETRA4));
8424   MCAuto<DataArrayInt> ret(DataArrayInt::New()); ret->alloc(nbOfCells,1);
8425   int *retPt(ret->getPointer());
8426   MCAuto<DataArrayInt> newConn(DataArrayInt::New()); newConn->alloc(0,1);
8427   MCAuto<DataArrayDouble> addPts(DataArrayDouble::New()); addPts->alloc(0,1);
8428   const int *oldc(_nodal_connec->begin());
8429   const int *oldci(_nodal_connec_index->begin());
8430   const double *coords(_coords->begin());
8431   for(int i=0;i<nbOfCells;i++,oldci++,retPt++)
8432     {
8433       std::vector<int> a; std::vector<double> b;
8434       INTERP_KERNEL::SplitIntoTetras(pol,(INTERP_KERNEL::NormalizedCellType)oldc[oldci[0]],oldc+oldci[0]+1,oldc+oldci[1],coords,a,b);
8435       std::size_t nbOfTet(a.size()/4); *retPt=(int)nbOfTet;
8436       const int *aa(&a[0]);
8437       if(!b.empty())
8438         {
8439           for(std::vector<int>::iterator it=a.begin();it!=a.end();it++)
8440             if(*it<0)
8441               *it=(-(*(it))-1+nbNodes);
8442           addPts->insertAtTheEnd(b.begin(),b.end());
8443           nbNodes+=(int)b.size()/3;
8444         }
8445       for(std::size_t j=0;j<nbOfTet;j++,aa+=4)
8446         newConn->insertAtTheEnd(aa,aa+4);
8447     }
8448   if(!addPts->empty())
8449     {
8450       addPts->rearrange(3);
8451       nbOfAdditionalPoints=addPts->getNumberOfTuples();
8452       addPts=DataArrayDouble::Aggregate(getCoords(),addPts);
8453       ret0->setCoords(addPts);
8454     }
8455   else
8456     {
8457       nbOfAdditionalPoints=0;
8458       ret0->setCoords(getCoords());
8459     }
8460   ret0->setNodalConnectivity(newConn);
8461   //
8462   ret->computeOffsetsFull();
8463   n2oCells=ret->buildExplicitArrOfSliceOnScaledArr(0,nbOfCells,1);
8464   return ret0.retn();
8465 }
8466
8467 MEDCouplingUMeshCellIterator::MEDCouplingUMeshCellIterator(MEDCouplingUMesh *mesh):_mesh(mesh),_cell(new MEDCouplingUMeshCell(mesh)),
8468     _own_cell(true),_cell_id(-1),_nb_cell(0)
8469 {
8470   if(mesh)
8471     {
8472       mesh->incrRef();
8473       _nb_cell=mesh->getNumberOfCells();
8474     }
8475 }
8476
8477 MEDCouplingUMeshCellIterator::~MEDCouplingUMeshCellIterator()
8478 {
8479   if(_mesh)
8480     _mesh->decrRef();
8481   if(_own_cell)
8482     delete _cell;
8483 }
8484
8485 MEDCouplingUMeshCellIterator::MEDCouplingUMeshCellIterator(MEDCouplingUMesh *mesh, MEDCouplingUMeshCell *itc, int bg, int end):_mesh(mesh),_cell(itc),
8486     _own_cell(false),_cell_id(bg-1),
8487     _nb_cell(end)
8488 {
8489   if(mesh)
8490     mesh->incrRef();
8491 }
8492
8493 MEDCouplingUMeshCell *MEDCouplingUMeshCellIterator::nextt()
8494 {
8495   _cell_id++;
8496   if(_cell_id<_nb_cell)
8497     {
8498       _cell->next();
8499       return _cell;
8500     }
8501   else
8502     return 0;
8503 }
8504
8505 MEDCouplingUMeshCellByTypeEntry::MEDCouplingUMeshCellByTypeEntry(MEDCouplingUMesh *mesh):_mesh(mesh)
8506 {
8507   if(_mesh)
8508     _mesh->incrRef();
8509 }
8510
8511 MEDCouplingUMeshCellByTypeIterator *MEDCouplingUMeshCellByTypeEntry::iterator()
8512 {
8513   return new MEDCouplingUMeshCellByTypeIterator(_mesh);
8514 }
8515
8516 MEDCouplingUMeshCellByTypeEntry::~MEDCouplingUMeshCellByTypeEntry()
8517 {
8518   if(_mesh)
8519     _mesh->decrRef();
8520 }
8521
8522 MEDCouplingUMeshCellEntry::MEDCouplingUMeshCellEntry(MEDCouplingUMesh *mesh,  INTERP_KERNEL::NormalizedCellType type, MEDCouplingUMeshCell *itc, int bg, int end):_mesh(mesh),_type(type),
8523     _itc(itc),
8524     _bg(bg),_end(end)
8525 {
8526   if(_mesh)
8527     _mesh->incrRef();
8528 }
8529
8530 MEDCouplingUMeshCellEntry::~MEDCouplingUMeshCellEntry()
8531 {
8532   if(_mesh)
8533     _mesh->decrRef();
8534 }
8535
8536 INTERP_KERNEL::NormalizedCellType MEDCouplingUMeshCellEntry::getType() const
8537 {
8538   return _type;
8539 }
8540
8541 int MEDCouplingUMeshCellEntry::getNumberOfElems() const
8542 {
8543   return _end-_bg;
8544 }
8545
8546 MEDCouplingUMeshCellIterator *MEDCouplingUMeshCellEntry::iterator()
8547 {
8548   return new MEDCouplingUMeshCellIterator(_mesh,_itc,_bg,_end);
8549 }
8550
8551 MEDCouplingUMeshCellByTypeIterator::MEDCouplingUMeshCellByTypeIterator(MEDCouplingUMesh *mesh):_mesh(mesh),_cell(new MEDCouplingUMeshCell(mesh)),_cell_id(0),_nb_cell(0)
8552 {
8553   if(mesh)
8554     {
8555       mesh->incrRef();
8556       _nb_cell=mesh->getNumberOfCells();
8557     }
8558 }
8559
8560 MEDCouplingUMeshCellByTypeIterator::~MEDCouplingUMeshCellByTypeIterator()
8561 {
8562   if(_mesh)
8563     _mesh->decrRef();
8564   delete _cell;
8565 }
8566
8567 MEDCouplingUMeshCellEntry *MEDCouplingUMeshCellByTypeIterator::nextt()
8568 {
8569   const int *c=_mesh->getNodalConnectivity()->begin();
8570   const int *ci=_mesh->getNodalConnectivityIndex()->begin();
8571   if(_cell_id<_nb_cell)
8572     {
8573       INTERP_KERNEL::NormalizedCellType type=(INTERP_KERNEL::NormalizedCellType)c[ci[_cell_id]];
8574       int nbOfElems=(int)std::distance(ci+_cell_id,std::find_if(ci+_cell_id,ci+_nb_cell,MEDCouplingImpl::ConnReader(c,type)));
8575       int startId=_cell_id;
8576       _cell_id+=nbOfElems;
8577       return new MEDCouplingUMeshCellEntry(_mesh,type,_cell,startId,_cell_id);
8578     }
8579   else
8580     return 0;
8581 }
8582
8583 MEDCouplingUMeshCell::MEDCouplingUMeshCell(MEDCouplingUMesh *mesh):_conn(0),_conn_indx(0),_conn_lgth(NOTICABLE_FIRST_VAL)
8584 {
8585   if(mesh)
8586     {
8587       _conn=mesh->getNodalConnectivity()->getPointer();
8588       _conn_indx=mesh->getNodalConnectivityIndex()->getPointer();
8589     }
8590 }
8591
8592 void MEDCouplingUMeshCell::next()
8593 {
8594   if(_conn_lgth!=NOTICABLE_FIRST_VAL)
8595     {
8596       _conn+=_conn_lgth;
8597       _conn_indx++;
8598     }
8599   _conn_lgth=_conn_indx[1]-_conn_indx[0];
8600 }
8601
8602 std::string MEDCouplingUMeshCell::repr() const
8603 {
8604   if(_conn_lgth!=NOTICABLE_FIRST_VAL)
8605     {
8606       std::ostringstream oss; oss << "Cell Type " << INTERP_KERNEL::CellModel::GetCellModel((INTERP_KERNEL::NormalizedCellType)_conn[0]).getRepr();
8607       oss << " : ";
8608       std::copy(_conn+1,_conn+_conn_lgth,std::ostream_iterator<int>(oss," "));
8609       return oss.str();
8610     }
8611   else
8612     return std::string("MEDCouplingUMeshCell::repr : Invalid pos");
8613 }
8614
8615 INTERP_KERNEL::NormalizedCellType MEDCouplingUMeshCell::getType() const
8616 {
8617   if(_conn_lgth!=NOTICABLE_FIRST_VAL)
8618     return (INTERP_KERNEL::NormalizedCellType)_conn[0];
8619   else
8620     return INTERP_KERNEL::NORM_ERROR;
8621 }
8622
8623 const int *MEDCouplingUMeshCell::getAllConn(int& lgth) const
8624 {
8625   lgth=_conn_lgth;
8626   if(_conn_lgth!=NOTICABLE_FIRST_VAL)
8627     return _conn;
8628   else
8629     return 0;
8630 }