Salome HOME
MEDReader -> debugging session
[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,-1,-1,-1,-1,10,14,13,-1,12,-1,24,-1,16,27,-1,26,-1,29,-1,-1,25,42,-1,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::getHeapMemorySize() 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 MEDFileMeshStruct::MEDFileMeshStruct(const MEDFileMesh *mesh):_mesh(mesh)
49 {
50   std::vector<int> levs=mesh->getNonEmptyLevels();
51   _name=mesh->getName();
52   _nb_nodes=mesh->getNumberOfNodes();
53   _geo_types_distrib.resize(levs.size());
54   for(std::vector<int>::const_iterator lev=levs.begin();lev!=levs.end();lev++)
55     _geo_types_distrib[-(*lev)]=mesh->getDistributionOfTypes(*lev);
56 }
57
58 int MEDFileMeshStruct::getLevelOfGeoType(INTERP_KERNEL::NormalizedCellType t) const throw(INTERP_KERNEL::Exception)
59 {
60   int j=0;
61   for(std::vector< std::vector<int> >::const_iterator it1=_geo_types_distrib.begin();it1!=_geo_types_distrib.end();it1++,j--)
62     {
63       std::size_t sz=(*it1).size();
64       if(sz%3!=0)
65         throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getLevelOfGeoType : internal error in code !");
66       std::size_t nbGeo=sz/3;
67       for(std::size_t i=0;i<nbGeo;i++)
68         if((*it1)[3*i]==(int)t)
69           return j;
70     }
71   throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getLevelOfGeoType : The specified geometric type is not present in the mesh structure !");
72 }
73
74 int MEDFileMeshStruct::getNumberOfElemsOfGeoType(INTERP_KERNEL::NormalizedCellType t) const throw(INTERP_KERNEL::Exception)
75 {
76   for(std::vector< std::vector<int> >::const_iterator it1=_geo_types_distrib.begin();it1!=_geo_types_distrib.end();it1++)
77     {
78       std::size_t sz=(*it1).size();
79       if(sz%3!=0)
80         throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getNumberOfElemsOfGeoType : internal error in code !");
81       std::size_t nbGeo=sz/3;
82       for(std::size_t i=0;i<nbGeo;i++)
83         if((*it1)[3*i]==(int)t)
84           return (*it1)[3*i+1];
85     }
86   throw INTERP_KERNEL::Exception("The specified geometric type is not present in the mesh structure !");
87 }
88
89 int MEDFileMeshStruct::getNumberOfLevs() const
90 {
91   return (int)_geo_types_distrib.size();
92 }
93
94 int MEDFileMeshStruct::getNumberOfGeoTypesInLev(int relativeLev) const throw(INTERP_KERNEL::Exception)
95 {
96   int pos(-relativeLev);
97   if(pos<0 || pos>=_geo_types_distrib.size())
98     throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getNumberOfGeoTypesInLev : invalid level specified !");
99   std::size_t sz=_geo_types_distrib[pos].size();
100   if(sz%3!=0)
101     throw INTERP_KERNEL::Exception("MEDFileMeshStruct::getNumberOfGeoTypesInLev : internal error in code !");
102   return (int)(sz/3);
103 }
104
105 //=
106
107 std::size_t MEDMeshMultiLev::getHeapMemorySize() const
108 {
109   return 0;
110 }
111
112 MEDMeshMultiLev *MEDMeshMultiLev::New(const MEDFileMesh *m, const std::vector<int>& levs) throw(INTERP_KERNEL::Exception)
113 {
114   if(!m)
115     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New : null input pointer !");
116   const MEDFileUMesh *um(dynamic_cast<const MEDFileUMesh *>(m));
117   if(um)
118     return MEDUMeshMultiLev::New(um,levs);
119   const MEDFileCMesh *cm(dynamic_cast<const MEDFileCMesh *>(m));
120   if(cm)
121     return MEDCMeshMultiLev::New(cm,levs);
122   const MEDFileCurveLinearMesh *clm(dynamic_cast<const MEDFileCurveLinearMesh *>(m));
123   if(clm)
124     return MEDCurveLinearMeshMultiLev::New(clm,levs);
125   throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New : unrecognized type of mesh ! Must be in [MEDFileUMesh,MEDFileCMesh,MEDFileCurveLinearMesh] !");
126 }
127
128 MEDMeshMultiLev *MEDMeshMultiLev::New(const MEDFileMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities) throw(INTERP_KERNEL::Exception)
129 {
130   if(!m)
131     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New 2 : null input pointer !");
132   const MEDFileUMesh *um(dynamic_cast<const MEDFileUMesh *>(m));
133   if(um)
134     return MEDUMeshMultiLev::New(um,gts,pfls,nbEntities);
135   const MEDFileCMesh *cm(dynamic_cast<const MEDFileCMesh *>(m));
136   if(cm)
137     return MEDCMeshMultiLev::New(cm,gts,pfls,nbEntities);
138   const MEDFileCurveLinearMesh *clm(dynamic_cast<const MEDFileCurveLinearMesh *>(m));
139   if(clm)
140     return MEDCurveLinearMeshMultiLev::New(clm,gts,pfls,nbEntities);
141   throw INTERP_KERNEL::Exception("MEDMeshMultiLev::New 2 : unrecognized type of mesh ! Must be in [MEDFileUMesh,MEDFileCMesh,MEDFileCurveLinearMesh] !");
142 }
143
144 MEDMeshMultiLev *MEDMeshMultiLev::NewOnlyOnNode(const MEDFileMesh *m, const DataArrayInt *pflOnNode) throw(INTERP_KERNEL::Exception)
145 {
146   std::vector<int> levs(1,0);
147   MEDCouplingAutoRefCountObjectPtr<MEDMeshMultiLev> ret(MEDMeshMultiLev::New(m,levs));
148   ret->selectPartOfNodes(pflOnNode);
149   return ret.retn();
150 }
151
152 void MEDMeshMultiLev::setNodeReduction(const DataArrayInt *nr)
153 {
154   if(nr)
155     nr->incrRef();
156   _node_reduction=const_cast<DataArrayInt*>(nr);
157 }
158
159 bool MEDMeshMultiLev::isFastlyTheSameStruct(const MEDFileField1TSStructItem& fst, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
160 {
161   if(fst.getType()==ON_NODES)
162     {
163       if(fst.getNumberOfItems()!=1)
164         throw INTERP_KERNEL::Exception("MEDMeshMultiLev::isFastlyTheSameStruct : unexpected situation for nodes !");
165       const MEDFileField1TSStructItem2& p(fst[0]);
166       std::string pflName(p.getPflName());
167       const DataArrayInt *nr(_node_reduction);
168       if(pflName.empty() && !nr)
169         return true;
170       if(pflName==nr->getName())
171         return true;
172       return false;
173     }
174   else
175     {
176       std::size_t sz(fst.getNumberOfItems());
177       if(sz!=_geo_types.size())
178         return false;
179       int strt(0);
180       for(std::size_t i=0;i<sz;i++)
181         {
182           const MEDFileField1TSStructItem2& p(fst[i]);
183           if(!p.isFastlyEqual(strt,_geo_types[i],getPflNameOfId(i).c_str()))
184             return false;
185         }
186       return true;
187     }
188 }
189
190 DataArray *MEDMeshMultiLev::buildDataArray(const MEDFileField1TSStructItem& fst, const MEDFileFieldGlobsReal *globs, const DataArray *vals) const throw(INTERP_KERNEL::Exception)
191 {
192   MEDCouplingAutoRefCountObjectPtr<DataArray> ret(const_cast<DataArray *>(vals)); ret->incrRef();
193   if(isFastlyTheSameStruct(fst,globs))
194     return ret.retn();
195   else
196     return constructDataArray(fst,globs,vals);
197 }
198
199 std::string MEDMeshMultiLev::getPflNameOfId(int id) const
200 {
201   std::size_t sz(_pfls.size());
202   if(id<0 || id>=sz)
203     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::getPflNameOfId : invalid input id !");
204   const DataArrayInt *pfl(_pfls[id]);
205   if(!pfl)
206     return std::string("");
207   return pfl->getName();
208 }
209
210 DataArray *MEDMeshMultiLev::constructDataArray(const MEDFileField1TSStructItem& fst, const MEDFileFieldGlobsReal *globs, const DataArray *vals) const throw(INTERP_KERNEL::Exception)
211 {
212   if(fst.getType()==ON_NODES)
213     {
214       if(fst.getNumberOfItems()!=1)
215         throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes !");
216       const MEDFileField1TSStructItem2& p(fst[0]);
217       std::string pflName(p.getPflName());
218       const DataArrayInt *nr(_node_reduction);
219       if(pflName.empty() && !nr)
220         return vals->deepCpy();
221       if(pflName.empty() && nr)
222          throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 2 !");
223       if(!pflName.empty() && nr)
224         {
225           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(globs->getProfile(pflName.c_str())->deepCpy());
226           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p2(nr->deepCpy());
227           p1->sort(true); p2->sort(true);
228           if(!p1->isEqualWithoutConsideringStr(*p2))
229             throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 3 !");
230           p1=DataArrayInt::FindPermutationFromFirstToSecond(globs->getProfile(pflName.c_str()),nr);
231           MEDCouplingAutoRefCountObjectPtr<DataArray> ret(vals->deepCpy());
232           ret->renumberInPlace(p1->begin());
233           return ret.retn();
234         }
235       if(!pflName.empty() && !nr)
236         {
237           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(globs->getProfile(pflName.c_str())->deepCpy());
238           p1->sort(true);
239           if(!p1->isIdentity() || p1->getNumberOfTuples()!=p.getNbEntity())
240             throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 4 !");
241           MEDCouplingAutoRefCountObjectPtr<DataArray> ret(vals->deepCpy());
242           ret->renumberInPlace(globs->getProfile(pflName.c_str())->begin());
243           return ret.retn();
244         }
245       throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for nodes 5 !");
246     }
247   else
248     {
249       std::size_t sz(fst.getNumberOfItems());
250       std::vector< MEDCouplingAutoRefCountObjectPtr<DataArray> > arrSafe(sz);
251       std::vector< const DataArray *> arr(sz);
252       for(std::size_t i=0;i<sz;i++)
253         {
254           const MEDFileField1TSStructItem2& p(fst[i]);
255           const std::pair<int,int>& strtStop(p.getStartStop());
256           std::vector< INTERP_KERNEL::NormalizedCellType >::const_iterator it(std::find(_geo_types.begin(),_geo_types.end(),p.getGeo()));
257           if(it==_geo_types.end())
258             throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 1 !");
259           if(std::find(it+1,_geo_types.end(),p.getGeo())!=_geo_types.end())
260             throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 2 !");
261           std::size_t pos(std::distance(_geo_types.begin(),it));
262           const DataArrayInt *thisP(_pfls[pos]),*otherP(p.getPfl(globs));
263           MEDCouplingAutoRefCountObjectPtr<DataArray> ret(vals->selectByTupleId2(strtStop.first,strtStop.second,1));
264           if(!thisP && !otherP)
265             {
266               arrSafe[i]=ret; arr[i]=ret;
267               continue;
268             }
269           int nbi(p.getNbOfIntegrationPts(globs)),nc(ret->getNumberOfComponents());
270           if(!thisP && otherP)
271             {
272               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(otherP->deepCpy());
273               p1->sort(true);
274               if(!p1->isIdentity() || p1->getNumberOfTuples()!=p.getNbEntity())
275                 throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 3 !");
276               ret->rearrange(nbi*nc); ret->renumberInPlace(otherP->begin()); ret->rearrange(nc);
277               arrSafe[i]=ret; arr[i]=ret;
278               continue;
279             }
280           if(thisP && otherP)
281             {
282               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(otherP->deepCpy());
283               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p2(thisP->deepCpy());
284               p1->sort(true); p2->sort(true);
285               if(!p1->isEqualWithoutConsideringStr(*p2))
286                 throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 4 !");
287               p1=DataArrayInt::FindPermutationFromFirstToSecond(otherP,thisP);
288               ret->rearrange(nbi*nc); ret->renumberInPlace(p1->begin()); ret->rearrange(nc);
289               continue;
290             }
291           if(thisP && !otherP)
292             {
293               MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p1(thisP->deepCpy());
294               p1->sort(true);
295               if(!p1->isIdentity() || p1->getNumberOfTuples()!=p.getNbEntity())
296                 throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 3 !");
297               ret->rearrange(nbi*nc); ret->renumberInPlaceR(otherP->begin()); ret->rearrange(nc);
298               arrSafe[i]=ret; arr[i]=ret;
299               continue;
300             }
301           throw INTERP_KERNEL::Exception("MEDMeshMultiLev::constructDataArray : unexpected situation for cells 6 !");
302         }
303       return DataArray::Aggregate(arr);
304     }
305 }
306
307 MEDMeshMultiLev::MEDMeshMultiLev()
308 {
309 }
310
311 MEDMeshMultiLev::MEDMeshMultiLev(const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):_geo_types(gts),_nb_entities(nbEntities)
312 {
313   std::size_t sz(_geo_types.size());
314   if(sz!=pfls.size() || sz!=nbEntities.size())
315     throw INTERP_KERNEL::Exception("MEDMeshMultiLev::MEDMeshMultiLev : input vector must have the same size !");
316   _pfls.resize(sz);
317   for(std::size_t i=0;i<sz;i++)
318     {
319       if(pfls[i])
320         pfls[i]->incrRef();
321       _pfls[i]=const_cast<DataArrayInt *>(pfls[i]);
322     }
323 }
324
325 MEDMeshMultiLev::MEDMeshMultiLev(const MEDMeshMultiLev& other):_pfls(other._pfls),_geo_types(other._geo_types),_nb_entities(other._nb_entities),_node_reduction(other._node_reduction)
326 {
327 }
328
329 //=
330
331 MEDUMeshMultiLev *MEDUMeshMultiLev::New(const MEDFileUMesh *m, const std::vector<int>& levs) throw(INTERP_KERNEL::Exception)
332 {
333   return new MEDUMeshMultiLev(m,levs);
334 }
335
336 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDFileUMesh *m, const std::vector<int>& levs)
337 {
338   if(!m)
339     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev constructor : null input pointer !");
340   std::vector<MEDCoupling1GTUMesh *> v;
341   for(std::vector<int>::const_iterator it=levs.begin();it!=levs.end();it++)
342     {
343       std::vector<MEDCoupling1GTUMesh *> vTmp(m->getDirectUndergroundSingleGeoTypeMeshes(*it));
344       v.insert(v.end(),vTmp.begin(),vTmp.end());
345     }
346   std::size_t sz(v.size());
347   _parts.resize(sz);
348   _pfls.resize(sz);
349   _geo_types.resize(sz);
350   for(std::size_t i=0;i<sz;i++)
351     {
352       MEDCoupling1GTUMesh *obj(v[i]);
353       if(obj)
354         obj->incrRef();
355       else
356         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev constructor : presence of a null pointer !");
357       _parts[i]=obj;
358       _geo_types[i]=obj->getCellModelEnum();
359     }
360 }
361
362 MEDUMeshMultiLev *MEDUMeshMultiLev::New(const MEDFileUMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities) throw(INTERP_KERNEL::Exception)
363 {
364   return new MEDUMeshMultiLev(m,gts,pfls,nbEntities);
365 }
366
367 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDFileUMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDMeshMultiLev(gts,pfls,nbEntities)
368 {
369   std::size_t sz(gts.size());
370   _parts.resize(sz);
371   for(std::size_t i=0;i<sz;i++)
372     {
373       MEDCoupling1GTUMesh *elt(m->getDirectUndergroundSingleGeoTypeMesh(gts[i]));
374       if(elt)
375         elt->incrRef();
376       _parts[i]=elt;
377     }
378 }
379
380 void MEDUMeshMultiLev::selectPartOfNodes(const DataArrayInt *pflNodes) throw(INTERP_KERNEL::Exception)
381 {
382    if(!pflNodes || !pflNodes->isAllocated())
383      return ;
384    std::size_t sz(_parts.size());
385    std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > a(sz);
386    std::vector< const DataArrayInt *> aa(sz);
387    for(std::size_t i=0;i<sz;i++)
388      {
389        
390        const DataArrayInt *pfl(_pfls[i]);
391        MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m(_parts[i]);
392        if(pfl)
393          m=dynamic_cast<MEDCoupling1GTUMesh *>(_parts[i]->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
394        DataArrayInt *cellIds=0;
395        m->fillCellIdsToKeepFromNodeIds(pflNodes->begin(),pflNodes->end(),true,cellIds);
396        MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cellIdsSafe(cellIds);
397        MEDCouplingAutoRefCountObjectPtr<MEDCouplingPointSet> m2(m->buildPartOfMySelfKeepCoords(cellIds->begin(),cellIds->end()));
398        int tmp=-1;
399        a[i]=m2->getNodeIdsInUse(tmp); aa[i]=a[i];
400        if(pfl)
401          _pfls[i]=pfl->selectByTupleIdSafe(cellIds->begin(),cellIds->end());
402        else
403          _pfls[i]=cellIdsSafe;
404      }
405    _node_reduction=DataArrayInt::Aggregate(aa);
406    _node_reduction->sort(true);
407    _node_reduction=_node_reduction->buildUnique();
408 }
409
410 MEDMeshMultiLev *MEDUMeshMultiLev::prepare() const throw(INTERP_KERNEL::Exception)
411 {
412   return new MEDUMeshMultiLev(*this);
413 }
414
415 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDUMeshMultiLev& other):MEDMeshMultiLev(other),_parts(other._parts)
416 {
417 }
418
419 MEDUMeshMultiLev::MEDUMeshMultiLev(const MEDStructuredMeshMultiLev& other, const MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh>& part):MEDMeshMultiLev(other)
420 {
421   _parts.resize(1);
422   _parts[0]=part;
423 }
424
425 void MEDUMeshMultiLev::buildVTUArrays(DataArrayDouble *& coords, DataArrayByte *&types, DataArrayInt *&cellLocations, DataArrayInt *& cells, DataArrayInt *&faceLocations, DataArrayInt *&faces) const throw(INTERP_KERNEL::Exception)
426 {
427   if(_parts.empty())
428     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : empty array !");
429   if(!(const MEDCoupling1GTUMesh *)_parts[0])
430     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : first part is null !");
431   const DataArrayDouble *tmp(_parts[0]->getCoords());
432   if(!tmp)
433     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : the coordinates are null !");
434   MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> a(const_cast<DataArrayDouble *>(tmp)); tmp->incrRef();
435   int szBCE(0),szD(0),szF(0);
436   bool isPolyh(false);
437   int iii(0);
438   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_parts.begin();it!=_parts.end();it++,iii++)
439     {
440       const MEDCoupling1GTUMesh *cur(*it);
441       if(!cur)
442         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : a part is null !");
443       //
444       const DataArrayInt *pfl(_pfls[iii]);
445       MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> cur2;
446       if(!pfl)
447         { cur2=const_cast<MEDCoupling1GTUMesh *>(cur); cur2->incrRef(); }
448       else
449         { cur2=dynamic_cast<MEDCoupling1GTUMesh *>(cur->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end())); cur=cur2; }
450       //
451       int curNbCells(cur->getNumberOfCells());
452       szBCE+=curNbCells;
453       if((*it)->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
454         szD+=cur->getNodalConnectivity()->getNumberOfTuples()+curNbCells;
455       else
456         {
457           isPolyh=true;
458           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp(cur->computeEffectiveNbOfNodesPerCell());
459           szD+=tmp->accumulate(0)+curNbCells;
460           szF+=2*curNbCells+cur->getNodalConnectivity()->getNumberOfTuples();
461         }
462     }
463   MEDCouplingAutoRefCountObjectPtr<DataArrayByte> b(DataArrayByte::New()); b->alloc(szBCE,1); char *bPtr(b->getPointer());
464   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> c(DataArrayInt::New()); c->alloc(szBCE,1); int *cPtr(c->getPointer());
465   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> d(DataArrayInt::New()); d->alloc(szD,1); int *dPtr(d->getPointer());
466   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> e(DataArrayInt::New()),f(DataArrayInt::New()); int *ePtr(0),*fPtr(0);
467   if(isPolyh)
468     { e->alloc(szBCE,1); ePtr=e->getPointer(); f->alloc(szF,1); fPtr=f->getPointer(); }
469   int k(0);
470   iii=0;
471   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_parts.begin();it!=_parts.end();it++,iii++)
472     {
473       const MEDCoupling1GTUMesh *cur(*it);
474       //
475       const DataArrayInt *pfl(_pfls[iii]);
476       MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> cur2;
477       if(!pfl)
478         { cur2=const_cast<MEDCoupling1GTUMesh *>(cur); cur2->incrRef(); }
479       else
480         { cur2=dynamic_cast<MEDCoupling1GTUMesh *>(cur->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end())); cur=cur2; }
481       //
482       int curNbCells(cur->getNumberOfCells());
483       int gt((int)cur->getCellModelEnum());
484       if(gt<0 || gt>=PARAMEDMEM_2_VTKTYPE_LGTH)
485         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : invalid geometric type !");
486       unsigned char gtvtk(PARAMEDMEM_2_VTKTYPE[gt]);
487       if(gtvtk==-1)
488         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : no VTK type for the requested INTERP_KERNEL geometric type !");
489       std::fill(bPtr,bPtr+curNbCells,gtvtk); bPtr+=curNbCells;
490       const MEDCoupling1SGTUMesh *scur(dynamic_cast<const MEDCoupling1SGTUMesh *>(cur));
491       const MEDCoupling1DGTUMesh *dcur(dynamic_cast<const MEDCoupling1DGTUMesh *>(cur));
492       const int *connPtr(cur->getNodalConnectivity()->begin());
493       if(!scur && !dcur)
494         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : internal error !");
495       if(scur)
496         {
497           int nnpc(scur->getNumberOfNodesPerCell());
498           for(int i=0;i<curNbCells;i++,connPtr+=nnpc)
499             {
500               *dPtr++=nnpc;
501               dPtr=std::copy(connPtr,connPtr+nnpc,dPtr);
502               *cPtr=k+nnpc; k=*cPtr++;
503             }
504           if(isPolyh)
505             { std::fill(ePtr,ePtr+curNbCells,-1); ePtr+=curNbCells; }
506         }
507       else
508         {
509           const int *connIPtr(dcur->getNodalConnectivityIndex()->begin());
510           if(cur->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
511             {
512               for(int i=0;i<curNbCells;i++,connIPtr++)
513                 {
514                   *dPtr++=connIPtr[1]-connIPtr[0];
515                   dPtr=std::copy(connPtr+connIPtr[0],connPtr+connIPtr[1],dPtr);
516                   *cPtr=k+connIPtr[1]-connIPtr[0]; k=*cPtr++;
517                 }
518             }
519           else
520             {
521               for(int i=0;i<curNbCells;i++,connIPtr++)
522                 {
523                   std::set<int> s(connPtr+connIPtr[0],connPtr+connIPtr[1]);
524                   *dPtr++=(int)s.size();
525                   dPtr=std::copy(s.begin(),s.end(),dPtr);
526                   *cPtr=k+(int)s.size(); k=*cPtr++;
527                 }
528             }
529           if(isPolyh)
530             {
531               connIPtr=dcur->getNodalConnectivityIndex()->begin();
532               if(cur->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
533                 { std::fill(ePtr,ePtr+curNbCells,-1); ePtr+=curNbCells; }
534               else
535                 {
536                   int kk(0);
537                   for(int i=0;i<curNbCells;i++,connIPtr++)
538                     {
539                       int nbFace(std::count(connPtr+connIPtr[0],connPtr+connIPtr[1],-1)+1);
540                       *fPtr++=nbFace;
541                       const int *work(connPtr+connIPtr[0]);
542                       for(int j=0;j<nbFace;j++)
543                         {
544                           const int *work2=std::find(work,connPtr+connIPtr[1],-1);
545                           *fPtr++=std::distance(work,work2);
546                           fPtr=std::copy(work,work2,fPtr);
547                           work=work2+1;
548                         }
549                       *ePtr=kk; kk+=connIPtr[1]-connIPtr[0]+2;
550                     }
551                 }
552             }
553         }
554     }
555   if(!isPolyh)
556     reorderNodesIfNecessary(a,d,0);
557   else
558     reorderNodesIfNecessary(a,d,f);
559   coords=a.retn(); types=b.retn(); cellLocations=c.retn(); cells=d.retn();
560   if(!isPolyh)
561     { faceLocations=0; faces=0; }
562   else
563     { faceLocations=e.retn(); faces=f.retn(); }
564 }
565
566 void MEDUMeshMultiLev::reorderNodesIfNecessary(MEDCouplingAutoRefCountObjectPtr<DataArrayDouble>& coords, DataArrayInt *nodalConnVTK, DataArrayInt *polyhedNodalConnVTK) const throw(INTERP_KERNEL::Exception)
567 {
568   const DataArrayInt *nr(_node_reduction);
569   if(!nr)
570     return ;
571   int sz(coords->getNumberOfTuples());
572   std::vector<bool> b(sz,false);
573   const int *work(nodalConnVTK->begin()),*endW(nodalConnVTK->end());
574   while(work!=endW)
575     {
576       int nb(*work++);
577       for(int i=0;i<nb && work!=endW;i++,work++)
578         {
579           if(*work>=0 && *work<sz)
580             b[*work]=true;
581           else
582             throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::reorderNodesIfNecessary : internal error !");
583         }
584     }
585   if(polyhedNodalConnVTK)
586     {
587       work=polyhedNodalConnVTK->begin(); endW=polyhedNodalConnVTK->end();
588       while(work!=endW)
589         {
590           int nb(*work++);
591           for(int i=0;i<nb && work!=endW;i++)
592             {
593               int nb2(*work++);
594               for(int j=0;j<nb2 && work!=endW;j++,work++)
595                 {
596                   if(*work>=0 && *work<sz)
597                     b[*work]=true;
598                   else
599                     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::reorderNodesIfNecessary : internal error #2 !");
600                 }
601             }
602         }
603     }
604   int szExp(std::count(b.begin(),b.end(),true));
605   if(szExp!=nr->getNumberOfTuples())
606     throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::reorderNodesIfNecessary : internal error #3 !");
607   // Go renumbering !
608   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> o2n(DataArrayInt::New()); o2n->alloc(sz,1);
609   int *o2nPtr(o2n->getPointer());
610   int newId(0);
611   for(int i=0;i<sz;i++,o2nPtr++)
612     if(b[i]) *o2nPtr=newId++; else *o2nPtr=-1;
613   const int *o2nPtrc(o2n->begin());
614   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> n2o(o2n->invertArrayO2N2N2O(nr->getNumberOfTuples()));
615   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> perm(DataArrayInt::FindPermutationFromFirstToSecond(n2o,nr));
616   const int *permPtr(perm->begin());
617   int *work2(nodalConnVTK->getPointer()),*endW2(nodalConnVTK->getPointer()+nodalConnVTK->getNumberOfTuples());
618   while(work2!=endW2)
619     {
620       int nb(*work2++);
621       for(int i=0;i<nb && work2!=endW2;i++,work2++)
622         *work2=permPtr[o2nPtrc[*work2]];
623     }
624   if(polyhedNodalConnVTK)
625     {
626       work2=polyhedNodalConnVTK->getPointer(); endW2=polyhedNodalConnVTK->getPointer()+polyhedNodalConnVTK->getNumberOfTuples();
627       while(work2!=endW2)
628         {
629           int nb(*work2++);
630           for(int i=0;i<nb && work2!=endW2;i++)
631             {
632               int nb2(*work2++);
633               for(int j=0;j<nb2 && work2!=endW2;j++,work2++)
634                 *work2=permPtr[o2nPtrc[*work2]];
635             }
636         }
637     }
638   coords=(coords->selectByTupleIdSafe(nr->begin(),nr->end()));
639 }
640
641 //=
642
643 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev()
644 {
645 }
646
647 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev(const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDMeshMultiLev(gts,pfls,nbEntities)
648 {
649 }
650
651 void MEDStructuredMeshMultiLev::selectPartOfNodes(const DataArrayInt *pflNodes) throw(INTERP_KERNEL::Exception)
652 {
653   if(!pflNodes || !pflNodes->isAllocated())
654     return ;
655   std::vector<int> ngs(getNodeGridStructure());
656   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> conn(MEDCouplingStructuredMesh::Build1GTNodalConnectivity(&ngs[0],&ngs[0]+ngs.size()));
657   MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m(MEDCoupling1SGTUMesh::New("",MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(ngs.size())));
658   m->setNodalConnectivity(conn);
659   const DataArrayInt *pfl(_pfls[0]);
660   if(pfl)
661     {
662       m=dynamic_cast<MEDCoupling1SGTUMesh *>(m->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
663     }
664   DataArrayInt *cellIds=0;
665   m->fillCellIdsToKeepFromNodeIds(pflNodes->begin(),pflNodes->end(),true,cellIds);
666   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cellIdsSafe(cellIds);
667   MEDCouplingAutoRefCountObjectPtr<MEDCouplingPointSet> m2(m->buildPartOfMySelfKeepCoords(cellIds->begin(),cellIds->end()));
668   int tmp=-1;
669   _node_reduction=m2->getNodeIdsInUse(tmp);
670   if(pfl)
671     _pfls[0]=pfl->selectByTupleIdSafe(cellIds->begin(),cellIds->end());
672   else
673     _pfls[0]=cellIdsSafe;
674 }
675
676 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev(const MEDStructuredMeshMultiLev& other):MEDMeshMultiLev(other)
677 {
678 }
679
680 //=
681
682 MEDCMeshMultiLev *MEDCMeshMultiLev::New(const MEDFileCMesh *m, const std::vector<int>& levs) throw(INTERP_KERNEL::Exception)
683 {
684   return new MEDCMeshMultiLev(m,levs);
685 }
686
687 MEDCMeshMultiLev *MEDCMeshMultiLev::New(const MEDFileCMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities) throw(INTERP_KERNEL::Exception)
688 {
689   return new MEDCMeshMultiLev(m,gts,pfls,nbEntities);
690 }
691
692 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDFileCMesh *m, const std::vector<int>& levs)
693 {
694   if(!m)
695     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor : null input pointer !");
696   if(levs.size()!=1 || levs[0]!=0)
697     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor : levels supported is 0 only !");
698   int mdim(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(m->getMeshDimension()));
699   _coords.resize(mdim);
700   for(int i=0;i<mdim;i++)
701     {
702       DataArrayDouble *elt(const_cast<DataArrayDouble *>(m->getMesh()->getCoordsAt(i)));
703       if(!elt)
704         throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : presence of null pointer for an vector of double along an axis !");
705       _coords[i]=elt;
706     }
707 }
708
709 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDFileCMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDStructuredMeshMultiLev(gts,pfls,nbEntities)
710 {
711   if(!m)
712     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : null input pointer !");
713   if(gts.size()!=1 || pfls.size()!=1)
714     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : lengthes of gts and pfls must be equal to one !");
715   int mdim(m->getMeshDimension());
716   INTERP_KERNEL::NormalizedCellType gt(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(mdim));
717   if(gt!=gts[0])
718     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : the unique geo type is invalid regarding meshdim !");
719   _coords.resize(mdim);
720   for(int i=0;i<mdim;i++)
721     {
722       DataArrayDouble *elt(const_cast<DataArrayDouble *>(m->getMesh()->getCoordsAt(i)));
723       if(!elt)
724         throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : presence of null pointer for an vector of double along an axis !");
725       _coords[i]=elt;
726     }
727 }
728
729 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDCMeshMultiLev& other):MEDStructuredMeshMultiLev(other)
730 {
731 }
732
733 std::vector<int> MEDCMeshMultiLev::getNodeGridStructure() const throw(INTERP_KERNEL::Exception)
734 {
735   std::vector<int> ret(_coords.size());
736   for(std::size_t i=0;i<_coords.size();i++)
737     ret[i]=_coords[i]->getNumberOfTuples();
738   return ret;
739 }
740
741 MEDMeshMultiLev *MEDCMeshMultiLev::prepare() const throw(INTERP_KERNEL::Exception)
742 {
743   const DataArrayInt *pfl(_pfls[0]),*nr(_node_reduction);
744   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> nnr;
745   std::vector<int> cgs,ngs(getNodeGridStructure());
746   cgs.resize(ngs.size());
747   std::transform(ngs.begin(),ngs.end(),cgs.begin(),std::bind2nd(std::plus<int>(),-1));
748   if(pfl)
749     {
750       std::vector< std::pair<int,int> > cellParts;
751       if(MEDCouplingStructuredMesh::IsPartStructured(pfl->begin(),pfl->end(),cgs,cellParts))
752         {
753           MEDCouplingAutoRefCountObjectPtr<MEDCMeshMultiLev> ret(new MEDCMeshMultiLev(*this));
754           if(nr)
755             { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
756           ret->_nb_entities[0]=pfl->getNumberOfTuples();
757           ret->_pfls[0]=0;
758           std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> > coords(_coords.size());
759           for(std::size_t i=0;i<_coords.size();i++)
760             coords[i]=_coords[i]->selectByTupleId2(cellParts[i].first,cellParts[i].second+1,1);
761           ret->_coords=coords;
762           return ret.retn();
763         }
764       else
765         {
766           MEDCouplingAutoRefCountObjectPtr<MEDCouplingCMesh> m(MEDCouplingCMesh::New());
767           for(std::size_t i=0;i<ngs.size();i++)
768             m->setCoordsAt(i,_coords[i]);
769           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m2(m->build1SGTUnstructured());
770           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m3=dynamic_cast<MEDCoupling1GTUMesh *>(m2->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
771           MEDCouplingAutoRefCountObjectPtr<MEDUMeshMultiLev> ret(new MEDUMeshMultiLev(*this,m3));
772           if(nr)
773             { m3->zipCoords(); nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
774           return ret.retn();
775         }
776     }
777   else
778     {
779       MEDCouplingAutoRefCountObjectPtr<MEDCMeshMultiLev> ret(new MEDCMeshMultiLev(*this));
780       if(nr)
781         { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
782       return ret.retn();
783     }
784 }
785
786 std::vector< DataArrayDouble * > MEDCMeshMultiLev::buildVTUArrays() const throw(INTERP_KERNEL::Exception)
787 {
788   std::size_t sz(_coords.size());
789   std::vector< DataArrayDouble * > ret(sz);
790   for(std::size_t i=0;i<sz;i++)
791     {
792       ret[i]=const_cast<DataArrayDouble *>((const DataArrayDouble *)_coords[i]);
793       ret[i]->incrRef();
794     }
795   return ret;
796 }
797
798 //=
799
800 MEDCurveLinearMeshMultiLev *MEDCurveLinearMeshMultiLev::New(const MEDFileCurveLinearMesh *m, const std::vector<int>& levs) throw(INTERP_KERNEL::Exception)
801 {
802   return new MEDCurveLinearMeshMultiLev(m,levs);
803 }
804
805 MEDCurveLinearMeshMultiLev *MEDCurveLinearMeshMultiLev::New(const MEDFileCurveLinearMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities) throw(INTERP_KERNEL::Exception)
806 {
807   return new MEDCurveLinearMeshMultiLev(m,gts,pfls,nbEntities);
808 }
809
810 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDFileCurveLinearMesh *m, const std::vector<int>& levs)
811 {
812   if(!m)
813     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor : null input pointer !");
814   if(levs.size()!=1 || levs[0]!=0)
815     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor : levels supported is 0 only !");
816   DataArrayDouble *coords(const_cast<DataArrayDouble *>(m->getMesh()->getCoords()));
817   if(!coords)
818     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : no coords set !");
819   coords->incrRef();
820   _coords=coords;
821   _structure=m->getMesh()->getNodeGridStructure();
822 }
823
824 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDFileCurveLinearMesh *m, const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDStructuredMeshMultiLev(gts,pfls,nbEntities)
825 {
826   if(!m)
827     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : null input pointer !");
828   if(gts.size()!=1 || pfls.size()!=1)
829     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : lengthes of gts and pfls must be equal to one !");
830   int mdim(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(m->getMeshDimension()));
831   if(mdim!=gts[0])
832     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : the unique geo type is invalid regarding meshdim !");
833   DataArrayDouble *coords(const_cast<DataArrayDouble *>(m->getMesh()->getCoords()));
834   if(!coords)
835     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : no coords set !");
836   coords->incrRef();
837   _coords=coords;
838   _structure=m->getMesh()->getNodeGridStructure();
839 }
840
841 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDCurveLinearMeshMultiLev& other):MEDStructuredMeshMultiLev(other),_coords(other._coords),_structure(other._structure)
842 {
843 }
844
845 std::vector<int> MEDCurveLinearMeshMultiLev::getNodeGridStructure() const throw(INTERP_KERNEL::Exception)
846 {
847   return _structure;
848 }
849
850 MEDMeshMultiLev *MEDCurveLinearMeshMultiLev::prepare() const throw(INTERP_KERNEL::Exception)
851 {
852   const DataArrayInt *pfl(_pfls[0]),*nr(_node_reduction);
853   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> nnr;
854   std::vector<int> cgs,ngs(getNodeGridStructure());
855   cgs.resize(ngs.size());
856   std::transform(ngs.begin(),ngs.end(),cgs.begin(),std::bind2nd(std::plus<int>(),-1));
857   if(pfl)
858     {
859       std::vector< std::pair<int,int> > cellParts,nodeParts;
860       if(MEDCouplingStructuredMesh::IsPartStructured(pfl->begin(),pfl->end(),cgs,cellParts))
861         {
862           nodeParts=cellParts;
863           std::vector<int> st(ngs.size());
864           for(std::size_t i=0;i<ngs.size();i++)
865             {
866               nodeParts[i].second++;
867               st[i]=nodeParts[i].second-nodeParts[i].first;
868             }
869           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p(MEDCouplingStructuredMesh::BuildExplicitIdsFrom(ngs,nodeParts));
870           MEDCouplingAutoRefCountObjectPtr<MEDCurveLinearMeshMultiLev> ret(new MEDCurveLinearMeshMultiLev(*this));
871           if(nr)
872             { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
873           ret->_nb_entities[0]=pfl->getNumberOfTuples();
874           ret->_pfls[0]=0;
875           ret->_coords=_coords->selectByTupleIdSafe(p->begin(),p->end());
876           ret->_structure=st;
877           return ret.retn();
878         }
879       else
880         {
881           MEDCouplingAutoRefCountObjectPtr<MEDCouplingCurveLinearMesh> m(MEDCouplingCurveLinearMesh::New());
882           m->setCoords(_coords); m->setNodeGridStructure(&_structure[0],&_structure[0]+_structure.size());
883           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m2(m->build1SGTUnstructured());
884           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m3=dynamic_cast<MEDCoupling1GTUMesh *>(m2->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
885           MEDCouplingAutoRefCountObjectPtr<MEDUMeshMultiLev> ret(new MEDUMeshMultiLev(*this,m3));
886           if(nr)
887             { m3->zipCoords(); nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
888           return ret.retn();
889         }
890     }
891   else
892     {
893       MEDCouplingAutoRefCountObjectPtr<MEDCurveLinearMeshMultiLev> ret(new MEDCurveLinearMeshMultiLev(*this));
894       if(nr)
895         { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
896       return ret.retn();
897     }
898 }
899
900 void MEDCurveLinearMeshMultiLev::buildVTUArrays(DataArrayDouble *&coords, std::vector<int>& nodeStrct) const throw(INTERP_KERNEL::Exception)
901 {
902   nodeStrct=_structure;
903   const DataArrayDouble *coo(_coords);
904   if(!coo)
905     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev::buildVTUArrays : null pointer on coordinates !");
906   coords=const_cast<DataArrayDouble *>(coo); coords->incrRef();
907 }
908
909 //=
910
911 MEDFileField1TSStructItem2::MEDFileField1TSStructItem2()
912 {
913 }
914
915 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)
916 {
917   _pfl->setName(c.c_str());
918 }
919
920 void MEDFileField1TSStructItem2::checkWithMeshStructForCells(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
921 {
922   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
923   checkInRange(nbOfEnt,1,globs);
924 }
925
926 void MEDFileField1TSStructItem2::checkWithMeshStructForGaussNE(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
927 {
928   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
929   const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(_geo_type);
930   checkInRange(nbOfEnt,(int)cm.getNumberOfNodes(),globs);
931 }
932
933 void MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
934 {
935   if(!globs)
936     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT : no globals specified !");
937   if(_loc.empty())
938     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT : no localization specified !");
939   const MEDFileFieldLoc& loc=globs->getLocalization(_loc.c_str());
940   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
941   checkInRange(nbOfEnt,loc.getNumberOfGaussPoints(),globs);
942 }
943
944 int MEDFileField1TSStructItem2::getNbOfIntegrationPts(const MEDFileFieldGlobsReal *globs) const
945 {
946   if(_loc.empty())
947     {
948       if(getPflName().empty())
949         return (_start_end.second-_start_end.first)/_nb_of_entity;
950       else
951         return (_start_end.second-_start_end.first)/getPfl(globs)->getNumberOfTuples();
952     }
953   else
954     {
955       const MEDFileFieldLoc& loc(globs->getLocalization(_loc.c_str()));
956       return loc.getNumberOfGaussPoints();
957     }
958 }
959
960 std::string MEDFileField1TSStructItem2::getPflName() const
961 {
962   return _pfl->getName();
963 }
964
965 const DataArrayInt *MEDFileField1TSStructItem2::getPfl(const MEDFileFieldGlobsReal *globs) const
966 {
967   if(!_pfl->isAllocated())
968     {
969       if(_pfl->getName().empty())
970         return 0;
971       else
972         return globs->getProfile(_pfl->getName().c_str());
973     }
974   else
975     return _pfl;
976 }
977
978 /*!
979  * \param [in] nbOfEntity - number of entity that can be either cells or nodes. Not other possiblity.
980  * \param [in] nip - number of integration points. 1 for ON_CELLS and NO_NODES
981  */
982 void MEDFileField1TSStructItem2::checkInRange(int nbOfEntity, int nip, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
983 {
984   _nb_of_entity=nbOfEntity;
985   if(_pfl->getName().empty())
986     {
987       if(nbOfEntity!=(_start_end.second-_start_end.first)/nip)
988         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Mismatch between number of entities and size of node field !");
989       return ;
990     }
991   else
992     {
993       if(!globs)
994         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Presence of a profile on field whereas no globals found in file !");
995       const DataArrayInt *pfl=globs->getProfile(_pfl->getName().c_str());
996       if(!pfl)
997         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Presence of a profile on field whereas no such profile found in file !");
998       pfl->checkAllIdsInRange(0,nbOfEntity);
999     }
1000 }
1001
1002 bool MEDFileField1TSStructItem2::isFastlyEqual(int& startExp, INTERP_KERNEL::NormalizedCellType gt, const char *pflName) const
1003 {
1004   if(startExp!=_start_end.first)
1005     return false;
1006   if(gt!=_geo_type)
1007     return false;
1008   if(getPflName()!=pflName)
1009     return false;
1010   startExp=_start_end.second;
1011   return true;
1012 }
1013
1014 bool MEDFileField1TSStructItem2::operator==(const MEDFileField1TSStructItem2& other) const throw(INTERP_KERNEL::Exception)
1015 {
1016   //_nb_of_entity is not taken into account here. It is not a bug, because no mesh consideration needed here to perform fast compare.
1017   //idem for _loc. It is not an effective attribute for support comparison.
1018   return _geo_type==other._geo_type && _start_end==other._start_end && _pfl->getName()==other._pfl->getName();
1019 }
1020
1021 bool MEDFileField1TSStructItem2::isCellSupportEqual(const MEDFileField1TSStructItem2& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1022 {
1023   if(_geo_type!=other._geo_type)
1024     return false;
1025   if(_nb_of_entity!=other._nb_of_entity)
1026     return false;
1027   if((_pfl->getName().empty() && !other._pfl->getName().empty()) || (!_pfl->getName().empty() && other._pfl->getName().empty()))
1028     return false;
1029   if(_pfl->getName().empty() && other._pfl->getName().empty())
1030     return true;
1031   const DataArrayInt *pfl1(getPfl(globs)),*pfl2(other.getPfl(globs));
1032   return pfl1->isEqualWithoutConsideringStr(*pfl2);
1033 }
1034
1035 bool MEDFileField1TSStructItem2::isNodeSupportEqual(const MEDFileField1TSStructItem2& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1036 {
1037   return isCellSupportEqual(other,globs);
1038 }
1039
1040 /*!
1041  * \a objs must be non empty. \a objs should contain items having same geometric type.
1042  */
1043 MEDFileField1TSStructItem2 MEDFileField1TSStructItem2::BuildAggregationOf(const std::vector<const MEDFileField1TSStructItem2 *>& objs, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
1044 {
1045   if(objs.empty())
1046     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : empty input !");
1047   if(objs.size()==1)
1048     return MEDFileField1TSStructItem2(*objs[0]);
1049   INTERP_KERNEL::NormalizedCellType gt(objs[0]->_geo_type);
1050   int nbEntityRef(objs[0]->_nb_of_entity);
1051   std::size_t sz(objs.size());
1052   std::vector<const DataArrayInt *> arrs(sz);
1053   for(std::size_t i=0;i<sz;i++)
1054     {
1055       const MEDFileField1TSStructItem2 *obj(objs[i]);
1056       if(gt!=obj->_geo_type)
1057         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! All input must have the same geo type !");
1058       if(nbEntityRef!=obj->_nb_of_entity)
1059         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! All input must have the global nb of entity !");
1060       if(obj->_pfl->getName().empty())
1061         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! Several same geo type chunk must all lie on profiles !");
1062       arrs[i]=globs->getProfile(obj->_pfl->getName().c_str());
1063     }
1064   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> arr(DataArrayInt::Aggregate(arrs));
1065   arr->sort();
1066   int oldNbTuples(arr->getNumberOfTuples());
1067   arr=arr->buildUnique();
1068   if(oldNbTuples!=arr->getNumberOfTuples())
1069     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : some entities are present several times !");
1070   if(arr->isIdentity() && oldNbTuples==nbEntityRef)
1071     {
1072       std::pair<int,int> p(0,nbEntityRef);
1073       std::string a,b;
1074       MEDFileField1TSStructItem2 ret(gt,p,a,b);
1075       ret._nb_of_entity=nbEntityRef;
1076       return ret;
1077     }
1078   else
1079     {
1080       arr->setName(NEWLY_CREATED_PFL_NAME);
1081       std::pair<int,int> p(0,oldNbTuples);
1082       std::string a,b;
1083       MEDFileField1TSStructItem2 ret(gt,p,a,b);
1084       ret._nb_of_entity=nbEntityRef;
1085       ret._pfl=arr;
1086       return ret;
1087     }
1088 }
1089
1090 std::size_t MEDFileField1TSStructItem2::getHeapMemorySize() const
1091 {
1092   std::size_t ret(0);
1093   const DataArrayInt *pfl(_pfl);
1094   if(pfl)
1095     ret+=pfl->getHeapMemorySize();
1096   ret+=_loc.capacity();
1097   return ret;
1098 }
1099
1100 //=
1101
1102 MEDFileField1TSStructItem::MEDFileField1TSStructItem(TypeOfField a, const std::vector< MEDFileField1TSStructItem2 >& b):_computed(false),_type(a),_items(b)
1103 {
1104 }
1105
1106 void MEDFileField1TSStructItem::checkWithMeshStruct(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
1107 {
1108   switch(_type)
1109     {
1110     case ON_NODES:
1111       {
1112         int nbOfEnt=mst->getNumberOfNodes();
1113         if(_items.size()!=1)
1114           throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::checkWithMeshStruct : for nodes field only one subdivision supported !");
1115         _items[0].checkInRange(nbOfEnt,1,globs);
1116         break ;
1117       }
1118     case ON_CELLS:
1119       {
1120         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1121           (*it).checkWithMeshStructForCells(mst,globs);
1122         break;
1123       }
1124     case ON_GAUSS_NE:
1125       {
1126         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1127           (*it).checkWithMeshStructForGaussNE(mst,globs);
1128         break;
1129       }
1130     case ON_GAUSS_PT:
1131       {
1132         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1133           (*it).checkWithMeshStructForGaussPT(mst,globs);
1134         break;
1135       }
1136     default:
1137       throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::checkWithMeshStruct : not managed field type !");
1138     }
1139 }
1140
1141 bool MEDFileField1TSStructItem::operator==(const MEDFileField1TSStructItem& other) const throw(INTERP_KERNEL::Exception)
1142 {
1143   if(_type!=other._type)
1144     return false;
1145   if(_items.size()!=other._items.size())
1146     return false;
1147   for(std::size_t i=0;i<_items.size();i++)
1148     if(!(_items[i]==other._items[i]))
1149       return false;
1150   return true;
1151 }
1152
1153 bool MEDFileField1TSStructItem::isCellSupportEqual(const MEDFileField1TSStructItem& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1154 {
1155   if(_type!=other._type)
1156     return false;
1157   if(_items.size()!=other._items.size())
1158     return false;
1159   for(std::size_t i=0;i<_items.size();i++)
1160     if(!(_items[i].isCellSupportEqual(other._items[i],globs)))
1161       return false;
1162   return true;
1163 }
1164
1165 bool MEDFileField1TSStructItem::isNodeSupportEqual(const MEDFileField1TSStructItem& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1166 {
1167   if(_type!=other._type)
1168     return false;
1169   if(_items.size()!=other._items.size())
1170     return false;
1171   for(std::size_t i=0;i<_items.size();i++)
1172     if(!(_items[i].isNodeSupportEqual(other._items[i],globs)))
1173       return false;
1174   return true;
1175 }
1176
1177 bool MEDFileField1TSStructItem::isEntityCell() const
1178 {
1179   if(_type==ON_NODES)
1180     return false;
1181   else
1182     return true;
1183 }
1184
1185 class CmpGeo
1186 {
1187 public:
1188   CmpGeo(INTERP_KERNEL::NormalizedCellType geoTyp):_geo_type(geoTyp) { }
1189   bool operator()(const std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > & v) const { return _geo_type==v.first; }
1190 private:
1191   INTERP_KERNEL::NormalizedCellType _geo_type;
1192 };
1193
1194 MEDFileField1TSStructItem MEDFileField1TSStructItem::simplifyMeOnCellEntity(const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1195 {
1196   if(!isEntityCell())
1197     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::simplifyMeOnCellEntity : must be on ON_CELLS, ON_GAUSS_NE or ON_GAUSS_PT !");
1198   std::vector< std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > > m;
1199   std::size_t i=0;
1200   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++,i++)
1201     {
1202       std::vector< std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > >::iterator it0(std::find_if(m.begin(),m.end(),CmpGeo((*it).getGeo())));
1203       if(it0==m.end())
1204         m.push_back(std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> >((*it).getGeo(),std::vector<std::size_t>(1,i)));
1205       else
1206         (*it0).second.push_back(i);
1207     }
1208   if(m.size()==_items.size())
1209     {
1210       MEDFileField1TSStructItem ret(*this);
1211       ret._type=ON_CELLS;
1212       return ret;
1213     }
1214   std::size_t sz(m.size());
1215   std::vector< MEDFileField1TSStructItem2 > items(sz);
1216   for(i=0;i<sz;i++)
1217     {
1218       const std::vector<std::size_t>& ids=m[i].second;
1219       std::vector<const MEDFileField1TSStructItem2 *>objs(ids.size());
1220       for(std::size_t j=0;j<ids.size();j++)
1221         objs[j]=&_items[ids[j]];
1222       items[i]=MEDFileField1TSStructItem2::BuildAggregationOf(objs,globs);
1223     }
1224   MEDFileField1TSStructItem ret(ON_CELLS,items);
1225   ret._computed=true;
1226   return ret;
1227 }
1228
1229 /*!
1230  * \a this is expected to be ON_CELLS and simplified.
1231  */
1232 bool MEDFileField1TSStructItem::isCompatibleWithNodesDiscr(const MEDFileField1TSStructItem& other, const MEDFileMeshStruct *meshSt, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1233 {
1234   if(other._type!=ON_NODES)
1235     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isCompatibleWithNodesDiscr : other must be on nodes !");
1236   if(other._items.size()!=1)
1237     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isCompatibleWithNodesDiscr : other is on nodes but number of subparts !");
1238   int theFirstLevFull;
1239   bool ret0=isFullyOnOneLev(meshSt,theFirstLevFull);
1240   const MEDFileField1TSStructItem2& otherNodeIt(other._items[0]);
1241   if(otherNodeIt.getPflName().empty())
1242     {//on all nodes
1243       if(!ret0)
1244         return false;
1245       return theFirstLevFull==0;
1246     }
1247   else
1248     {
1249       const DataArrayInt *pfl=globs->getProfile(otherNodeIt.getPflName().c_str());
1250       MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cpyPfl(pfl->deepCpy());
1251       cpyPfl->sort();
1252       int nbOfNodes(meshSt->getNumberOfNodes());
1253       if(cpyPfl->isIdentity() && cpyPfl->getNumberOfTuples()==nbOfNodes)
1254         {//on all nodes also !
1255           if(!ret0)
1256             return false;
1257           return theFirstLevFull==0;
1258         }
1259       std::vector<bool> nodesFetched(nbOfNodes,false);
1260       meshSt->getTheMesh()->whichAreNodesFetched(*this,globs,nodesFetched);
1261       return cpyPfl->isFittingWith(nodesFetched);
1262     }
1263 }
1264
1265 bool MEDFileField1TSStructItem::isFullyOnOneLev(const MEDFileMeshStruct *meshSt, int& theFirstLevFull) const throw(INTERP_KERNEL::Exception)
1266 {
1267   if(_type!=ON_CELLS)
1268     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : works only for ON_CELLS discretization !");
1269   if(_items.empty())
1270     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : items vector is empty !");
1271   int nbOfLevs(meshSt->getNumberOfLevs());
1272   if(nbOfLevs==0)
1273     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : no levels in input mesh structure !");
1274   std::vector<int> levs(nbOfLevs);
1275   theFirstLevFull=1;
1276   int nbOfGT=0;
1277   std::set<INTERP_KERNEL::NormalizedCellType> gts;
1278   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++)
1279     {
1280       if(!(*it).getPflName().empty())
1281         return false;
1282       INTERP_KERNEL::NormalizedCellType gt((*it).getGeo());
1283       if(gts.find(gt)!=gts.end())
1284         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : internal error !");
1285       gts.insert(gt);
1286       int pos(meshSt->getLevelOfGeoType((*it).getGeo()));
1287       levs[-pos]++;
1288     }
1289   for(int i=0;i<nbOfLevs;i++)
1290     if(meshSt->getNumberOfGeoTypesInLev(-i)==levs[i])
1291       { theFirstLevFull=-i; return true; }
1292   return false;
1293 }
1294
1295 const MEDFileField1TSStructItem2& MEDFileField1TSStructItem::operator[](std::size_t i) const throw(INTERP_KERNEL::Exception)
1296 {
1297   if(i<0 || i>=_items.size())
1298     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::operator[] : input is not in valid range !");
1299   return _items[i];
1300 }
1301
1302 std::size_t MEDFileField1TSStructItem::getHeapMemorySize() const
1303 {
1304   std::size_t ret(0);
1305   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++)
1306     ret+=(*it).getHeapMemorySize();
1307   ret+=_items.size()*sizeof(MEDFileField1TSStructItem2);
1308   return ret;
1309 }
1310
1311 MEDMeshMultiLev *MEDFileField1TSStructItem::buildFromScratchDataSetSupportOnCells(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1312 {
1313   std::size_t sz(_items.size());
1314   std::vector<INTERP_KERNEL::NormalizedCellType> a0(sz);
1315   std::vector<const DataArrayInt *> a1(sz);
1316   std::vector<int> a2(sz);
1317   std::size_t i(0);
1318   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++,i++)
1319     {
1320       a0[i]=(*it).getGeo();
1321       a1[i]=(*it).getPfl(globs);
1322       a2[i]=mst->getNumberOfElemsOfGeoType((*it).getGeo());
1323     }
1324   return MEDMeshMultiLev::New(mst->getTheMesh(),a0,a1,a2);
1325 }
1326
1327 MEDFileField1TSStructItem MEDFileField1TSStructItem::BuildItemFrom(const MEDFileAnyTypeField1TS *ref, const MEDFileMeshStruct *meshSt)
1328 {
1329   TypeOfField atype;
1330   std::vector< MEDFileField1TSStructItem2 > anItems;
1331   //
1332   std::vector< std::vector<std::string> > pfls,locs;
1333   std::vector< std::vector<TypeOfField> > typesF;
1334   std::vector<INTERP_KERNEL::NormalizedCellType> geoTypes;
1335   std::vector< std::vector<std::pair<int,int> > > strtEnds=ref->getFieldSplitedByType(0,geoTypes,typesF,pfls,locs);
1336   std::size_t nbOfGeoTypes(geoTypes.size());
1337   if(nbOfGeoTypes==0)
1338     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : not null by empty ref  !");
1339   bool isFirst=true;
1340   for(std::size_t i=0;i<nbOfGeoTypes;i++)
1341     {
1342       std::size_t sz=typesF[i].size();
1343       if(strtEnds[i].size()<1 || sz<1 || pfls[i].size()<1)
1344         throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : internal error #1 !");
1345       //
1346       if(isFirst)
1347         atype=typesF[i][0];
1348       isFirst=false;
1349       //
1350       for(std::size_t j=0;j<sz;j++)
1351         {
1352           if(atype==typesF[i][j])
1353             anItems.push_back(MEDFileField1TSStructItem2(geoTypes[i],strtEnds[i][j],pfls[i][j],locs[i][j]));
1354           else
1355             throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : can be applied only on single spatial discretization fields ! Call SplitPerDiscretization method !");
1356         }
1357     }
1358   MEDFileField1TSStructItem ret(atype,anItems);
1359   ret.checkWithMeshStruct(meshSt,ref);
1360   return ret;
1361 }
1362
1363 //=
1364
1365 MEDFileField1TSStruct *MEDFileField1TSStruct::New(const MEDFileAnyTypeField1TS *ref, MEDFileMeshStruct *mst) throw(INTERP_KERNEL::Exception)
1366 {
1367   return new MEDFileField1TSStruct(ref,mst);
1368 }
1369
1370 MEDFileField1TSStruct::MEDFileField1TSStruct(const MEDFileAnyTypeField1TS *ref, MEDFileMeshStruct *mst)
1371 {
1372   _already_checked.push_back(MEDFileField1TSStructItem::BuildItemFrom(ref,mst));
1373 }
1374
1375 void MEDFileField1TSStruct::checkWithMeshStruct(MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
1376 {
1377   if(_already_checked.empty())
1378     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::checkWithMeshStruct : not correctly initialized !");
1379   _already_checked.back().checkWithMeshStruct(mst,globs);
1380 }
1381
1382 bool MEDFileField1TSStruct::isEqualConsideringThePast(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *mst) const throw(INTERP_KERNEL::Exception)
1383 {
1384   MEDFileField1TSStructItem b(MEDFileField1TSStructItem::BuildItemFrom(other,mst));
1385   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++)
1386     {
1387       if((*it)==b)
1388         return true;
1389     }
1390   return false;
1391 }
1392
1393 /*!
1394  * Not const because \a other structure will be added to the \c _already_checked attribute in case of success.
1395  */
1396 bool MEDFileField1TSStruct::isSupportSameAs(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *meshSt) throw(INTERP_KERNEL::Exception)
1397 {
1398   if(_already_checked.empty())
1399     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isSupportSameAs : no ref !");
1400   MEDFileField1TSStructItem b(MEDFileField1TSStructItem::BuildItemFrom(other,meshSt));
1401   if(!_already_checked[0].isEntityCell() || !b.isEntityCell())
1402     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isSupportSameAs : only available on cell entities !");
1403   MEDFileField1TSStructItem other1(b.simplifyMeOnCellEntity(other));
1404   int found=-1,i=0;
1405   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1406     if((*it).isComputed())
1407       { found=i; break; }
1408   bool ret(false);
1409   if(found==-1)
1410     {
1411       MEDFileField1TSStructItem this1(_already_checked[0].simplifyMeOnCellEntity(other));
1412       ret=this1.isCellSupportEqual(other1,other);
1413       if(ret)
1414         _already_checked.push_back(this1);
1415     }
1416   else
1417     ret=_already_checked[found].isCellSupportEqual(other1,other);
1418   if(ret)
1419     _already_checked.push_back(b);
1420   return ret;
1421 }
1422
1423 /*!
1424  * \param [in] other - a field with only one spatial discretization : ON_NODES.
1425  */
1426 bool MEDFileField1TSStruct::isCompatibleWithNodesDiscr(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *meshSt) throw(INTERP_KERNEL::Exception)
1427 {
1428   if(_already_checked.empty())
1429     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isCompatibleWithNodesDiscr : no ref !");
1430   MEDFileField1TSStructItem other1(MEDFileField1TSStructItem::BuildItemFrom(other,meshSt));
1431   if(_already_checked[0].isEntityCell())
1432     {
1433       int found=-1,i=0;
1434       for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1435         if((*it).isComputed())
1436           { found=i; break; }
1437       bool ret(false);
1438       if(found==-1)
1439         {
1440           MEDFileField1TSStructItem this1(_already_checked[0].simplifyMeOnCellEntity(other));
1441           ret=this1.isCompatibleWithNodesDiscr(other1,meshSt,other);
1442           if(ret)
1443             _already_checked.push_back(this1);
1444         }
1445       else
1446         ret=_already_checked[found].isCompatibleWithNodesDiscr(other1,meshSt,other);
1447       if(ret)
1448         _already_checked.push_back(other1);
1449       return ret;
1450     }
1451   else
1452     return _already_checked[0].isNodeSupportEqual(other1,other);
1453 }
1454
1455 std::size_t MEDFileField1TSStruct::getHeapMemorySize() const
1456 {
1457   std::size_t ret(0);
1458   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++)
1459     ret+=(*it).getHeapMemorySize();
1460   ret+=_already_checked.capacity()*sizeof(MEDFileField1TSStructItem);
1461   return ret;
1462 }
1463
1464 MEDMeshMultiLev *MEDFileField1TSStruct::buildFromScratchDataSetSupport(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1465 {
1466   if(_already_checked.empty())
1467     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::buildFromScratchDataSetSupport : No outline structure in this !");
1468   int pos0(-1),pos1(-1);
1469   if(presenceOfCellDiscr(pos0))
1470     {
1471       MEDCouplingAutoRefCountObjectPtr<MEDMeshMultiLev> ret(_already_checked[pos0].buildFromScratchDataSetSupportOnCells(mst,globs));
1472       if(presenceOfPartialNodeDiscr(pos1))
1473         ret->setNodeReduction(_already_checked[pos1][0].getPfl(globs));
1474       return ret.retn();
1475     }
1476   else
1477     {
1478       if(!presenceOfPartialNodeDiscr(pos1))
1479         {//we have only all nodes, no cell definition info -> level 0;
1480           std::vector<int> levs(1,0);
1481           return MEDMeshMultiLev::New(mst->getTheMesh(),levs);
1482         }
1483       else
1484         return MEDMeshMultiLev::NewOnlyOnNode(mst->getTheMesh(),_already_checked[pos1][0].getPfl(globs));
1485     }
1486 }
1487
1488 bool MEDFileField1TSStruct::isDataSetSupportFastlyEqualTo(const MEDFileField1TSStruct& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1489 {
1490   int b0,b1;
1491   bool a0(presenceOfCellDiscr(b0)),a1(presenceOfPartialNodeDiscr(b1));
1492   int d0,d1;
1493   bool c0(other.presenceOfCellDiscr(d0)),c1(other.presenceOfPartialNodeDiscr(d1)); 
1494   if(a0!=c0 || a1!=c1)
1495     return false;
1496   if(a0)
1497     if(!_already_checked[b0].isCellSupportEqual(other._already_checked[d0],globs))
1498       return false;
1499   if(a1)
1500     if(!_already_checked[b1].isNodeSupportEqual(other._already_checked[d1],globs))
1501       return false;
1502   return true;
1503 }
1504
1505 /*!
1506  * Returns true if presence in \a this of discretization ON_CELLS, ON_GAUSS_PT, ON_GAUSS_NE.
1507  * 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.
1508  */
1509 bool MEDFileField1TSStruct::presenceOfCellDiscr(int& pos) const throw(INTERP_KERNEL::Exception)
1510 {
1511   std::size_t refSz(std::numeric_limits<std::size_t>::max());
1512   bool ret(false);
1513   int i(0);
1514   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1515     {
1516       if((*it).getType()!=ON_NODES)
1517         {
1518           ret=true;
1519           std::size_t sz((*it).getNumberOfItems());
1520           if(refSz>sz)
1521             { pos=i; refSz=sz; }
1522         }
1523     }
1524   if(refSz==0)
1525     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::presenceOfCellDiscr : an element in this on entity CELL is empty !");
1526   return ret;
1527 }
1528
1529 /*!
1530  * Returns true if presence in \a this of discretization ON_NODES.
1531  * If true is returned the pos of the first element containing the single subpart.
1532  */
1533 bool MEDFileField1TSStruct::presenceOfPartialNodeDiscr(int& pos) const throw(INTERP_KERNEL::Exception)
1534 {
1535   int i(0);
1536   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1537     {
1538       if((*it).getType()==ON_NODES)
1539         {
1540           std::size_t sz((*it).getNumberOfItems());
1541           if(sz==1)
1542             {
1543               if(!(*it)[0].getPflName().empty())
1544                 { pos=i; return true; }
1545             }
1546           else
1547             throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::presenceOfPartialNodeDiscr : an element in this on entity NODE is split into several parts !");
1548         }
1549     }
1550   return false;
1551 }
1552
1553 //=
1554
1555 MEDFileFastCellSupportComparator *MEDFileFastCellSupportComparator::New(const MEDFileMeshStruct *m, const MEDFileAnyTypeFieldMultiTS *ref) throw(INTERP_KERNEL::Exception)
1556 {
1557   return new MEDFileFastCellSupportComparator(m,ref);
1558 }
1559
1560 MEDFileFastCellSupportComparator::MEDFileFastCellSupportComparator(const MEDFileMeshStruct *m, const MEDFileAnyTypeFieldMultiTS *ref)
1561 {
1562   if(!m)
1563     throw INTERP_KERNEL::Exception("MEDFileFastCellSupportComparator constructor : null input mesh struct !");
1564   _mesh_comp=const_cast<MEDFileMeshStruct *>(m); _mesh_comp->incrRef();
1565   int nbPts=ref->getNumberOfTS();
1566   _f1ts_cmps.resize(nbPts);
1567   for(int i=0;i<nbPts;i++)
1568     {
1569       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=ref->getTimeStepAtPos(i);
1570       _f1ts_cmps[i]=MEDFileField1TSStruct::New(elt,_mesh_comp);
1571       _f1ts_cmps[i]->checkWithMeshStruct(_mesh_comp,elt);
1572     }
1573 }
1574
1575 std::size_t MEDFileFastCellSupportComparator::getHeapMemorySize() const
1576 {
1577   std::size_t ret(0);
1578   const MEDFileMeshStruct *mst(_mesh_comp);
1579   if(mst)
1580     ret+=mst->getHeapMemorySize();
1581   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileField1TSStruct> >::const_iterator it=_f1ts_cmps.begin();it!=_f1ts_cmps.end();it++)
1582     {
1583       const MEDFileField1TSStruct *cur(*it);
1584       if(cur)
1585         ret+=cur->getHeapMemorySize()+sizeof(MEDFileField1TSStruct);
1586     }
1587   ret+=_f1ts_cmps.capacity()*sizeof(MEDCouplingAutoRefCountObjectPtr<MEDFileField1TSStruct>);
1588   return ret;
1589 }
1590
1591 bool MEDFileFastCellSupportComparator::isEqual(const MEDFileAnyTypeFieldMultiTS *other) throw(INTERP_KERNEL::Exception)
1592 {
1593   int nbPts=other->getNumberOfTS();
1594   if(nbPts!=(int)_f1ts_cmps.size())
1595     {
1596       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isEqual : unexpected nb of time steps in  input ! Should be " << _f1ts_cmps.size() << " it is in reality " << nbPts << " !";
1597       throw INTERP_KERNEL::Exception(oss.str().c_str());
1598     }
1599   for(int i=0;i<nbPts;i++)
1600     {
1601       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=other->getTimeStepAtPos(i);
1602       if(!_f1ts_cmps[i]->isEqualConsideringThePast(elt,_mesh_comp))
1603         if(!_f1ts_cmps[i]->isSupportSameAs(elt,_mesh_comp))
1604           return false;
1605     }
1606   return true;
1607 }
1608
1609 bool MEDFileFastCellSupportComparator::isCompatibleWithNodesDiscr(const MEDFileAnyTypeFieldMultiTS *other) throw(INTERP_KERNEL::Exception)
1610 {
1611   int nbPts=other->getNumberOfTS();
1612   if(nbPts!=(int)_f1ts_cmps.size())
1613     {
1614       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isCompatibleWithNodesDiscr : unexpected nb of time steps in  input ! Should be " << _f1ts_cmps.size() << " it is in reality " << nbPts << " !";
1615       throw INTERP_KERNEL::Exception(oss.str().c_str());
1616     }
1617   for(int i=0;i<nbPts;i++)
1618     {
1619       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=other->getTimeStepAtPos(i);
1620       if(!_f1ts_cmps[i]->isCompatibleWithNodesDiscr(elt,_mesh_comp))
1621         return false;
1622     }
1623   return true;
1624 }
1625
1626 MEDMeshMultiLev *MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport(int timeStepId, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1627 {
1628   if(timeStepId<0 || timeStepId>=(int)_f1ts_cmps.size())
1629     {
1630       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport : requested time step id #" << timeStepId << " is not in [0," << _f1ts_cmps.size() << ") !";
1631       throw INTERP_KERNEL::Exception(oss.str().c_str());
1632     }
1633   const MEDFileField1TSStruct *obj(_f1ts_cmps[timeStepId]);
1634   if(!obj)
1635     {
1636       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport : at time step id #" << timeStepId << " no field structure overview defined !";
1637       throw INTERP_KERNEL::Exception(oss.str().c_str());
1638     }
1639   return obj->buildFromScratchDataSetSupport(_mesh_comp,globs);
1640 }
1641
1642 bool MEDFileFastCellSupportComparator::isDataSetSupportEqualToThePreviousOne(int timeStepId, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1643 {
1644   if(timeStepId<=0 || timeStepId>=(int)_f1ts_cmps.size())
1645     {
1646       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isDataSetSupportEqualToThePreviousOne : requested time step id #" << timeStepId << " is not in [1," << _f1ts_cmps.size() << ") !";
1647       throw INTERP_KERNEL::Exception(oss.str().c_str());
1648     }
1649   const MEDFileField1TSStruct *obj(_f1ts_cmps[timeStepId]);
1650   const MEDFileField1TSStruct *objRef(_f1ts_cmps[timeStepId-1]);
1651   return objRef->isDataSetSupportFastlyEqualTo(*obj,globs);
1652 }