Salome HOME
Correct bug on CMesh with no profiles !
[modules/med.git] / src / MEDLoader / MEDFileFieldOverView.cxx
1 // Copyright (C) 2007-2013  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.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19 // Author : Anthony Geay (CEA/DEN)
20
21 #include "MEDFileFieldOverView.hxx"
22 #include "MEDFileField.hxx"
23 #include "MEDFileMesh.hxx"
24
25 #include "CellModel.hxx"
26
27 using namespace ParaMEDMEM;
28
29 const unsigned char MEDMeshMultiLev::PARAMEDMEM_2_VTKTYPE[MEDMeshMultiLev::PARAMEDMEM_2_VTKTYPE_LGTH]=
30   {1,3,21,5,9,7,22,34,23,28,255,255,255,255,10,14,13,255,12,255,24,255,16,27,255,26,255,29,255,255,25,42,36,4};
31
32 const char MEDFileField1TSStructItem2::NEWLY_CREATED_PFL_NAME[]="???";
33
34 MEDFileMeshStruct *MEDFileMeshStruct::New(const MEDFileMesh *mesh)
35 {
36   return new MEDFileMeshStruct(mesh);
37 }
38
39 std::size_t MEDFileMeshStruct::getHeapMemorySizeWithoutChildren() const
40 {
41   std::size_t ret(0);
42   for(std::vector< std::vector<int> >::const_iterator it0=_geo_types_distrib.begin();it0!=_geo_types_distrib.end();it0++)
43     ret+=(*it0).capacity()*sizeof(int);
44   ret+=_geo_types_distrib.capacity()*sizeof(std::vector<int>);
45   return ret;
46 }
47
48 std::vector<const BigMemoryObject *> MEDFileMeshStruct::getDirectChildren() const
49 {
50   return std::vector<const BigMemoryObject *>();
51 }
52
53 MEDFileMeshStruct::MEDFileMeshStruct(const MEDFileMesh *mesh):_mesh(mesh)
54 {
55   std::vector<int> levs(mesh->getNonEmptyLevels());
56   _name=mesh->getName();
57   _nb_nodes=mesh->getNumberOfNodes();
58   _geo_types_distrib.resize(levs.size());
59   for(std::vector<int>::const_iterator lev=levs.begin();lev!=levs.end();lev++)
60     _geo_types_distrib[-(*lev)]=mesh->getDistributionOfTypes(*lev);
61 }
62
63 int MEDFileMeshStruct::getLevelOfGeoType(INTERP_KERNEL::NormalizedCellType t) const
64 {
65   int j=0;
66   for(std::vector< std::vector<int> >::const_iterator it1=_geo_types_distrib.begin();it1!=_geo_types_distrib.end();it1++,j--)
67     {
68       std::size_t sz=(*it1).size();
69       if(sz%3!=0)
70         throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getLevelOfGeoType : internal error in code !");
71       std::size_t nbGeo=sz/3;
72       for(std::size_t i=0;i<nbGeo;i++)
73         if((*it1)[3*i]==(int)t)
74           return j;
75     }
76   throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getLevelOfGeoType : The specified geometric type is not present in the mesh structure !");
77 }
78
79 int MEDFileMeshStruct::getNumberOfElemsOfGeoType(INTERP_KERNEL::NormalizedCellType t) const
80 {
81   for(std::vector< std::vector<int> >::const_iterator it1=_geo_types_distrib.begin();it1!=_geo_types_distrib.end();it1++)
82     {
83       std::size_t sz=(*it1).size();
84       if(sz%3!=0)
85         throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getNumberOfElemsOfGeoType : internal error in code !");
86       std::size_t nbGeo=sz/3;
87       for(std::size_t i=0;i<nbGeo;i++)
88         if((*it1)[3*i]==(int)t)
89           return (*it1)[3*i+1];
90     }
91   throw INTERP_KERNEL::Exception("The specified geometric type is not present in the mesh structure !");
92 }
93
94 int MEDFileMeshStruct::getNumberOfLevs() const
95 {
96   return (int)_geo_types_distrib.size();
97 }
98
99 int MEDFileMeshStruct::getNumberOfGeoTypesInLev(int relativeLev) const
100 {
101   int pos(-relativeLev);
102   if(pos<0 || pos>=(int)_geo_types_distrib.size())
103     throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getNumberOfGeoTypesInLev : invalid level specified !");
104   std::size_t sz=_geo_types_distrib[pos].size();
105   if(sz%3!=0)
106     throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getNumberOfGeoTypesInLev : internal error in code !");
107   return (int)(sz/3);
108 }
109
110 //=
111
112 std::size_t MEDMeshMultiLev::getHeapMemorySizeWithoutChildren() const
113 {
114   return 0;
115 }
116
117 std::vector<const BigMemoryObject *> MEDMeshMultiLev::getDirectChildren() const
118 {
119   return std::vector<const BigMemoryObject *>();
120 }
121
122 MEDMeshMultiLev *MEDMeshMultiLev::New(const MEDFileMesh *m, const std::vector<int>& levs)
123 {
124   if(!m)
125     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New : null input pointer !");
126   const MEDFileUMesh *um(dynamic_cast<const MEDFileUMesh *>(m));
127   if(um)
128     return MEDUMeshMultiLev::New(um,levs);
129   const MEDFileCMesh *cm(dynamic_cast<const MEDFileCMesh *>(m));
130   if(cm)
131     return MEDCMeshMultiLev::New(cm,levs);
132   const MEDFileCurveLinearMesh *clm(dynamic_cast<const MEDFileCurveLinearMesh *>(m));
133   if(clm)
134     return MEDCurveLinearMeshMultiLev::New(clm,levs);
135   throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New : unrecognized type of mesh ! Must be in [MEDFileUMesh,MEDFileCMesh,MEDFileCurveLinearMesh] !");
136 }
137
138 MEDMeshMultiLev *MEDMeshMultiLev::New(const MEDFileMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities)
139 {
140   if(!m)
141     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New 2 : null input pointer !");
142   const MEDFileUMesh *um(dynamic_cast<const MEDFileUMesh *>(m));
143   if(um)
144     return MEDUMeshMultiLev::New(um,gts,pfls,nbEntities);
145   const MEDFileCMesh *cm(dynamic_cast<const MEDFileCMesh *>(m));
146   if(cm)
147     return MEDCMeshMultiLev::New(cm,gts,pfls,nbEntities);
148   const MEDFileCurveLinearMesh *clm(dynamic_cast<const MEDFileCurveLinearMesh *>(m));
149   if(clm)
150     return MEDCurveLinearMeshMultiLev::New(clm,gts,pfls,nbEntities);
151   throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New 2 : unrecognized type of mesh ! Must be in [MEDFileUMesh,MEDFileCMesh,MEDFileCurveLinearMesh] !");
152 }
153
154 MEDMeshMultiLev *MEDMeshMultiLev::NewOnlyOnNode(const MEDFileMesh *m, const DataArrayInt *pflOnNode)
155 {
156   MEDCouplingAutoRefCountObjectPtr<MEDMeshMultiLev> ret(MEDMeshMultiLev::New(m,m->getNonEmptyLevels()));
157   ret->selectPartOfNodes(pflOnNode);
158   return ret.retn();
159 }
160
161 void MEDMeshMultiLev::setNodeReduction(const DataArrayInt *nr)
162 {
163   if(nr)
164     nr->incrRef();
165   _node_reduction=const_cast<DataArrayInt*>(nr);
166 }
167
168 bool MEDMeshMultiLev::isFastlyTheSameStruct(const MEDFileField1TSStructItem& fst, const MEDFileFieldGlobsReal *globs) const
169 {
170   if(fst.getType()==ON_NODES)
171     {
172       if(fst.getNumberOfItems()!=1)
173         throw INTERP_KERNEL::Exception("MEDMeshMultiLev::isFastlyTheSameStruct : unexpected situation for nodes !");
174       const MEDFileField1TSStructItem2& p(fst[0]);
175       std::string pflName(p.getPflName());
176       const DataArrayInt *nr(_node_reduction);
177       if(pflName.empty() && !nr)
178         return true;
179       if(pflName==nr->getName())
180         return true;
181       return false;
182     }
183   else
184     {
185       std::size_t sz(fst.getNumberOfItems());
186       if(sz!=_geo_types.size())
187         return false;
188       int strt(0);
189       for(std::size_t i=0;i<sz;i++)
190         {
191           const MEDFileField1TSStructItem2& p(fst[i]);
192           if(!p.isFastlyEqual(strt,_geo_types[i],getPflNameOfId(i).c_str()))
193             return false;
194         }
195       return true;
196     }
197 }
198
199 DataArray *MEDMeshMultiLev::buildDataArray(const MEDFileField1TSStructItem& fst, const MEDFileFieldGlobsReal *globs, const DataArray *vals) const
200 {
201   MEDCouplingAutoRefCountObjectPtr<DataArray> ret(const_cast<DataArray *>(vals)); ret->incrRef();
202   if(isFastlyTheSameStruct(fst,globs))
203     return ret.retn();
204   else
205     return constructDataArray(fst,globs,vals);
206 }
207
208 /*!
209  * \param [out] famIds - Can be null. If not null the instance has to be dealt by the caller (decrRef).
210  * \param [out] isWithoutCopy - When true the returned instance \a famIds if not null is directly those in the data structure.
211  */
212 void MEDMeshMultiLev::retrieveFamilyIdsOnCells(DataArrayInt *& famIds, bool& isWithoutCopy) const
213 {
214   const DataArrayInt *fids(_cell_fam_ids);
215   if(!fids)
216     { famIds=0; isWithoutCopy=true; return ; }
217   std::size_t sz(_geo_types.size());
218   bool presenceOfPfls(false);
219   for(std::size_t i=0;i<sz && !presenceOfPfls;i++)
220     {
221       const DataArrayInt *pfl(_pfls[i]);
222       if(pfl)
223         presenceOfPfls=true;
224     }
225   if(!presenceOfPfls)
226     { famIds=const_cast<DataArrayInt *>(fids); famIds->incrRef(); isWithoutCopy=_cell_fam_ids_nocpy; return ; }
227   //bad luck the slowest part
228   isWithoutCopy=false;
229   std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > retSafe(sz);
230   std::vector< const DataArrayInt *> ret(sz);
231   int start(0);
232   for(std::size_t i=0;i<sz;i++)
233     {
234       const DataArrayInt *pfl(_pfls[i]);
235       int lgth(_nb_entities[i]);
236       if(pfl)
237         {
238           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp(fids->selectByTupleId2(start,start+lgth,1));
239           retSafe[i]=tmp->selectByTupleIdSafe(pfl->begin(),pfl->end());
240         }
241       else
242         {
243           retSafe[i]=fids->selectByTupleId2(start,start+lgth,1);
244         }
245       ret[i]=retSafe[i];
246       start+=lgth;
247     }
248   famIds=DataArrayInt::Aggregate(ret);
249 }
250
251 /*!
252  * \param [out] numIds - Can be null. If not null the instance has to be dealt by the caller (decrRef).
253  * \param [out] isWithoutCopy - When true the returned instance \a numIds if not null is directly those in the data structure.
254  */
255 void MEDMeshMultiLev::retrieveNumberIdsOnCells(DataArrayInt *& numIds, bool& isWithoutCopy) const
256 {
257   const DataArrayInt *nids(_cell_num_ids);
258   if(!nids)
259     { numIds=0; isWithoutCopy=true; return ; }
260   std::size_t sz(_geo_types.size());
261   bool presenceOfPfls(false);
262   for(std::size_t i=0;i<sz && !presenceOfPfls;i++)
263     {
264       const DataArrayInt *pfl(_pfls[i]);
265       if(pfl)
266         presenceOfPfls=true;
267     }
268   if(!presenceOfPfls)
269     { numIds=const_cast<DataArrayInt *>(nids); numIds->incrRef(); isWithoutCopy=_cell_num_ids_nocpy; return ; }
270   //bad luck the slowest part
271   isWithoutCopy=false;
272   std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > retSafe(sz);
273   std::vector< const DataArrayInt *> ret(sz);
274   int start(0);
275   for(std::size_t i=0;i<sz;i++)
276     {
277       const DataArrayInt *pfl(_pfls[i]);
278       int lgth(_nb_entities[i]);
279       if(pfl)
280         {
281           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp(nids->selectByTupleId2(start,start+lgth,1));
282           retSafe[i]=tmp->selectByTupleIdSafe(pfl->begin(),pfl->end());
283         }
284       else
285         {
286           retSafe[i]=nids->selectByTupleId2(start,start+lgth,1);
287         }
288       ret[i]=retSafe[i];
289       start+=lgth;
290     }
291   numIds=DataArrayInt::Aggregate(ret);
292 }
293
294 /*!
295  * \param [out] famIds - Can be null. If not null the instance has to be dealt by the caller (decrRef).
296  * \param [out] isWithoutCopy - When true the returned instance \a famIds if not null is directly those in the data structure.
297  */
298 void MEDMeshMultiLev::retrieveFamilyIdsOnNodes(DataArrayInt *& famIds, bool& isWithoutCopy) const
299 {
300   const DataArrayInt *fids(_node_fam_ids);
301   if(!fids)
302     { famIds=0; isWithoutCopy=true; return ; }
303   const DataArrayInt *nr(_node_reduction);
304   if(nr)
305     {
306       isWithoutCopy=false;
307       famIds=fids->selectByTupleIdSafe(nr->begin(),nr->end());
308     }
309   else
310     {
311       isWithoutCopy=_node_fam_ids_nocpy;
312       famIds=const_cast<DataArrayInt *>(fids); famIds->incrRef();
313     }
314 }
315
316 /*!
317  * \param [out] numIds - Can be null. If not null the instance has to be dealt by the caller (decrRef).
318  * \param [out] isWithoutCopy - When true the returned instance \a numIds if not null is directly those in the data structure.
319  */
320 void MEDMeshMultiLev::retrieveNumberIdsOnNodes(DataArrayInt *& numIds, bool& isWithoutCopy) const
321 {
322   const DataArrayInt *fids(_node_num_ids);
323   if(!fids)
324     { numIds=0; isWithoutCopy=true; return ; }
325   const DataArrayInt *nr(_node_reduction);
326   if(nr)
327     {
328       isWithoutCopy=false;
329       numIds=fids->selectByTupleIdSafe(nr->begin(),nr->end());
330     }
331   else
332     {
333       isWithoutCopy=_node_num_ids_nocpy;
334       numIds=const_cast<DataArrayInt *>(fids); numIds->incrRef();
335     }
336 }
337
338 void MEDMeshMultiLev::setFamilyIdsOnCells(DataArrayInt *famIds, bool isNoCopy)
339 {
340   _cell_fam_ids=famIds;
341   if(famIds)
342     famIds->incrRef();
343   _cell_fam_ids_nocpy=isNoCopy;
344 }
345
346 void MEDMeshMultiLev::setNumberIdsOnCells(DataArrayInt *numIds, bool isNoCopy)
347 {
348   _cell_num_ids=numIds;
349   if(numIds)
350     numIds->incrRef();
351   _cell_num_ids_nocpy=isNoCopy;
352 }
353
354 void MEDMeshMultiLev::setFamilyIdsOnNodes(DataArrayInt *famIds, bool isNoCopy)
355 {
356   _node_fam_ids=famIds;
357   if(famIds)
358     famIds->incrRef();
359   _node_fam_ids_nocpy=isNoCopy;
360 }
361
362 void MEDMeshMultiLev::setNumberIdsOnNodes(DataArrayInt *numIds, bool isNoCopy)
363 {
364   _node_num_ids=numIds;
365   if(numIds)
366     numIds->incrRef();
367   _node_num_ids_nocpy=isNoCopy;
368 }
369
370 std::string MEDMeshMultiLev::getPflNameOfId(int id) const
371 {
372   std::size_t sz(_pfls.size());
373   if(id<0 || id>=(int)sz)
374     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::getPflNameOfId : invalid input id !");
375   const DataArrayInt *pfl(_pfls[id]);
376   if(!pfl)
377     return std::string("");
378   return pfl->getName();
379 }
380
381 /*!
382  * Returns the number of cells having geometric type \a t.
383  * The profiles are **NOT** taken into account here.
384  */
385 int MEDMeshMultiLev::getNumberOfCells(INTERP_KERNEL::NormalizedCellType t) const
386 {
387   std::size_t sz(_nb_entities.size());
388   for(std::size_t i=0;i<sz;i++)
389     if(_geo_types[i]==t)
390         return _nb_entities[i];
391   throw INTERP_KERNEL::Exception("MEDMeshMultiLev::getNumberOfCells : not existing geometric type in this !");
392 }
393
394 int MEDMeshMultiLev::getNumberOfNodes() const
395 {
396   return _nb_nodes;
397 }
398
399 DataArray *MEDMeshMultiLev::constructDataArray(const MEDFileField1TSStructItem& fst, const MEDFileFieldGlobsReal *globs, const DataArray *vals) const
400 {
401   if(fst.getType()==ON_NODES)
402     {
403       if(fst.getNumberOfItems()!=1)
404         throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes !");
405       const MEDFileField1TSStructItem2& p(fst[0]);
406       std::string pflName(p.getPflName());
407       const DataArrayInt *nr(_node_reduction);
408       if(pflName.empty() && !nr)
409         return vals->deepCpy();
410       if(pflName.empty() && nr)
411          throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 2 !");
412       if(!pflName.empty() && nr)
413         {
414           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(globs->getProfile(pflName.c_str())->deepCpy());
415           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p2(nr->deepCpy());
416           p1->sort(true); p2->sort(true);
417           if(!p1->isEqualWithoutConsideringStr(*p2))
418             throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 3 !");
419           p1=DataArrayInt::FindPermutationFromFirstToSecond(globs->getProfile(pflName.c_str()),nr);
420           MEDCouplingAutoRefCountObjectPtr<DataArray> ret(vals->deepCpy());
421           ret->renumberInPlace(p1->begin());
422           return ret.retn();
423         }
424       if(!pflName.empty() && !nr)
425         {
426           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(globs->getProfile(pflName.c_str())->deepCpy());
427           p1->sort(true);
428           if(!p1->isIdentity() || p1->getNumberOfTuples()!=getNumberOfNodes())
429             throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 4 !");
430           MEDCouplingAutoRefCountObjectPtr<DataArray> ret(vals->deepCpy());
431           ret->renumberInPlace(globs->getProfile(pflName.c_str())->begin());
432           return ret.retn();
433         }
434       throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 5 !");
435     }
436   else
437     {
438       std::size_t sz(fst.getNumberOfItems());
439       std::set<INTERP_KERNEL::NormalizedCellType> s(_geo_types.begin(),_geo_types.end());
440       if(s.size()!=_geo_types.size())
441         throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 2 !");
442       std::vector< const DataArray *> arr(s.size());
443       std::vector< MEDCouplingAutoRefCountObjectPtr<DataArray> > arrSafe(s.size());
444       int iii(0);
445       int nc(vals->getNumberOfComponents());
446       std::vector<std::string> compInfo(vals->getInfoOnComponents());
447       for(std::vector< INTERP_KERNEL::NormalizedCellType >::const_iterator it=_geo_types.begin();it!=_geo_types.end();it++,iii++)
448         {
449           const DataArrayInt *thisP(_pfls[iii]);
450           std::vector<const MEDFileField1TSStructItem2 *> ps;
451           for(std::size_t i=0;i<sz;i++)
452             {
453               const MEDFileField1TSStructItem2& p(fst[i]);
454               if(p.getGeo()==*it)
455                 ps.push_back(&p);
456             }
457           if(ps.empty())
458             throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 1 !");
459           if(ps.size()==1)
460             {
461               int nbi(ps[0]->getNbOfIntegrationPts(globs));
462               const DataArrayInt *otherP(ps[0]->getPfl(globs));
463               const std::pair<int,int>& strtStop(ps[0]->getStartStop());
464               MEDCouplingAutoRefCountObjectPtr<DataArray> ret(vals->selectByTupleId2(strtStop.first,strtStop.second,1));
465               if(!thisP && !otherP)
466                 {
467                   arrSafe[iii]=ret; arr[iii]=ret;
468                   continue;
469                 }
470               if(thisP && otherP)
471                 {
472                   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(otherP->invertArrayN2O2O2N(getNumberOfCells(ps[0]->getGeo())));
473                   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p2(thisP->deepCpy());
474                   p2->transformWithIndArr(p1->begin(),p1->end());
475                   //p1=p2->getIdsNotEqual(-1);
476                   //p1=p2->selectByTupleIdSafe(p1->begin(),p1->end());
477                   ret->rearrange(nbi*nc); ret=ret->selectByTupleIdSafe(p2->begin(),p2->end()); ret->rearrange(nc); ret->setInfoOnComponents(compInfo);
478                   arrSafe[iii]=ret; arr[iii]=ret;
479                   continue;
480                 }
481               if(!thisP && otherP)
482                 {
483                   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(otherP->deepCpy());
484                   p1->sort(true);
485                   p1->checkAllIdsInRange(0,getNumberOfCells(ps[0]->getGeo()));
486                   p1=DataArrayInt::FindPermutationFromFirstToSecond(otherP,p1);
487                   ret->rearrange(nbi*nc); ret->renumberInPlace(p1->begin()); ret->rearrange(nc); ret->setInfoOnComponents(compInfo);
488                   arrSafe[iii]=ret; arr[iii]=ret;
489                   continue;
490                 }
491               throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 3 !");
492             }
493           else
494             {
495               std::vector< const DataArrayInt * >otherPS(ps.size());
496               std::vector< const DataArray * > arr2(ps.size());
497               std::vector< MEDCouplingAutoRefCountObjectPtr<DataArray> > arr2Safe(ps.size());
498               std::vector< const DataArrayInt * > nbis(ps.size());
499               std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > nbisSafe(ps.size());
500               int jj(0);
501               for(std::vector<const MEDFileField1TSStructItem2 *>::const_iterator it2=ps.begin();it2!=ps.end();it2++,jj++)
502                 {
503                   int nbi((*it2)->getNbOfIntegrationPts(globs));
504                   const DataArrayInt *otherPfl((*it2)->getPfl(globs));
505                   const std::pair<int,int>& strtStop((*it2)->getStartStop());
506                   MEDCouplingAutoRefCountObjectPtr<DataArray> ret2(vals->selectByTupleId2(strtStop.first,strtStop.second,1));
507                   if(!otherPfl)
508                     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 4 !");
509                   arr2[jj]=ret2; arr2Safe[jj]=ret2; otherPS[jj]=otherPfl;
510                   nbisSafe[jj]=DataArrayInt::New(); nbisSafe[jj]->alloc(otherPfl->getNumberOfTuples(),1); nbisSafe[jj]->fillWithValue(nbi);
511                   nbis[jj]=nbisSafe[jj];
512                 }
513               MEDCouplingAutoRefCountObjectPtr<DataArray> arr3(DataArray::Aggregate(arr2));
514               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> otherP(DataArrayInt::Aggregate(otherPS));
515               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> zenbis(DataArrayInt::Aggregate(nbis));
516               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> otherPN(otherP->invertArrayN2O2O2N(getNumberOfCells(*it)));
517               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1;
518               if(thisP)
519                 p1=DataArrayInt::FindPermutationFromFirstToSecond(otherP,thisP);
520               else
521                 p1=otherP->deepCpy();
522               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> zenbisN(zenbis->renumber(p1->begin()));
523               zenbisN->computeOffsets2();
524               jj=0;
525               for(std::vector<const MEDFileField1TSStructItem2 *>::const_iterator it2=ps.begin();it2!=ps.end();it2++,jj++)
526                 {
527                   //int nbi((*it2)->getNbOfIntegrationPts(globs));
528                   const DataArrayInt *otherPfl((*it2)->getPfl(globs));
529                   const std::pair<int,int>& strtStop((*it2)->getStartStop());
530                   MEDCouplingAutoRefCountObjectPtr<DataArray> ret2(vals->selectByTupleId2(strtStop.first,strtStop.second,1));
531                   //
532                   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p2(otherPfl->deepCpy());
533                   p2->transformWithIndArr(otherPN->begin(),otherPN->end());
534                   p2->transformWithIndArr(p1->begin(),p1->end());
535                   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> idsN(p2->buildExplicitArrByRanges(zenbisN));
536                   arr3->setPartOfValuesBase3(ret2,idsN->begin(),idsN->end(),0,nc,1);
537                 }
538               arrSafe[iii]=arr3; arr[iii]=arr3;
539               continue;
540             }
541         }
542       return DataArray::Aggregate(arr);
543     }
544 }
545
546 MEDMeshMultiLev::MEDMeshMultiLev():_nb_nodes(0),_cell_fam_ids_nocpy(false)
547 {
548 }
549
550 MEDMeshMultiLev::MEDMeshMultiLev(int nbNodes, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):_geo_types(gts),_nb_entities(nbEntities),_nb_nodes(nbNodes),_cell_fam_ids_nocpy(false),_cell_num_ids_nocpy(false),_node_fam_ids_nocpy(false),_node_num_ids_nocpy(false)
551 {
552   std::size_t sz(_geo_types.size());
553   if(sz!=pfls.size() || sz!=nbEntities.size())
554     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::MEDMeshMultiLev : input vector must have the same size !");
555   _pfls.resize(sz);
556   for(std::size_t i=0;i<sz;i++)
557     {
558       if(pfls[i])
559         pfls[i]->incrRef();
560       _pfls[i]=const_cast<DataArrayInt *>(pfls[i]);
561     }
562 }
563
564 MEDMeshMultiLev::MEDMeshMultiLev(const MEDMeshMultiLev& other):RefCountObject(other),_pfls(other._pfls),_geo_types(other._geo_types),_nb_entities(other._nb_entities),_node_reduction(other._node_reduction),_nb_nodes(other._nb_nodes),_cell_fam_ids(other._cell_fam_ids),_cell_fam_ids_nocpy(other._cell_fam_ids_nocpy),_cell_num_ids(other._cell_num_ids),_cell_num_ids_nocpy(other._cell_num_ids_nocpy),_node_fam_ids(other._node_fam_ids),_node_fam_ids_nocpy(other._node_fam_ids_nocpy),_node_num_ids(other._node_num_ids),_node_num_ids_nocpy(other._node_num_ids_nocpy)
565 {
566 }
567
568 //=
569
570 MEDUMeshMultiLev *MEDUMeshMultiLev::New(const MEDFileUMesh *m, const std::vector<int>& levs)
571 {
572   return new MEDUMeshMultiLev(m,levs);
573 }
574
575 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDFileUMesh *m, const std::vector<int>& levs)
576 {
577   if(!m)
578     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev constructor : null input pointer !");
579   std::vector<MEDCoupling1GTUMesh *> v;
580   for(std::vector<int>::const_iterator it=levs.begin();it!=levs.end();it++)
581     {
582       std::vector<MEDCoupling1GTUMesh *> vTmp(m->getDirectUndergroundSingleGeoTypeMeshes(*it));
583       v.insert(v.end(),vTmp.begin(),vTmp.end());
584     }
585   std::size_t sz(v.size());
586   _parts.resize(sz);
587   _pfls.resize(sz);
588   _geo_types.resize(sz);
589   _nb_entities.resize(sz);
590   for(std::size_t i=0;i<sz;i++)
591     {
592       MEDCoupling1GTUMesh *obj(v[i]);
593       if(obj)
594         obj->incrRef();
595       else
596         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev constructor : presence of a null pointer !");
597       _parts[i]=obj;
598       _geo_types[i]=obj->getCellModelEnum();
599       _nb_entities[i]=obj->getNumberOfCells();
600     }
601   // ids fields management
602   _cell_fam_ids_nocpy=(levs.size()==1);
603   if(_cell_fam_ids_nocpy)
604     {
605       const DataArrayInt *tmp(m->getFamilyFieldAtLevel(levs[0]));
606       if(tmp)
607         {
608           tmp->incrRef();
609           _cell_fam_ids=(const_cast<DataArrayInt *>(tmp));
610         }
611     }
612   else
613     {
614       std::vector<const DataArrayInt *> tmps(levs.size());
615       bool f(true);
616       for(std::size_t i=0;i<levs.size();i++)
617         {
618           tmps[i]=m->getFamilyFieldAtLevel(levs[i]);
619           if(!tmps[i])
620             f=false;
621         }
622       if(f)
623         _cell_fam_ids=DataArrayInt::Aggregate(tmps);
624     }
625   _cell_num_ids_nocpy=(levs.size()==1);
626   if(_cell_num_ids_nocpy)
627     {
628       const DataArrayInt *tmp(m->getNumberFieldAtLevel(levs[0]));
629       if(tmp)
630         {
631           tmp->incrRef();
632           _cell_num_ids=(const_cast<DataArrayInt *>(tmp));
633         }
634     }
635   else
636     {
637       std::vector<const DataArrayInt *> tmps(levs.size());
638       bool n(true);
639       for(std::size_t i=0;i<levs.size();i++)
640         {
641           tmps[i]=m->getNumberFieldAtLevel(levs[i]);
642           if(!tmps[i])
643             n=false;
644         }
645       if(n)
646         _cell_num_ids=DataArrayInt::Aggregate(tmps);
647     }
648   // node part
649   _node_fam_ids_nocpy=true;
650   {
651     const DataArrayInt *tmp(m->getFamilyFieldAtLevel(1));
652     if(tmp)
653       {
654         tmp->incrRef();
655         _node_fam_ids=(const_cast<DataArrayInt *>(tmp));
656       }
657   }
658   _node_num_ids_nocpy=true;
659   {
660     const DataArrayInt *tmp(m->getNumberFieldAtLevel(1));
661     if(tmp)
662       {
663         tmp->incrRef();
664         _node_num_ids=(const_cast<DataArrayInt *>(tmp));
665       }
666   }
667 }
668
669 MEDUMeshMultiLev *MEDUMeshMultiLev::New(const MEDFileUMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities)
670 {
671   return new MEDUMeshMultiLev(m,gts,pfls,nbEntities);
672 }
673
674 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDFileUMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDMeshMultiLev(m->getNumberOfNodes(),gts,pfls,nbEntities)
675 {
676   std::size_t sz(gts.size());
677   if(sz<1)
678     throw INTERP_KERNEL::Exception("constructor of MEDUMeshMultiLev : number of different geo type must be >= 1 !");
679   unsigned dim(INTERP_KERNEL::CellModel::GetCellModel(gts[0]).getDimension());
680   _parts.resize(sz);
681   bool isSameDim(true),isNoPfl(true);
682   for(std::size_t i=0;i<sz;i++)
683     {
684       MEDCoupling1GTUMesh *elt(m->getDirectUndergroundSingleGeoTypeMesh(gts[i]));
685       if(INTERP_KERNEL::CellModel::GetCellModel(gts[i]).getDimension()!=dim)
686         isSameDim=false;
687       if(pfls[i])
688         isNoPfl=false;
689       if(elt)
690         elt->incrRef();
691       _parts[i]=elt;
692     }
693   // ids fields management
694   int lev((int)dim-m->getMeshDimension());
695   if(isSameDim && isNoPfl && m->getGeoTypesAtLevel(lev)==gts)//optimized part
696     {
697       _cell_fam_ids_nocpy=true;
698       const DataArrayInt *famIds(m->getFamilyFieldAtLevel(lev));
699       if(famIds)
700         { _cell_fam_ids=const_cast<DataArrayInt*>(famIds); famIds->incrRef(); }
701       _cell_num_ids_nocpy=true;
702       const DataArrayInt *numIds(m->getNumberFieldAtLevel(lev));
703       if(numIds)
704         { _cell_num_ids=const_cast<DataArrayInt*>(numIds); numIds->incrRef(); }
705       _node_fam_ids_nocpy=true;
706       famIds=m->getFamilyFieldAtLevel(1);
707       if(famIds)
708         { _node_fam_ids=const_cast<DataArrayInt*>(famIds); famIds->incrRef(); }
709       _node_num_ids_nocpy=true;
710       numIds=m->getNumberFieldAtLevel(1);
711       if(numIds)
712         { _node_num_ids=const_cast<DataArrayInt*>(numIds); numIds->incrRef(); }
713       return ;
714     }
715   //
716   _cell_fam_ids_nocpy=false;
717   std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > famIdsSafe(sz);
718   std::vector<const DataArrayInt *> famIds(sz);
719   bool f(true);
720   for(std::size_t i=0;i<sz;i++)
721     {
722       famIdsSafe[i]=m->extractFamilyFieldOnGeoType(gts[i]);
723       famIds[i]=famIdsSafe[i];
724       if(!famIds[i])
725         f=false;
726     }
727   if(f)
728     _cell_fam_ids=DataArrayInt::Aggregate(famIds);
729   _cell_num_ids_nocpy=false;
730   std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > numIdsSafe(sz);
731   std::vector<const DataArrayInt *> numIds(sz);
732   bool n(true);
733   for(std::size_t i=0;i<sz;i++)
734     {
735       numIdsSafe[i]=m->extractNumberFieldOnGeoType(gts[i]);
736       numIds[i]=numIdsSafe[i];
737       if(!numIds[i])
738         n=false;
739     }
740   if(n)
741     _cell_num_ids=DataArrayInt::Aggregate(numIds);
742   // node ids management
743   _node_fam_ids_nocpy=true;
744   const DataArrayInt *nodeFamIds(m->getFamilyFieldAtLevel(1));
745   if(nodeFamIds)
746     { _node_fam_ids=const_cast<DataArrayInt*>(nodeFamIds); nodeFamIds->incrRef(); }
747   _node_num_ids_nocpy=true;
748   const DataArrayInt *nodeNumIds(m->getNumberFieldAtLevel(1));
749   if(nodeNumIds)
750     { _node_num_ids=const_cast<DataArrayInt*>(nodeNumIds); nodeNumIds->incrRef(); }
751 }
752
753 void MEDUMeshMultiLev::selectPartOfNodes(const DataArrayInt *pflNodes)
754 {
755    if(!pflNodes || !pflNodes->isAllocated())
756      return ;
757    std::size_t sz(_parts.size());
758    std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > a(sz);
759    std::vector< const DataArrayInt *> aa(sz);
760    for(std::size_t i=0;i<sz;i++)
761      {
762        
763        const DataArrayInt *pfl(_pfls[i]);
764        MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m(_parts[i]);
765        if(pfl)
766          m=dynamic_cast<MEDCoupling1GTUMesh *>(_parts[i]->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
767        DataArrayInt *cellIds=0;
768        m->fillCellIdsToKeepFromNodeIds(pflNodes->begin(),pflNodes->end(),true,cellIds);
769        MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cellIdsSafe(cellIds);
770        MEDCouplingAutoRefCountObjectPtr<MEDCouplingPointSet> m2(m->buildPartOfMySelfKeepCoords(cellIds->begin(),cellIds->end()));
771        int tmp=-1;
772        MEDCouplingAutoRefCountObjectPtr<DataArrayInt> o2n(m2->getNodeIdsInUse(tmp));
773        a[i]=o2n->invertArrayO2N2N2O(tmp); aa[i]=a[i];
774        if(pfl)
775          _pfls[i]=pfl->selectByTupleIdSafe(cellIds->begin(),cellIds->end());
776        else
777          _pfls[i]=cellIdsSafe;
778      }
779    _node_reduction=DataArrayInt::Aggregate(aa);
780    _node_reduction->sort(true);
781    _node_reduction=_node_reduction->buildUnique();
782 }
783
784 MEDMeshMultiLev *MEDUMeshMultiLev::prepare() const
785 {
786   return new MEDUMeshMultiLev(*this);
787 }
788
789 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDUMeshMultiLev& other):MEDMeshMultiLev(other),_parts(other._parts)
790 {
791 }
792
793 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDStructuredMeshMultiLev& other, const MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh>& part):MEDMeshMultiLev(other)
794 {
795   _parts.resize(1);
796   _parts[0]=part;
797   _geo_types.resize(1); _geo_types[0]=part->getCellModelEnum();
798   _nb_entities.resize(1); _nb_entities[0]=part->getNumberOfCells();
799   _pfls.resize(1); _pfls[0]=0;
800 }
801
802 /*! 
803  * If returned value is false output pointer \a coords is not the internal pointer. If returned value is true output pointer \a coords is directly the internal pointer.
804  * If true is returned, the \a coords output parameter should be used with care (non const method call) to avoid to change the internal state of MEDFileUMesh instance.
805  */
806 bool MEDUMeshMultiLev::buildVTUArrays(DataArrayDouble *& coords, DataArrayByte *&types, DataArrayInt *&cellLocations, DataArrayInt *& cells, DataArrayInt *&faceLocations, DataArrayInt *&faces) const
807 {
808   if(_parts.empty())
809     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : empty array !");
810   if(!(const MEDCoupling1GTUMesh *)_parts[0])
811     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : first part is null !");
812   const DataArrayDouble *tmp(_parts[0]->getCoords());
813   if(!tmp)
814     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : the coordinates are null !");
815   MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> a(const_cast<DataArrayDouble *>(tmp)); tmp->incrRef();
816   int szBCE(0),szD(0),szF(0);
817   bool isPolyh(false);
818   int iii(0);
819   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_parts.begin();it!=_parts.end();it++,iii++)
820     {
821       const MEDCoupling1GTUMesh *cur(*it);
822       if(!cur)
823         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : a part is null !");
824       //
825       const DataArrayInt *pfl(_pfls[iii]);
826       MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> cur2;
827       if(!pfl)
828         { cur2=const_cast<MEDCoupling1GTUMesh *>(cur); cur2->incrRef(); }
829       else
830         { cur2=dynamic_cast<MEDCoupling1GTUMesh *>(cur->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end())); cur=cur2; }
831       //
832       int curNbCells(cur->getNumberOfCells());
833       szBCE+=curNbCells;
834       if((*it)->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
835         szD+=cur->getNodalConnectivity()->getNumberOfTuples()+curNbCells;
836       else
837         {
838           isPolyh=true;
839           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp2(cur->computeEffectiveNbOfNodesPerCell());
840           szD+=tmp2->accumulate(0)+curNbCells;
841           szF+=2*curNbCells+cur->getNodalConnectivity()->getNumberOfTuples();
842         }
843     }
844   MEDCouplingAutoRefCountObjectPtr<DataArrayByte> b(DataArrayByte::New()); b->alloc(szBCE,1); char *bPtr(b->getPointer());
845   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> c(DataArrayInt::New()); c->alloc(szBCE,1); int *cPtr(c->getPointer());
846   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> d(DataArrayInt::New()); d->alloc(szD,1); int *dPtr(d->getPointer());
847   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> e(DataArrayInt::New()),f(DataArrayInt::New()); int *ePtr(0),*fPtr(0);
848   if(isPolyh)
849     { e->alloc(szBCE,1); ePtr=e->getPointer(); f->alloc(szF,1); fPtr=f->getPointer(); }
850   int k(0);
851   iii=0;
852   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_parts.begin();it!=_parts.end();it++,iii++)
853     {
854       const MEDCoupling1GTUMesh *cur(*it);
855       //
856       const DataArrayInt *pfl(_pfls[iii]);
857       MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> cur2;
858       if(!pfl)
859         { cur2=const_cast<MEDCoupling1GTUMesh *>(cur); cur2->incrRef(); }
860       else
861         { cur2=dynamic_cast<MEDCoupling1GTUMesh *>(cur->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end())); cur=cur2; }
862       //
863       int curNbCells(cur->getNumberOfCells());
864       int gt((int)cur->getCellModelEnum());
865       if(gt<0 || gt>=PARAMEDMEM_2_VTKTYPE_LGTH)
866         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : invalid geometric type !");
867       unsigned char gtvtk(PARAMEDMEM_2_VTKTYPE[gt]);
868       if(gtvtk==255)
869         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : no VTK type for the requested INTERP_KERNEL geometric type !");
870       std::fill(bPtr,bPtr+curNbCells,gtvtk); bPtr+=curNbCells;
871       const MEDCoupling1SGTUMesh *scur(dynamic_cast<const MEDCoupling1SGTUMesh *>(cur));
872       const MEDCoupling1DGTUMesh *dcur(dynamic_cast<const MEDCoupling1DGTUMesh *>(cur));
873       const int *connPtr(cur->getNodalConnectivity()->begin());
874       if(!scur && !dcur)
875         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : internal error !");
876       if(scur)
877         {
878           int nnpc(scur->getNumberOfNodesPerCell());
879           for(int i=0;i<curNbCells;i++,connPtr+=nnpc)
880             {
881               *dPtr++=nnpc;
882               dPtr=std::copy(connPtr,connPtr+nnpc,dPtr);
883               *cPtr++=k; k+=nnpc+1;
884             }
885           if(isPolyh)
886             { std::fill(ePtr,ePtr+curNbCells,-1); ePtr+=curNbCells; }
887         }
888       else
889         {
890           const int *connIPtr(dcur->getNodalConnectivityIndex()->begin());
891           if(cur->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
892             {
893               for(int i=0;i<curNbCells;i++,connIPtr++)
894                 {
895                   *dPtr++=connIPtr[1]-connIPtr[0];
896                   dPtr=std::copy(connPtr+connIPtr[0],connPtr+connIPtr[1],dPtr);
897                   *cPtr++=k; k+=connIPtr[1]-connIPtr[0];
898                 }
899             }
900           else
901             {
902               for(int i=0;i<curNbCells;i++,connIPtr++)
903                 {
904                   std::set<int> s(connPtr+connIPtr[0],connPtr+connIPtr[1]); s.erase(-1);
905                   *dPtr++=(int)s.size();
906                   dPtr=std::copy(s.begin(),s.end(),dPtr);
907                   *cPtr++=k; k+=(int)s.size()+1;
908                 }
909             }
910           if(isPolyh)
911             {
912               connIPtr=dcur->getNodalConnectivityIndex()->begin();
913               if(cur->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
914                 { std::fill(ePtr,ePtr+curNbCells,-1); ePtr+=curNbCells; }
915               else
916                 {
917                   int kk(0);
918                   for(int i=0;i<curNbCells;i++,connIPtr++)
919                     {
920                       int nbFace(std::count(connPtr+connIPtr[0],connPtr+connIPtr[1],-1)+1);
921                       *fPtr++=nbFace;
922                       const int *work(connPtr+connIPtr[0]);
923                       for(int j=0;j<nbFace;j++)
924                         {
925                           const int *work2=std::find(work,connPtr+connIPtr[1],-1);
926                           *fPtr++=std::distance(work,work2);
927                           fPtr=std::copy(work,work2,fPtr);
928                           work=work2+1;
929                         }
930                       *ePtr++=kk; kk+=connIPtr[1]-connIPtr[0]+2;
931                     }
932                 }
933             }
934         }
935     }
936   if(!isPolyh)
937     reorderNodesIfNecessary(a,d,0);
938   else
939     reorderNodesIfNecessary(a,d,f);
940   if(a->getNumberOfComponents()!=3)
941     a=a->changeNbOfComponents(3,0.);
942   coords=a.retn(); types=b.retn(); cellLocations=c.retn(); cells=d.retn();
943   if(!isPolyh)
944     { faceLocations=0; faces=0; }
945   else
946     { faceLocations=e.retn(); faces=f.retn(); }
947   return tmp==((DataArrayDouble *)a);
948 }
949
950 void MEDUMeshMultiLev::reorderNodesIfNecessary(MEDCouplingAutoRefCountObjectPtr<DataArrayDouble>& coords, DataArrayInt *nodalConnVTK, DataArrayInt *polyhedNodalConnVTK) const
951 {
952   const DataArrayInt *nr(_node_reduction);
953   if(!nr)
954     return ;
955   int sz(coords->getNumberOfTuples());
956   std::vector<bool> b(sz,false);
957   const int *work(nodalConnVTK->begin()),*endW(nodalConnVTK->end());
958   while(work!=endW)
959     {
960       int nb(*work++);
961       for(int i=0;i<nb && work!=endW;i++,work++)
962         {
963           if(*work>=0 && *work<sz)
964             b[*work]=true;
965           else
966             throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::reorderNodesIfNecessary : internal error !");
967         }
968     }
969   if(polyhedNodalConnVTK)
970     {
971       work=polyhedNodalConnVTK->begin(); endW=polyhedNodalConnVTK->end();
972       while(work!=endW)
973         {
974           int nb(*work++);
975           for(int i=0;i<nb && work!=endW;i++)
976             {
977               int nb2(*work++);
978               for(int j=0;j<nb2 && work!=endW;j++,work++)
979                 {
980                   if(*work>=0 && *work<sz)
981                     b[*work]=true;
982                   else
983                     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::reorderNodesIfNecessary : internal error #2 !");
984                 }
985             }
986         }
987     }
988   int szExp(std::count(b.begin(),b.end(),true));
989   if(szExp!=nr->getNumberOfTuples())
990     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::reorderNodesIfNecessary : internal error #3 !");
991   // Go renumbering !
992   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> o2n(DataArrayInt::New()); o2n->alloc(sz,1);
993   int *o2nPtr(o2n->getPointer());
994   int newId(0);
995   for(int i=0;i<sz;i++,o2nPtr++)
996     if(b[i]) *o2nPtr=newId++; else *o2nPtr=-1;
997   const int *o2nPtrc(o2n->begin());
998   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> n2o(o2n->invertArrayO2N2N2O(nr->getNumberOfTuples()));
999   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> perm(DataArrayInt::FindPermutationFromFirstToSecond(n2o,nr));
1000   const int *permPtr(perm->begin());
1001   int *work2(nodalConnVTK->getPointer()),*endW2(nodalConnVTK->getPointer()+nodalConnVTK->getNumberOfTuples());
1002   while(work2!=endW2)
1003     {
1004       int nb(*work2++);
1005       for(int i=0;i<nb && work2!=endW2;i++,work2++)
1006         *work2=permPtr[o2nPtrc[*work2]];
1007     }
1008   if(polyhedNodalConnVTK)
1009     {
1010       work2=polyhedNodalConnVTK->getPointer(); endW2=polyhedNodalConnVTK->getPointer()+polyhedNodalConnVTK->getNumberOfTuples();
1011       while(work2!=endW2)
1012         {
1013           int nb(*work2++);
1014           for(int i=0;i<nb && work2!=endW2;i++)
1015             {
1016               int nb2(*work2++);
1017               for(int j=0;j<nb2 && work2!=endW2;j++,work2++)
1018                 *work2=permPtr[o2nPtrc[*work2]];
1019             }
1020         }
1021     }
1022   coords=(coords->selectByTupleIdSafe(nr->begin(),nr->end()));
1023 }
1024
1025 //=
1026
1027 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev()
1028 {
1029 }
1030
1031 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev(const MEDFileStructuredMesh *m, const std::vector<int>& lev)
1032 {
1033   // ids fields management
1034   _cell_fam_ids_nocpy=true; _cell_num_ids_nocpy=true;
1035   const DataArrayInt *tmp(0);
1036   tmp=m->getFamilyFieldAtLevel(0);
1037   if(tmp)
1038     {
1039       tmp->incrRef();
1040       _cell_fam_ids=const_cast<DataArrayInt *>(tmp);
1041     }
1042   tmp=m->getNumberFieldAtLevel(0);
1043   if(tmp)
1044     {
1045       tmp->incrRef();
1046       _cell_num_ids=const_cast<DataArrayInt *>(tmp);
1047     }
1048   //
1049   _node_fam_ids_nocpy=true; _node_num_ids_nocpy=true;
1050   tmp=0;
1051   tmp=m->getFamilyFieldAtLevel(1);
1052   if(tmp)
1053     {
1054       tmp->incrRef();
1055       _node_fam_ids=const_cast<DataArrayInt *>(tmp);
1056     }
1057   tmp=m->getNumberFieldAtLevel(1);
1058   if(tmp)
1059     {
1060       tmp->incrRef();
1061       _node_num_ids=const_cast<DataArrayInt *>(tmp);
1062     }
1063 }
1064
1065 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev(const MEDFileStructuredMesh *m, int nbOfNodes, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDMeshMultiLev(nbOfNodes,gts,pfls,nbEntities)
1066 {
1067   // ids fields management
1068   _cell_fam_ids_nocpy=true; _cell_num_ids_nocpy=true;
1069   const DataArrayInt *tmp(0);
1070   tmp=m->getFamilyFieldAtLevel(0);
1071   if(tmp)
1072     {
1073       tmp->incrRef();
1074       _cell_fam_ids=const_cast<DataArrayInt *>(tmp);
1075     }
1076   tmp=m->getNumberFieldAtLevel(0);
1077   if(tmp)
1078     {
1079       tmp->incrRef();
1080       _cell_num_ids=const_cast<DataArrayInt *>(tmp);
1081     }
1082   //
1083   _node_fam_ids_nocpy=true; _node_num_ids_nocpy=true;
1084   tmp=0;
1085   tmp=m->getFamilyFieldAtLevel(1);
1086   if(tmp)
1087     {
1088       tmp->incrRef();
1089       _node_fam_ids=const_cast<DataArrayInt *>(tmp);
1090     }
1091   tmp=m->getNumberFieldAtLevel(1);
1092   if(tmp)
1093     {
1094       tmp->incrRef();
1095       _node_num_ids=const_cast<DataArrayInt *>(tmp);
1096     }
1097 }
1098
1099 void MEDStructuredMeshMultiLev::selectPartOfNodes(const DataArrayInt *pflNodes)
1100 {
1101   if(!pflNodes || !pflNodes->isAllocated())
1102     return ;
1103   std::vector<int> ngs(getNodeGridStructure());
1104   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> conn(MEDCouplingStructuredMesh::Build1GTNodalConnectivity(&ngs[0],&ngs[0]+ngs.size()));
1105   MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m(MEDCoupling1SGTUMesh::New("",MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(ngs.size())));
1106   m->setNodalConnectivity(conn);
1107   const DataArrayInt *pfl(_pfls[0]);
1108   if(pfl)
1109     {
1110       m=dynamic_cast<MEDCoupling1SGTUMesh *>(m->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
1111     }
1112   DataArrayInt *cellIds=0;
1113   m->fillCellIdsToKeepFromNodeIds(pflNodes->begin(),pflNodes->end(),true,cellIds);
1114   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cellIdsSafe(cellIds);
1115   MEDCouplingAutoRefCountObjectPtr<MEDCouplingPointSet> m2(m->buildPartOfMySelfKeepCoords(cellIds->begin(),cellIds->end()));
1116   int tmp=-1;
1117   _node_reduction=m2->getNodeIdsInUse(tmp);
1118   if(pfl)
1119     _pfls[0]=pfl->selectByTupleIdSafe(cellIds->begin(),cellIds->end());
1120   else
1121     _pfls[0]=cellIdsSafe;
1122 }
1123
1124 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev(const MEDStructuredMeshMultiLev& other):MEDMeshMultiLev(other)
1125 {
1126 }
1127
1128 //=
1129
1130 MEDCMeshMultiLev *MEDCMeshMultiLev::New(const MEDFileCMesh *m, const std::vector<int>& levs)
1131 {
1132   return new MEDCMeshMultiLev(m,levs);
1133 }
1134
1135 MEDCMeshMultiLev *MEDCMeshMultiLev::New(const MEDFileCMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities)
1136 {
1137   return new MEDCMeshMultiLev(m,gts,pfls,nbEntities);
1138 }
1139
1140 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDFileCMesh *m, const std::vector<int>& levs):MEDStructuredMeshMultiLev(m,levs)
1141 {
1142   if(!m)
1143     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor : null input pointer !");
1144   if(levs.size()!=1 || levs[0]!=0)
1145     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor : levels supported is 0 only !");
1146   int sdim(m->getSpaceDimension());
1147   _coords.resize(sdim);
1148   for(int i=0;i<sdim;i++)
1149     {
1150       DataArrayDouble *elt(const_cast<DataArrayDouble *>(m->getMesh()->getCoordsAt(i)));
1151       if(!elt)
1152         throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : presence of null pointer for an vector of double along an axis !");
1153       elt->incrRef();
1154       _coords[i]=elt;
1155     }
1156 }
1157
1158 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDFileCMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDStructuredMeshMultiLev(m,m->getNumberOfNodes(),gts,pfls,nbEntities)
1159 {
1160   if(!m)
1161     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : null input pointer !");
1162   if(gts.size()!=1 || pfls.size()!=1)
1163     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : lengthes of gts and pfls must be equal to one !");
1164   int mdim(m->getMeshDimension());
1165   INTERP_KERNEL::NormalizedCellType gt(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(mdim));
1166   if(gt!=gts[0])
1167     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : the unique geo type is invalid regarding meshdim !");
1168   _coords.resize(mdim);
1169   for(int i=0;i<mdim;i++)
1170     {
1171       DataArrayDouble *elt(const_cast<DataArrayDouble *>(m->getMesh()->getCoordsAt(i)));
1172       if(!elt)
1173         throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : presence of null pointer for an vector of double along an axis !");
1174       _coords[i]=elt; _coords[i]->incrRef();
1175     }
1176 }
1177
1178 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDCMeshMultiLev& other):MEDStructuredMeshMultiLev(other),_coords(other._coords)
1179 {
1180 }
1181
1182 std::vector<int> MEDCMeshMultiLev::getNodeGridStructure() const
1183 {
1184   std::vector<int> ret(_coords.size());
1185   for(std::size_t i=0;i<_coords.size();i++)
1186     ret[i]=_coords[i]->getNumberOfTuples();
1187   return ret;
1188 }
1189
1190 MEDMeshMultiLev *MEDCMeshMultiLev::prepare() const
1191 {
1192   const DataArrayInt *pfl(0),*nr(_node_reduction);
1193   if(!_pfls.empty())
1194     pfl=_pfls[0];
1195   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> nnr;
1196   std::vector<int> cgs,ngs(getNodeGridStructure());
1197   cgs.resize(ngs.size());
1198   std::transform(ngs.begin(),ngs.end(),cgs.begin(),std::bind2nd(std::plus<int>(),-1));
1199   if(pfl)
1200     {
1201       std::vector< std::pair<int,int> > cellParts;
1202       MEDCouplingAutoRefCountObjectPtr<MEDMeshMultiLev> ret2;
1203       if(MEDCouplingStructuredMesh::IsPartStructured(pfl->begin(),pfl->end(),cgs,cellParts))
1204         {
1205           MEDCouplingAutoRefCountObjectPtr<MEDCMeshMultiLev> ret(new MEDCMeshMultiLev(*this));
1206           if(nr)
1207             { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
1208           ret->_nb_entities[0]=pfl->getNumberOfTuples();
1209           ret->_pfls[0]=0;
1210           std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> > coords(_coords.size());
1211           for(std::size_t i=0;i<_coords.size();i++)
1212             coords[i]=_coords[i]->selectByTupleId2(cellParts[i].first,cellParts[i].second+1,1);
1213           ret->_coords=coords;
1214           ret2=(MEDCMeshMultiLev *)ret; ret2->incrRef();
1215         }
1216       else
1217         {
1218           MEDCouplingAutoRefCountObjectPtr<MEDCouplingCMesh> m(MEDCouplingCMesh::New());
1219           for(std::size_t i=0;i<ngs.size();i++)
1220             m->setCoordsAt(i,_coords[i]);
1221           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m2(m->build1SGTUnstructured());
1222           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m3=dynamic_cast<MEDCoupling1GTUMesh *>(m2->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
1223           MEDCouplingAutoRefCountObjectPtr<MEDUMeshMultiLev> ret(new MEDUMeshMultiLev(*this,m3));
1224           if(nr)
1225             { m3->zipCoords(); nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
1226           ret2=(MEDUMeshMultiLev *)ret; ret2->incrRef();
1227         }
1228       const DataArrayInt *famIds(_cell_fam_ids),*numIds(_cell_num_ids);
1229       if(famIds)
1230         {
1231           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp(famIds->selectByTupleIdSafe(pfl->begin(),pfl->end()));
1232           ret2->setFamilyIdsOnCells(tmp,false);
1233         }
1234       if(numIds)
1235         {
1236           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp(numIds->selectByTupleIdSafe(pfl->begin(),pfl->end()));
1237           ret2->setNumberIdsOnCells(tmp,false);
1238         }
1239       return ret2.retn();
1240       
1241     }
1242   else
1243     {
1244       MEDCouplingAutoRefCountObjectPtr<MEDCMeshMultiLev> ret(new MEDCMeshMultiLev(*this));
1245       if(nr)
1246         { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
1247       return ret.retn();
1248     }
1249 }
1250
1251 std::vector< DataArrayDouble * > MEDCMeshMultiLev::buildVTUArrays() const
1252 {
1253   std::size_t sz(_coords.size());
1254   std::vector< DataArrayDouble * > ret(sz);
1255   for(std::size_t i=0;i<sz;i++)
1256     {
1257       ret[i]=const_cast<DataArrayDouble *>((const DataArrayDouble *)_coords[i]);
1258       ret[i]->incrRef();
1259     }
1260   return ret;
1261 }
1262
1263 //=
1264
1265 MEDCurveLinearMeshMultiLev *MEDCurveLinearMeshMultiLev::New(const MEDFileCurveLinearMesh *m, const std::vector<int>& levs)
1266 {
1267   return new MEDCurveLinearMeshMultiLev(m,levs);
1268 }
1269
1270 MEDCurveLinearMeshMultiLev *MEDCurveLinearMeshMultiLev::New(const MEDFileCurveLinearMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities)
1271 {
1272   return new MEDCurveLinearMeshMultiLev(m,gts,pfls,nbEntities);
1273 }
1274
1275 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDFileCurveLinearMesh *m, const std::vector<int>& levs):MEDStructuredMeshMultiLev(m,levs)
1276 {
1277   if(!m)
1278     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor : null input pointer !");
1279   if(levs.size()!=1 || levs[0]!=0)
1280     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor : levels supported is 0 only !");
1281   DataArrayDouble *coords(const_cast<DataArrayDouble *>(m->getMesh()->getCoords()));
1282   if(!coords)
1283     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : no coords set !");
1284   coords->incrRef();
1285   _coords=coords;
1286   _structure=m->getMesh()->getNodeGridStructure();
1287 }
1288
1289 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDFileCurveLinearMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDStructuredMeshMultiLev(m,m->getNumberOfNodes(),gts,pfls,nbEntities)
1290 {
1291   if(!m)
1292     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : null input pointer !");
1293   if(gts.size()!=1 || pfls.size()!=1)
1294     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : lengthes of gts and pfls must be equal to one !");
1295   int mdim(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(m->getMeshDimension()));
1296   if(mdim!=gts[0])
1297     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : the unique geo type is invalid regarding meshdim !");
1298   DataArrayDouble *coords(const_cast<DataArrayDouble *>(m->getMesh()->getCoords()));
1299   if(!coords)
1300     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : no coords set !");
1301   coords->incrRef();
1302   _coords=coords;
1303   _structure=m->getMesh()->getNodeGridStructure();
1304 }
1305
1306 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDCurveLinearMeshMultiLev& other):MEDStructuredMeshMultiLev(other),_coords(other._coords),_structure(other._structure)
1307 {
1308 }
1309
1310 std::vector<int> MEDCurveLinearMeshMultiLev::getNodeGridStructure() const
1311 {
1312   return _structure;
1313 }
1314
1315 MEDMeshMultiLev *MEDCurveLinearMeshMultiLev::prepare() const
1316 {
1317   const DataArrayInt *pfl(_pfls[0]),*nr(_node_reduction);
1318   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> nnr;
1319   std::vector<int> cgs,ngs(getNodeGridStructure());
1320   cgs.resize(ngs.size());
1321   std::transform(ngs.begin(),ngs.end(),cgs.begin(),std::bind2nd(std::plus<int>(),-1));
1322   if(pfl)
1323     {
1324       std::vector< std::pair<int,int> > cellParts,nodeParts;
1325       MEDCouplingAutoRefCountObjectPtr<MEDMeshMultiLev> ret2;
1326       if(MEDCouplingStructuredMesh::IsPartStructured(pfl->begin(),pfl->end(),cgs,cellParts))
1327         {
1328           nodeParts=cellParts;
1329           std::vector<int> st(ngs.size());
1330           for(std::size_t i=0;i<ngs.size();i++)
1331             {
1332               nodeParts[i].second++;
1333               st[i]=nodeParts[i].second-nodeParts[i].first;
1334             }
1335           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p(MEDCouplingStructuredMesh::BuildExplicitIdsFrom(ngs,nodeParts));
1336           MEDCouplingAutoRefCountObjectPtr<MEDCurveLinearMeshMultiLev> ret(new MEDCurveLinearMeshMultiLev(*this));
1337           if(nr)
1338             { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
1339           ret->_nb_entities[0]=pfl->getNumberOfTuples();
1340           ret->_pfls[0]=0;
1341           ret->_coords=_coords->selectByTupleIdSafe(p->begin(),p->end());
1342           ret->_structure=st;
1343           ret2=(MEDCurveLinearMeshMultiLev *)ret; ret2->incrRef();
1344         }
1345       else
1346         {
1347           MEDCouplingAutoRefCountObjectPtr<MEDCouplingCurveLinearMesh> m(MEDCouplingCurveLinearMesh::New());
1348           m->setCoords(_coords); m->setNodeGridStructure(&_structure[0],&_structure[0]+_structure.size());
1349           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m2(m->build1SGTUnstructured());
1350           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m3=dynamic_cast<MEDCoupling1GTUMesh *>(m2->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
1351           MEDCouplingAutoRefCountObjectPtr<MEDUMeshMultiLev> ret(new MEDUMeshMultiLev(*this,m3));
1352           if(nr)
1353             { m3->zipCoords(); nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
1354           ret2=(MEDUMeshMultiLev *)ret; ret2->incrRef();
1355         }
1356       const DataArrayInt *famIds(_cell_fam_ids),*numIds(_cell_num_ids);
1357       if(famIds)
1358         {
1359           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp(famIds->selectByTupleIdSafe(pfl->begin(),pfl->end()));
1360           ret2->setFamilyIdsOnCells(tmp,false);
1361         }
1362       if(numIds)
1363         {
1364           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp(numIds->selectByTupleIdSafe(pfl->begin(),pfl->end()));
1365           ret2->setNumberIdsOnCells(tmp,false);
1366         }
1367       return ret2.retn();
1368     }
1369   else
1370     {
1371       MEDCouplingAutoRefCountObjectPtr<MEDCurveLinearMeshMultiLev> ret(new MEDCurveLinearMeshMultiLev(*this));
1372       if(nr)
1373         { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
1374       return ret.retn();
1375     }
1376 }
1377
1378 void MEDCurveLinearMeshMultiLev::buildVTUArrays(DataArrayDouble *&coords, std::vector<int>& nodeStrct) const
1379 {
1380   nodeStrct=_structure;
1381   const DataArrayDouble *coo(_coords);
1382   if(!coo)
1383     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev::buildVTUArrays : null pointer on coordinates !");
1384   coords=const_cast<DataArrayDouble *>(coo); coords->incrRef();
1385 }
1386
1387 //=
1388
1389 MEDFileField1TSStructItem2::MEDFileField1TSStructItem2()
1390 {
1391 }
1392
1393 MEDFileField1TSStructItem2::MEDFileField1TSStructItem2(INTERP_KERNEL::NormalizedCellType a, const std::pair<int,int>& b, const std::string& c, const std::string& d):_geo_type(a),_start_end(b),_pfl(DataArrayInt::New()),_loc(d),_nb_of_entity(-1)
1394 {
1395   _pfl->setName(c.c_str());
1396 }
1397
1398 void MEDFileField1TSStructItem2::checkWithMeshStructForCells(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs)
1399 {
1400   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
1401   checkInRange(nbOfEnt,1,globs);
1402 }
1403
1404 void MEDFileField1TSStructItem2::checkWithMeshStructForGaussNE(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs)
1405 {
1406   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
1407   const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(_geo_type);
1408   checkInRange(nbOfEnt,(int)cm.getNumberOfNodes(),globs);
1409 }
1410
1411 void MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs)
1412 {
1413   if(!globs)
1414     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT : no globals specified !");
1415   if(_loc.empty())
1416     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT : no localization specified !");
1417   const MEDFileFieldLoc& loc=globs->getLocalization(_loc.c_str());
1418   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
1419   checkInRange(nbOfEnt,loc.getNumberOfGaussPoints(),globs);
1420 }
1421
1422 int MEDFileField1TSStructItem2::getNbOfIntegrationPts(const MEDFileFieldGlobsReal *globs) const
1423 {
1424   if(_loc.empty())
1425     {
1426       if(getPflName().empty())
1427         return (_start_end.second-_start_end.first)/_nb_of_entity;
1428       else
1429         return (_start_end.second-_start_end.first)/getPfl(globs)->getNumberOfTuples();
1430     }
1431   else
1432     {
1433       const MEDFileFieldLoc& loc(globs->getLocalization(_loc.c_str()));
1434       return loc.getNumberOfGaussPoints();
1435     }
1436 }
1437
1438 std::string MEDFileField1TSStructItem2::getPflName() const
1439 {
1440   return _pfl->getName();
1441 }
1442
1443 const DataArrayInt *MEDFileField1TSStructItem2::getPfl(const MEDFileFieldGlobsReal *globs) const
1444 {
1445   if(!_pfl->isAllocated())
1446     {
1447       if(_pfl->getName().empty())
1448         return 0;
1449       else
1450         return globs->getProfile(_pfl->getName().c_str());
1451     }
1452   else
1453     return _pfl;
1454 }
1455
1456 /*!
1457  * \param [in] nbOfEntity - number of entity that can be either cells or nodes. Not other possiblity.
1458  * \param [in] nip - number of integration points. 1 for ON_CELLS and NO_NODES
1459  */
1460 void MEDFileField1TSStructItem2::checkInRange(int nbOfEntity, int nip, const MEDFileFieldGlobsReal *globs)
1461 {
1462   _nb_of_entity=nbOfEntity;
1463   if(_pfl->getName().empty())
1464     {
1465       if(nbOfEntity!=(_start_end.second-_start_end.first)/nip)
1466         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Mismatch between number of entities and size of node field !");
1467       return ;
1468     }
1469   else
1470     {
1471       if(!globs)
1472         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Presence of a profile on field whereas no globals found in file !");
1473       const DataArrayInt *pfl=globs->getProfile(_pfl->getName().c_str());
1474       if(!pfl)
1475         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Presence of a profile on field whereas no such profile found in file !");
1476       pfl->checkAllIdsInRange(0,nbOfEntity);
1477     }
1478 }
1479
1480 bool MEDFileField1TSStructItem2::isFastlyEqual(int& startExp, INTERP_KERNEL::NormalizedCellType gt, const char *pflName) const
1481 {
1482   if(startExp!=_start_end.first)
1483     return false;
1484   if(gt!=_geo_type)
1485     return false;
1486   if(getPflName()!=pflName)
1487     return false;
1488   startExp=_start_end.second;
1489   return true;
1490 }
1491
1492 bool MEDFileField1TSStructItem2::operator==(const MEDFileField1TSStructItem2& other) const throw(INTERP_KERNEL::Exception)
1493 {
1494   //_nb_of_entity is not taken into account here. It is not a bug, because no mesh consideration needed here to perform fast compare.
1495   //idem for _loc. It is not an effective attribute for support comparison.
1496   return _geo_type==other._geo_type && _start_end==other._start_end && _pfl->getName()==other._pfl->getName();
1497 }
1498
1499 bool MEDFileField1TSStructItem2::isCellSupportEqual(const MEDFileField1TSStructItem2& other, const MEDFileFieldGlobsReal *globs) const
1500 {
1501   if(_geo_type!=other._geo_type)
1502     return false;
1503   if(_nb_of_entity!=other._nb_of_entity)
1504     return false;
1505   if((_pfl->getName().empty() && !other._pfl->getName().empty()) || (!_pfl->getName().empty() && other._pfl->getName().empty()))
1506     return false;
1507   if(_pfl->getName().empty() && other._pfl->getName().empty())
1508     return true;
1509   const DataArrayInt *pfl1(getPfl(globs)),*pfl2(other.getPfl(globs));
1510   return pfl1->isEqualWithoutConsideringStr(*pfl2);
1511 }
1512
1513 bool MEDFileField1TSStructItem2::isNodeSupportEqual(const MEDFileField1TSStructItem2& other, const MEDFileFieldGlobsReal *globs) const
1514 {
1515   return isCellSupportEqual(other,globs);
1516 }
1517
1518 /*!
1519  * \a objs must be non empty. \a objs should contain items having same geometric type.
1520  */
1521 MEDFileField1TSStructItem2 MEDFileField1TSStructItem2::BuildAggregationOf(const std::vector<const MEDFileField1TSStructItem2 *>& objs, const MEDFileFieldGlobsReal *globs)
1522 {
1523   if(objs.empty())
1524     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : empty input !");
1525   if(objs.size()==1)
1526     return MEDFileField1TSStructItem2(*objs[0]);
1527   INTERP_KERNEL::NormalizedCellType gt(objs[0]->_geo_type);
1528   int nbEntityRef(objs[0]->_nb_of_entity);
1529   std::size_t sz(objs.size());
1530   std::vector<const DataArrayInt *> arrs(sz);
1531   for(std::size_t i=0;i<sz;i++)
1532     {
1533       const MEDFileField1TSStructItem2 *obj(objs[i]);
1534       if(gt!=obj->_geo_type)
1535         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! All input must have the same geo type !");
1536       if(nbEntityRef!=obj->_nb_of_entity)
1537         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! All input must have the global nb of entity !");
1538       if(obj->_pfl->getName().empty())
1539         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! Several same geo type chunk must all lie on profiles !");
1540       arrs[i]=globs->getProfile(obj->_pfl->getName().c_str());
1541     }
1542   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> arr(DataArrayInt::Aggregate(arrs));
1543   arr->sort();
1544   int oldNbTuples(arr->getNumberOfTuples());
1545   arr=arr->buildUnique();
1546   if(oldNbTuples!=arr->getNumberOfTuples())
1547     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : some entities are present several times !");
1548   if(arr->isIdentity() && oldNbTuples==nbEntityRef)
1549     {
1550       std::pair<int,int> p(0,nbEntityRef);
1551       std::string a,b;
1552       MEDFileField1TSStructItem2 ret(gt,p,a,b);
1553       ret._nb_of_entity=nbEntityRef;
1554       return ret;
1555     }
1556   else
1557     {
1558       arr->setName(NEWLY_CREATED_PFL_NAME);
1559       std::pair<int,int> p(0,oldNbTuples);
1560       std::string a,b;
1561       MEDFileField1TSStructItem2 ret(gt,p,a,b);
1562       ret._nb_of_entity=nbEntityRef;
1563       ret._pfl=arr;
1564       return ret;
1565     }
1566 }
1567
1568 std::size_t MEDFileField1TSStructItem2::getHeapMemorySizeWithoutChildren() const
1569 {
1570   std::size_t ret(_loc.capacity());
1571   return ret;
1572 }
1573
1574 std::vector<const BigMemoryObject *> MEDFileField1TSStructItem2::getDirectChildren() const
1575 {
1576   std::vector<const BigMemoryObject *> ret;
1577   const DataArrayInt *pfl(_pfl);
1578   if(pfl)
1579     ret.push_back(pfl);
1580   return ret;
1581 }
1582
1583 //=
1584
1585 MEDFileField1TSStructItem::MEDFileField1TSStructItem(TypeOfField a, const std::vector< MEDFileField1TSStructItem2 >& b):_computed(false),_type(a),_items(b)
1586 {
1587 }
1588
1589 void MEDFileField1TSStructItem::checkWithMeshStruct(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs)
1590 {
1591   switch(_type)
1592     {
1593     case ON_NODES:
1594       {
1595         int nbOfEnt=mst->getNumberOfNodes();
1596         if(_items.size()!=1)
1597           throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::checkWithMeshStruct : for nodes field only one subdivision supported !");
1598         _items[0].checkInRange(nbOfEnt,1,globs);
1599         break ;
1600       }
1601     case ON_CELLS:
1602       {
1603         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1604           (*it).checkWithMeshStructForCells(mst,globs);
1605         break;
1606       }
1607     case ON_GAUSS_NE:
1608       {
1609         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1610           (*it).checkWithMeshStructForGaussNE(mst,globs);
1611         break;
1612       }
1613     case ON_GAUSS_PT:
1614       {
1615         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1616           (*it).checkWithMeshStructForGaussPT(mst,globs);
1617         break;
1618       }
1619     default:
1620       throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::checkWithMeshStruct : not managed field type !");
1621     }
1622 }
1623
1624 bool MEDFileField1TSStructItem::operator==(const MEDFileField1TSStructItem& other) const throw(INTERP_KERNEL::Exception)
1625 {
1626   if(_type!=other._type)
1627     return false;
1628   if(_items.size()!=other._items.size())
1629     return false;
1630   for(std::size_t i=0;i<_items.size();i++)
1631     if(!(_items[i]==other._items[i]))
1632       return false;
1633   return true;
1634 }
1635
1636 bool MEDFileField1TSStructItem::isCellSupportEqual(const MEDFileField1TSStructItem& other, const MEDFileFieldGlobsReal *globs) const
1637 {
1638   if(_type!=other._type)
1639     return false;
1640   if(_items.size()!=other._items.size())
1641     return false;
1642   for(std::size_t i=0;i<_items.size();i++)
1643     if(!(_items[i].isCellSupportEqual(other._items[i],globs)))
1644       return false;
1645   return true;
1646 }
1647
1648 bool MEDFileField1TSStructItem::isNodeSupportEqual(const MEDFileField1TSStructItem& other, const MEDFileFieldGlobsReal *globs) const
1649 {
1650   if(_type!=other._type)
1651     return false;
1652   if(_items.size()!=other._items.size())
1653     return false;
1654   for(std::size_t i=0;i<_items.size();i++)
1655     if(!(_items[i].isNodeSupportEqual(other._items[i],globs)))
1656       return false;
1657   return true;
1658 }
1659
1660 bool MEDFileField1TSStructItem::isEntityCell() const
1661 {
1662   if(_type==ON_NODES)
1663     return false;
1664   else
1665     return true;
1666 }
1667
1668 class CmpGeo
1669 {
1670 public:
1671   CmpGeo(INTERP_KERNEL::NormalizedCellType geoTyp):_geo_type(geoTyp) { }
1672   bool operator()(const std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > & v) const { return _geo_type==v.first; }
1673 private:
1674   INTERP_KERNEL::NormalizedCellType _geo_type;
1675 };
1676
1677 MEDFileField1TSStructItem MEDFileField1TSStructItem::simplifyMeOnCellEntity(const MEDFileFieldGlobsReal *globs) const
1678 {
1679   if(!isEntityCell())
1680     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::simplifyMeOnCellEntity : must be on ON_CELLS, ON_GAUSS_NE or ON_GAUSS_PT !");
1681   std::vector< std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > > m;
1682   std::size_t i=0;
1683   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++,i++)
1684     {
1685       std::vector< std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > >::iterator it0(std::find_if(m.begin(),m.end(),CmpGeo((*it).getGeo())));
1686       if(it0==m.end())
1687         m.push_back(std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> >((*it).getGeo(),std::vector<std::size_t>(1,i)));
1688       else
1689         (*it0).second.push_back(i);
1690     }
1691   if(m.size()==_items.size())
1692     {
1693       MEDFileField1TSStructItem ret(*this);
1694       ret._type=ON_CELLS;
1695       return ret;
1696     }
1697   std::size_t sz(m.size());
1698   std::vector< MEDFileField1TSStructItem2 > items(sz);
1699   for(i=0;i<sz;i++)
1700     {
1701       const std::vector<std::size_t>& ids=m[i].second;
1702       std::vector<const MEDFileField1TSStructItem2 *>objs(ids.size());
1703       for(std::size_t j=0;j<ids.size();j++)
1704         objs[j]=&_items[ids[j]];
1705       items[i]=MEDFileField1TSStructItem2::BuildAggregationOf(objs,globs);
1706     }
1707   MEDFileField1TSStructItem ret(ON_CELLS,items);
1708   ret._computed=true;
1709   return ret;
1710 }
1711
1712 /*!
1713  * \a this is expected to be ON_CELLS and simplified.
1714  */
1715 bool MEDFileField1TSStructItem::isCompatibleWithNodesDiscr(const MEDFileField1TSStructItem& other, const MEDFileMeshStruct *meshSt, const MEDFileFieldGlobsReal *globs) const
1716 {
1717   if(other._type!=ON_NODES)
1718     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isCompatibleWithNodesDiscr : other must be on nodes !");
1719   if(other._items.size()!=1)
1720     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isCompatibleWithNodesDiscr : other is on nodes but number of subparts !");
1721   int theFirstLevFull;
1722   bool ret0=isFullyOnOneLev(meshSt,theFirstLevFull);
1723   const MEDFileField1TSStructItem2& otherNodeIt(other._items[0]);
1724   if(otherNodeIt.getPflName().empty())
1725     {//on all nodes
1726       if(!ret0)
1727         return false;
1728       return theFirstLevFull==0;
1729     }
1730   else
1731     {
1732       const DataArrayInt *pfl=globs->getProfile(otherNodeIt.getPflName().c_str());
1733       MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cpyPfl(pfl->deepCpy());
1734       cpyPfl->sort();
1735       int nbOfNodes(meshSt->getNumberOfNodes());
1736       if(cpyPfl->isIdentity() && cpyPfl->getNumberOfTuples()==nbOfNodes)
1737         {//on all nodes also !
1738           if(!ret0)
1739             return false;
1740           return theFirstLevFull==0;
1741         }
1742       std::vector<bool> nodesFetched(nbOfNodes,false);
1743       meshSt->getTheMesh()->whichAreNodesFetched(*this,globs,nodesFetched);
1744       return cpyPfl->isFittingWith(nodesFetched);
1745     }
1746 }
1747
1748 bool MEDFileField1TSStructItem::isFullyOnOneLev(const MEDFileMeshStruct *meshSt, int& theFirstLevFull) const
1749 {
1750   if(_type!=ON_CELLS)
1751     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : works only for ON_CELLS discretization !");
1752   if(_items.empty())
1753     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : items vector is empty !");
1754   int nbOfLevs(meshSt->getNumberOfLevs());
1755   if(nbOfLevs==0)
1756     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : no levels in input mesh structure !");
1757   std::vector<int> levs(nbOfLevs);
1758   theFirstLevFull=1;
1759   std::set<INTERP_KERNEL::NormalizedCellType> gts;
1760   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++)
1761     {
1762       if(!(*it).getPflName().empty())
1763         return false;
1764       INTERP_KERNEL::NormalizedCellType gt((*it).getGeo());
1765       if(gts.find(gt)!=gts.end())
1766         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : internal error !");
1767       gts.insert(gt);
1768       int pos(meshSt->getLevelOfGeoType((*it).getGeo()));
1769       levs[-pos]++;
1770     }
1771   for(int i=0;i<nbOfLevs;i++)
1772     if(meshSt->getNumberOfGeoTypesInLev(-i)==levs[i])
1773       { theFirstLevFull=-i; return true; }
1774   return false;
1775 }
1776
1777 const MEDFileField1TSStructItem2& MEDFileField1TSStructItem::operator[](std::size_t i) const throw(INTERP_KERNEL::Exception)
1778 {
1779   if(i>=_items.size())
1780     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::operator[] : input is not in valid range !");
1781   return _items[i];
1782 }
1783
1784 std::size_t MEDFileField1TSStructItem::getHeapMemorySizeWithoutChildren() const
1785 {
1786   std::size_t ret(_items.size()*sizeof(MEDFileField1TSStructItem2));
1787   return ret;
1788 }
1789
1790 std::vector<const BigMemoryObject *> MEDFileField1TSStructItem::getDirectChildren() const
1791 {
1792   std::vector<const BigMemoryObject *> ret;
1793   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++)
1794     ret.push_back(&(*it));
1795   return ret;
1796 }
1797
1798 MEDMeshMultiLev *MEDFileField1TSStructItem::buildFromScratchDataSetSupportOnCells(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) const
1799 {
1800   std::size_t sz(_items.size());
1801   std::vector<INTERP_KERNEL::NormalizedCellType> a0(sz);
1802   std::vector<const DataArrayInt *> a1(sz);
1803   std::vector<int> a2(sz);
1804   std::size_t i(0);
1805   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++,i++)
1806     {
1807       a0[i]=(*it).getGeo();
1808       a1[i]=(*it).getPfl(globs);
1809       a2[i]=mst->getNumberOfElemsOfGeoType((*it).getGeo());
1810     }
1811   return MEDMeshMultiLev::New(mst->getTheMesh(),a0,a1,a2);
1812 }
1813
1814 MEDFileField1TSStructItem MEDFileField1TSStructItem::BuildItemFrom(const MEDFileAnyTypeField1TS *ref, const MEDFileMeshStruct *meshSt)
1815 {
1816   TypeOfField atype;
1817   std::vector< MEDFileField1TSStructItem2 > anItems;
1818   //
1819   std::vector< std::vector<std::string> > pfls,locs;
1820   std::vector< std::vector<TypeOfField> > typesF;
1821   std::vector<INTERP_KERNEL::NormalizedCellType> geoTypes;
1822   std::vector< std::vector<std::pair<int,int> > > strtEnds=ref->getFieldSplitedByType(0,geoTypes,typesF,pfls,locs);
1823   std::size_t nbOfGeoTypes(geoTypes.size());
1824   if(nbOfGeoTypes==0)
1825     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : not null by empty ref  !");
1826   bool isFirst=true;
1827   for(std::size_t i=0;i<nbOfGeoTypes;i++)
1828     {
1829       std::size_t sz=typesF[i].size();
1830       if(strtEnds[i].size()<1 || sz<1 || pfls[i].size()<1)
1831         throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : internal error #1 !");
1832       //
1833       if(isFirst)
1834         atype=typesF[i][0];
1835       isFirst=false;
1836       //
1837       for(std::size_t j=0;j<sz;j++)
1838         {
1839           if(atype==typesF[i][j])
1840             anItems.push_back(MEDFileField1TSStructItem2(geoTypes[i],strtEnds[i][j],pfls[i][j],locs[i][j]));
1841           else
1842             throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : can be applied only on single spatial discretization fields ! Call SplitPerDiscretization method !");
1843         }
1844     }
1845   MEDFileField1TSStructItem ret(atype,anItems);
1846   ret.checkWithMeshStruct(meshSt,ref);
1847   return ret;
1848 }
1849
1850 //=
1851
1852 MEDFileField1TSStruct *MEDFileField1TSStruct::New(const MEDFileAnyTypeField1TS *ref, MEDFileMeshStruct *mst)
1853 {
1854   return new MEDFileField1TSStruct(ref,mst);
1855 }
1856
1857 MEDFileField1TSStruct::MEDFileField1TSStruct(const MEDFileAnyTypeField1TS *ref, MEDFileMeshStruct *mst)
1858 {
1859   _already_checked.push_back(MEDFileField1TSStructItem::BuildItemFrom(ref,mst));
1860 }
1861
1862 void MEDFileField1TSStruct::checkWithMeshStruct(MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs)
1863 {
1864   if(_already_checked.empty())
1865     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::checkWithMeshStruct : not correctly initialized !");
1866   _already_checked.back().checkWithMeshStruct(mst,globs);
1867 }
1868
1869 bool MEDFileField1TSStruct::isEqualConsideringThePast(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *mst) const
1870 {
1871   MEDFileField1TSStructItem b(MEDFileField1TSStructItem::BuildItemFrom(other,mst));
1872   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++)
1873     {
1874       if((*it)==b)
1875         return true;
1876     }
1877   return false;
1878 }
1879
1880 /*!
1881  * Not const because \a other structure will be added to the \c _already_checked attribute in case of success.
1882  */
1883 bool MEDFileField1TSStruct::isSupportSameAs(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *meshSt)
1884 {
1885   if(_already_checked.empty())
1886     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isSupportSameAs : no ref !");
1887   MEDFileField1TSStructItem b(MEDFileField1TSStructItem::BuildItemFrom(other,meshSt));
1888   if(!_already_checked[0].isEntityCell() || !b.isEntityCell())
1889     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isSupportSameAs : only available on cell entities !");
1890   MEDFileField1TSStructItem other1(b.simplifyMeOnCellEntity(other));
1891   int found=-1,i=0;
1892   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1893     if((*it).isComputed())
1894       { found=i; break; }
1895   bool ret(false);
1896   if(found==-1)
1897     {
1898       MEDFileField1TSStructItem this1(_already_checked[0].simplifyMeOnCellEntity(other));
1899       ret=this1.isCellSupportEqual(other1,other);
1900       if(ret)
1901         _already_checked.push_back(this1);
1902     }
1903   else
1904     ret=_already_checked[found].isCellSupportEqual(other1,other);
1905   if(ret)
1906     _already_checked.push_back(b);
1907   return ret;
1908 }
1909
1910 /*!
1911  * \param [in] other - a field with only one spatial discretization : ON_NODES.
1912  */
1913 bool MEDFileField1TSStruct::isCompatibleWithNodesDiscr(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *meshSt)
1914 {
1915   if(_already_checked.empty())
1916     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isCompatibleWithNodesDiscr : no ref !");
1917   MEDFileField1TSStructItem other1(MEDFileField1TSStructItem::BuildItemFrom(other,meshSt));
1918   if(_already_checked[0].isEntityCell())
1919     {
1920       int found=-1,i=0;
1921       for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1922         if((*it).isComputed())
1923           { found=i; break; }
1924       bool ret(false);
1925       if(found==-1)
1926         {
1927           MEDFileField1TSStructItem this1(_already_checked[0].simplifyMeOnCellEntity(other));
1928           ret=this1.isCompatibleWithNodesDiscr(other1,meshSt,other);
1929           if(ret)
1930             _already_checked.push_back(this1);
1931         }
1932       else
1933         ret=_already_checked[found].isCompatibleWithNodesDiscr(other1,meshSt,other);
1934       if(ret)
1935         _already_checked.push_back(other1);
1936       return ret;
1937     }
1938   else
1939     return _already_checked[0].isNodeSupportEqual(other1,other);
1940 }
1941
1942 std::size_t MEDFileField1TSStruct::getHeapMemorySizeWithoutChildren() const
1943 {
1944   std::size_t ret(_already_checked.capacity()*sizeof(MEDFileField1TSStructItem));
1945   return ret;
1946 }
1947
1948 std::vector<const BigMemoryObject *> MEDFileField1TSStruct::getDirectChildren() const
1949 {
1950   std::vector<const BigMemoryObject *> ret;
1951   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++)
1952     ret.push_back(&(*it));
1953   return ret;
1954 }
1955
1956 MEDMeshMultiLev *MEDFileField1TSStruct::buildFromScratchDataSetSupport(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) const
1957 {
1958   if(_already_checked.empty())
1959     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::buildFromScratchDataSetSupport : No outline structure in this !");
1960   int pos0(-1),pos1(-1);
1961   if(presenceOfCellDiscr(pos0))
1962     {
1963       MEDCouplingAutoRefCountObjectPtr<MEDMeshMultiLev> ret(_already_checked[pos0].buildFromScratchDataSetSupportOnCells(mst,globs));
1964       if(presenceOfPartialNodeDiscr(pos1))
1965         ret->setNodeReduction(_already_checked[pos1][0].getPfl(globs));
1966       return ret.retn();
1967     }
1968   else
1969     {
1970       if(!presenceOfPartialNodeDiscr(pos1))
1971         {//we have only all nodes, no cell definition info -> all existing levels !;
1972           return MEDMeshMultiLev::New(mst->getTheMesh(),mst->getTheMesh()->getNonEmptyLevels());
1973         }
1974       else
1975         return MEDMeshMultiLev::NewOnlyOnNode(mst->getTheMesh(),_already_checked[pos1][0].getPfl(globs));
1976     }
1977 }
1978
1979 bool MEDFileField1TSStruct::isDataSetSupportFastlyEqualTo(const MEDFileField1TSStruct& other, const MEDFileFieldGlobsReal *globs) const
1980 {
1981   int b0,b1;
1982   bool a0(presenceOfCellDiscr(b0)),a1(presenceOfPartialNodeDiscr(b1));
1983   int d0,d1;
1984   bool c0(other.presenceOfCellDiscr(d0)),c1(other.presenceOfPartialNodeDiscr(d1)); 
1985   if(a0!=c0 || a1!=c1)
1986     return false;
1987   if(a0)
1988     if(!_already_checked[b0].isCellSupportEqual(other._already_checked[d0],globs))
1989       return false;
1990   if(a1)
1991     if(!_already_checked[b1].isNodeSupportEqual(other._already_checked[d1],globs))
1992       return false;
1993   return true;
1994 }
1995
1996 /*!
1997  * Returns true if presence in \a this of discretization ON_CELLS, ON_GAUSS_PT, ON_GAUSS_NE.
1998  * If true is returned the pos of the easiest is returned. The easiest is the first element in \a this having the less splitted subparts.
1999  */
2000 bool MEDFileField1TSStruct::presenceOfCellDiscr(int& pos) const
2001 {
2002   std::size_t refSz(std::numeric_limits<std::size_t>::max());
2003   bool ret(false);
2004   int i(0);
2005   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
2006     {
2007       if((*it).getType()!=ON_NODES)
2008         {
2009           ret=true;
2010           std::size_t sz((*it).getNumberOfItems());
2011           if(refSz>sz)
2012             { pos=i; refSz=sz; }
2013         }
2014     }
2015   if(refSz==0)
2016     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::presenceOfCellDiscr : an element in this on entity CELL is empty !");
2017   return ret;
2018 }
2019
2020 /*!
2021  * Returns true if presence in \a this of discretization ON_NODES.
2022  * If true is returned the pos of the first element containing the single subpart.
2023  */
2024 bool MEDFileField1TSStruct::presenceOfPartialNodeDiscr(int& pos) const
2025 {
2026   int i(0);
2027   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
2028     {
2029       if((*it).getType()==ON_NODES)
2030         {
2031           std::size_t sz((*it).getNumberOfItems());
2032           if(sz==1)
2033             {
2034               if(!(*it)[0].getPflName().empty())
2035                 { pos=i; return true; }
2036             }
2037           else
2038             throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::presenceOfPartialNodeDiscr : an element in this on entity NODE is split into several parts !");
2039         }
2040     }
2041   return false;
2042 }
2043
2044 //=
2045
2046 MEDFileFastCellSupportComparator *MEDFileFastCellSupportComparator::New(const MEDFileMeshStruct *m, const MEDFileAnyTypeFieldMultiTS *ref)
2047 {
2048   return new MEDFileFastCellSupportComparator(m,ref);
2049 }
2050
2051 MEDFileFastCellSupportComparator::MEDFileFastCellSupportComparator(const MEDFileMeshStruct *m, const MEDFileAnyTypeFieldMultiTS *ref)
2052 {
2053   if(!m)
2054     throw INTERP_KERNEL::Exception("MEDFileFastCellSupportComparator constructor : null input mesh struct !");
2055   _mesh_comp=const_cast<MEDFileMeshStruct *>(m); _mesh_comp->incrRef();
2056   int nbPts=ref->getNumberOfTS();
2057   _f1ts_cmps.resize(nbPts);
2058   for(int i=0;i<nbPts;i++)
2059     {
2060       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=ref->getTimeStepAtPos(i);
2061       _f1ts_cmps[i]=MEDFileField1TSStruct::New(elt,_mesh_comp);
2062       _f1ts_cmps[i]->checkWithMeshStruct(_mesh_comp,elt);
2063     }
2064 }
2065
2066 std::size_t MEDFileFastCellSupportComparator::getHeapMemorySizeWithoutChildren() const
2067 {
2068   std::size_t ret(_f1ts_cmps.capacity()*sizeof(MEDCouplingAutoRefCountObjectPtr<MEDFileField1TSStruct>));
2069   return ret;
2070 }
2071
2072 std::vector<const BigMemoryObject *> MEDFileFastCellSupportComparator::getDirectChildren() const
2073 {
2074   std::vector<const BigMemoryObject *> ret;
2075   const MEDFileMeshStruct *mst(_mesh_comp);
2076   if(mst)
2077     ret.push_back(mst);
2078   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileField1TSStruct> >::const_iterator it=_f1ts_cmps.begin();it!=_f1ts_cmps.end();it++)
2079     {
2080       const MEDFileField1TSStruct *cur(*it);
2081       if(cur)
2082         ret.push_back(cur);
2083     }
2084   return ret;
2085 }
2086
2087 bool MEDFileFastCellSupportComparator::isEqual(const MEDFileAnyTypeFieldMultiTS *other)
2088 {
2089   int nbPts=other->getNumberOfTS();
2090   if(nbPts!=(int)_f1ts_cmps.size())
2091     {
2092       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isEqual : unexpected nb of time steps in  input ! Should be " << _f1ts_cmps.size() << " it is in reality " << nbPts << " !";
2093       throw INTERP_KERNEL::Exception(oss.str().c_str());
2094     }
2095   for(int i=0;i<nbPts;i++)
2096     {
2097       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=other->getTimeStepAtPos(i);
2098       if(!_f1ts_cmps[i]->isEqualConsideringThePast(elt,_mesh_comp))
2099         if(!_f1ts_cmps[i]->isSupportSameAs(elt,_mesh_comp))
2100           return false;
2101     }
2102   return true;
2103 }
2104
2105 bool MEDFileFastCellSupportComparator::isCompatibleWithNodesDiscr(const MEDFileAnyTypeFieldMultiTS *other)
2106 {
2107   int nbPts=other->getNumberOfTS();
2108   if(nbPts!=(int)_f1ts_cmps.size())
2109     {
2110       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isCompatibleWithNodesDiscr : unexpected nb of time steps in  input ! Should be " << _f1ts_cmps.size() << " it is in reality " << nbPts << " !";
2111       throw INTERP_KERNEL::Exception(oss.str().c_str());
2112     }
2113   for(int i=0;i<nbPts;i++)
2114     {
2115       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=other->getTimeStepAtPos(i);
2116       if(!_f1ts_cmps[i]->isCompatibleWithNodesDiscr(elt,_mesh_comp))
2117         return false;
2118     }
2119   return true;
2120 }
2121
2122 MEDMeshMultiLev *MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport(int timeStepId, const MEDFileFieldGlobsReal *globs) const
2123 {
2124   if(timeStepId<0 || timeStepId>=(int)_f1ts_cmps.size())
2125     {
2126       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport : requested time step id #" << timeStepId << " is not in [0," << _f1ts_cmps.size() << ") !";
2127       throw INTERP_KERNEL::Exception(oss.str().c_str());
2128     }
2129   const MEDFileField1TSStruct *obj(_f1ts_cmps[timeStepId]);
2130   if(!obj)
2131     {
2132       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport : at time step id #" << timeStepId << " no field structure overview defined !";
2133       throw INTERP_KERNEL::Exception(oss.str().c_str());
2134     }
2135   return obj->buildFromScratchDataSetSupport(_mesh_comp,globs);
2136 }
2137
2138 bool MEDFileFastCellSupportComparator::isDataSetSupportEqualToThePreviousOne(int timeStepId, const MEDFileFieldGlobsReal *globs) const
2139 {
2140   if(timeStepId<=0 || timeStepId>=(int)_f1ts_cmps.size())
2141     {
2142       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isDataSetSupportEqualToThePreviousOne : requested time step id #" << timeStepId << " is not in [1," << _f1ts_cmps.size() << ") !";
2143       throw INTERP_KERNEL::Exception(oss.str().c_str());
2144     }
2145   const MEDFileField1TSStruct *obj(_f1ts_cmps[timeStepId]);
2146   const MEDFileField1TSStruct *objRef(_f1ts_cmps[timeStepId-1]);
2147   return objRef->isDataSetSupportFastlyEqualTo(*obj,globs);
2148 }