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   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_parts.begin();it!=_parts.end();it++)
 438     {
 439       const MEDCoupling1GTUMesh *cur(*it);
 440       if(!cur)
 441         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : a part is null !");
 442       int curNbCells(cur->getNumberOfCells());
 443       szBCE+=curNbCells;
 444       if((*it)->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
 445         szD+=(*it)->getNodalConnectivity()->getNumberOfTuples()+curNbCells;
 446       else
 447         {
 448           isPolyh=true;
 449           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> tmp((*it)->computeEffectiveNbOfNodesPerCell());
 450           szD+=tmp->accumulate(0)+curNbCells;
 451           szF+=2*curNbCells+(*it)->getNodalConnectivity()->getNumberOfTuples();
 452         }
 453     }
 454   MEDCouplingAutoRefCountObjectPtr<DataArrayByte> b(DataArrayByte::New()); b->alloc(szBCE,1); char *bPtr(b->getPointer());
 455   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> c(DataArrayInt::New()); c->alloc(szBCE,1); int *cPtr(c->getPointer());
 456   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> d(DataArrayInt::New()); d->alloc(szD,1); int *dPtr(d->getPointer());
 457   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> e(DataArrayInt::New()),f(DataArrayInt::New()); int *ePtr(0),*fPtr(0);
 458   if(isPolyh)
 459     { e->alloc(szBCE,1); ePtr=e->getPointer(); f->alloc(szF,1); fPtr=f->getPointer(); }
 460   int k(0);
 461   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_parts.begin();it!=_parts.end();it++)
 462     {
 463       const MEDCoupling1GTUMesh *cur(*it);
 464       int curNbCells(cur->getNumberOfCells());
 465       int gt((int)cur->getCellModelEnum());
 466       if(gt<0 || gt>=PARAMEDMEM_2_VTKTYPE_LGTH)
 467         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : invalid geometric type !");
 468       unsigned char gtvtk(PARAMEDMEM_2_VTKTYPE[gt]);
 469       if(gtvtk==-1)
 470         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : no VTK type for the requested INTERP_KERNEL geometric type !");
 471       std::fill(bPtr,bPtr+curNbCells,gtvtk); bPtr+=curNbCells;
 472       const MEDCoupling1SGTUMesh *scur(dynamic_cast<const MEDCoupling1SGTUMesh *>(cur));
 473       const MEDCoupling1DGTUMesh *dcur(dynamic_cast<const MEDCoupling1DGTUMesh *>(cur));
 474       const int *connPtr(cur->getNodalConnectivity()->begin());
 475       if(!scur && !dcur)
 476         throw INTERP_KERNEL::Exception("MEDUMeshMultiLev::getVTUArrays : internal error !");
 477       if(scur)
 478         {
 479           int nnpc(scur->getNumberOfNodesPerCell());
 480           for(int i=0;i<curNbCells;i++,connPtr+=nnpc)
 481             {
 482               *dPtr++=nnpc;
 483               dPtr=std::copy(connPtr,connPtr+nnpc,dPtr);
 484               *cPtr=k+nnpc; k=*cPtr++;
 485             }
 486           if(isPolyh)
 487             { std::fill(ePtr,ePtr+curNbCells,-1); ePtr+=curNbCells; }
 488         }
 489       else
 490         {
 491           const int *connIPtr(dcur->getNodalConnectivityIndex()->begin());
 492           if(cur->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
 493             {
 494               for(int i=0;i<curNbCells;i++,connIPtr++)
 495                 {
 496                   *dPtr++=connIPtr[1]-connIPtr[0];
 497                   dPtr=std::copy(connPtr+connIPtr[0],connPtr+connIPtr[1],dPtr);
 498                   *cPtr=k+connIPtr[1]-connIPtr[0]; k=*cPtr++;
 499                 }
 500             }
 501           else
 502             {
 503               for(int i=0;i<curNbCells;i++,connIPtr++)
 504                 {
 505                   std::set<int> s(connPtr+connIPtr[0],connPtr+connIPtr[1]);
 506                   *dPtr++=(int)s.size();
 507                   dPtr=std::copy(s.begin(),s.end(),dPtr);
 508                   *cPtr=k+(int)s.size(); k=*cPtr++;
 509                 }
 510             }
 511           if(isPolyh)
 512             {
 513               connIPtr=dcur->getNodalConnectivityIndex()->begin();
 514               if(cur->getCellModelEnum()!=INTERP_KERNEL::NORM_POLYHED)
 515                 { std::fill(ePtr,ePtr+curNbCells,-1); ePtr+=curNbCells; }
 516               else
 517                 {
 518                   int kk(0);
 519                   for(int i=0;i<curNbCells;i++,connIPtr++)
 520                     {
 521                       int nbFace(std::count(connPtr+connIPtr[0],connPtr+connIPtr[1],-1)+1);
 522                       *fPtr++=nbFace;
 523                       const int *work(connPtr+connIPtr[0]);
 524                       for(int j=0;j<nbFace;j++)
 525                         {
 526                           const int *work2=std::find(work,connPtr+connIPtr[1],-1);
 527                           *fPtr++=std::distance(work,work2);
 528                           fPtr=std::copy(work,work2,fPtr);
 529                           work=work2+1;
 530                         }
 531                       *ePtr=kk; kk+=connIPtr[1]-connIPtr[0]+2;
 532                     }
 533                 }
 534             }
 535         }
 536     }
 537   if(!isPolyh)
 538     reorderNodesIfNecessary(a,d,0);
 539   else
 540     reorderNodesIfNecessary(a,d,f);
 541   coords=a.retn(); types=b.retn(); cellLocations=c.retn(); cells=d.retn();
 542   if(!isPolyh)
 543     { faceLocations=0; faces=0; }
 544   else
 545     { faceLocations=e.retn(); faces=f.retn(); }
 546 }
 547
 548 void MEDUMeshMultiLev::reorderNodesIfNecessary(DataArrayDouble *coords, DataArrayInt *nodalConnVTK, DataArrayInt *polyhedNodalConnVTK) const throw(INTERP_KERNEL::Exception)
 549 {
 550   const DataArrayInt *nr(_node_reduction);
 551   if(!nr)
 552     return ;
 553   int sz(coords->getNumberOfTuples());
 554   std::vector<bool> b(sz,false);
 555   const int *work(nodalConnVTK->begin()),*endW(nodalConnVTK->end());
 556   while(work!=endW)
 557     {
 558       int nb(*work++);
 559       for(int i=0;i<nb && work!=endW;i++,work++)
 560         {
 561           if(*work>=0 && *work<sz)
 562             b[sz]=true;
 563           else
 564             throw INTERP_KERNEL::Exception("MEDStructuredMeshMultiLev::reorderNodesIfNecessary : internal error !");
 565         }
 566     }
 567   if(polyhedNodalConnVTK)
 568     {
 569       work=polyhedNodalConnVTK->begin(); endW=polyhedNodalConnVTK->end();
 570       while(work!=endW)
 571         {
 572           int nb(*work++);
 573           for(int i=0;i<nb && work!=endW;i++)
 574             {
 575               int nb2(*work++);
 576               for(int j=0;j<nb2 && work!=endW;j++,work++)
 577                 {
 578                   if(*work>=0 && *work<sz)
 579                     b[sz]=true;
 580                   else
 581                     throw INTERP_KERNEL::Exception("MEDStructuredMeshMultiLev::reorderNodesIfNecessary : internal error #2 !");
 582                 }
 583             }
 584         }
 585     }
 586   int szExp(std::count(b.begin(),b.end(),true));
 587   if(szExp!=nr->getNumberOfTuples())
 588     throw INTERP_KERNEL::Exception("MEDStructuredMeshMultiLev::reorderNodesIfNecessary : internal error #3 !");
 589   // Go renumbering !
 590   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> o2n(DataArrayInt::New()); o2n->alloc(sz,1);
 591   int *o2nPtr(o2n->getPointer());
 592   int newId(0);
 593   for(int i=0;i<sz;i++,o2nPtr++)
 594     if(b[i]) *o2nPtr=newId++; else *o2nPtr=-1;
 595   const int *o2nPtrc(o2n->begin());
 596   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> n2o(o2n->invertArrayO2N2N2O(nr->getNumberOfTuples()));
 597   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> perm(DataArrayInt::FindPermutationFromFirstToSecond(n2o,nr));
 598   const int *permPtr(perm->begin());
 599   int *work2(nodalConnVTK->getPointer()),*endW2(nodalConnVTK->getPointer()+nodalConnVTK->getNumberOfTuples());
 600   while(work2!=endW2)
 601     {
 602       int nb(*work2++);
 603       for(int i=0;i<nb && work2!=endW2;i++,work2++)
 604         *work2=permPtr[o2nPtrc[*work2]];
 605     }
 606   if(polyhedNodalConnVTK)
 607     {
 608       work2=polyhedNodalConnVTK->getPointer(); endW2=polyhedNodalConnVTK->getPointer()+polyhedNodalConnVTK->getNumberOfTuples();
 609       while(work2!=endW2)
 610         {
 611           int nb(*work2++);
 612           for(int i=0;i<nb && work2!=endW2;i++)
 613             {
 614               int nb2(*work2++);
 615               for(int j=0;j<nb2 && work2!=endW2;j++,work2++)
 616                 *work2=permPtr[o2nPtrc[*work2]];
 617             }
 618         }
 619     }
 620   MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> coo(coords->selectByTupleIdSafe(nr->begin(),nr->end()));
 621   coords->cpyFrom(*coo);
 622 }
 623
 624 //=
 625
 626 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev()
 627 {
 628 }
 629
 630 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev(const std::vector<INTERP_KERNEL::NormalizedCellType>& gts, const std::vector<const DataArrayInt *>& pfls, const std::vector<int>& nbEntities):MEDMeshMultiLev(gts,pfls,nbEntities)
 631 {
 632 }
 633
 634 void MEDStructuredMeshMultiLev::selectPartOfNodes(const DataArrayInt *pflNodes) throw(INTERP_KERNEL::Exception)
 635 {
 636   if(!pflNodes || !pflNodes->isAllocated())
 637     return ;
 638   std::vector<int> ngs(getNodeGridStructure());
 639   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> conn(MEDCouplingStructuredMesh::Build1GTNodalConnectivity(&ngs[0],&ngs[0]+ngs.size()));
 640   MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m(MEDCoupling1SGTUMesh::New("",MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(ngs.size())));
 641   m->setNodalConnectivity(conn);
 642   const DataArrayInt *pfl(_pfls[0]);
 643   if(pfl)
 644     {
 645       m=dynamic_cast<MEDCoupling1SGTUMesh *>(m->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
 646     }
 647   DataArrayInt *cellIds=0;
 648   m->fillCellIdsToKeepFromNodeIds(pflNodes->begin(),pflNodes->end(),true,cellIds);
 649   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cellIdsSafe(cellIds);
 650   MEDCouplingAutoRefCountObjectPtr<MEDCouplingPointSet> m2(m->buildPartOfMySelfKeepCoords(cellIds->begin(),cellIds->end()));
 651   int tmp=-1;
 652   _node_reduction=m2->getNodeIdsInUse(tmp);
 653   if(pfl)
 654     _pfls[0]=pfl->selectByTupleIdSafe(cellIds->begin(),cellIds->end());
 655   else
 656     _pfls[0]=cellIdsSafe;
 657 }
 658
 659 MEDStructuredMeshMultiLev::MEDStructuredMeshMultiLev(const MEDStructuredMeshMultiLev& other):MEDMeshMultiLev(other)
 660 {
 661 }
 662
 663 //=
 664
 665 MEDCMeshMultiLev *MEDCMeshMultiLev::New(const MEDFileCMesh *m, const std::vector<int>& levs) throw(INTERP_KERNEL::Exception)
 666 {
 667   return new MEDCMeshMultiLev(m,levs);
 668 }
 669
 670 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)
 671 {
 672   return new MEDCMeshMultiLev(m,gts,pfls,nbEntities);
 673 }
 674
 675 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDFileCMesh *m, const std::vector<int>& levs)
 676 {
 677   if(!m)
 678     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor : null input pointer !");
 679   if(levs.size()!=1 || levs[0]!=0)
 680     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor : levels supported is 0 only !");
 681   int mdim(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(m->getMeshDimension()));
 682   _coords.resize(mdim);
 683   for(int i=0;i<mdim;i++)
 684     {
 685       DataArrayDouble *elt(const_cast<DataArrayDouble *>(m->getMesh()->getCoordsAt(i)));
 686       if(!elt)
 687         throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : presence of null pointer for an vector of double along an axis !");
 688       _coords[i]=elt;
 689     }
 690 }
 691
 692 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)
 693 {
 694   if(!m)
 695     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : null input pointer !");
 696   if(gts.size()!=1 || pfls.size()!=1)
 697     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : lengthes of gts and pfls must be equal to one !");
 698   int mdim(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(m->getMeshDimension()));
 699   if(mdim!=gts[0])
 700     throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : the unique geo type is invalid regarding meshdim !");
 701   _coords.resize(mdim);
 702   for(int i=0;i<mdim;i++)
 703     {
 704       DataArrayDouble *elt(const_cast<DataArrayDouble *>(m->getMesh()->getCoordsAt(i)));
 705       if(!elt)
 706         throw INTERP_KERNEL::Exception("MEDCMeshMultiLev constructor 2 : presence of null pointer for an vector of double along an axis !");
 707       _coords[i]=elt;
 708     }
 709 }
 710
 711 MEDCMeshMultiLev::MEDCMeshMultiLev(const MEDCMeshMultiLev& other):MEDStructuredMeshMultiLev(other)
 712 {
 713 }
 714
 715 std::vector<int> MEDCMeshMultiLev::getNodeGridStructure() const throw(INTERP_KERNEL::Exception)
 716 {
 717   std::vector<int> ret(_coords.size());
 718   for(std::size_t i=0;i<_coords.size();i++)
 719     ret[i]=_coords[i]->getNumberOfTuples();
 720   return ret;
 721 }
 722
 723 MEDMeshMultiLev *MEDCMeshMultiLev::prepare() const throw(INTERP_KERNEL::Exception)
 724 {
 725   const DataArrayInt *pfl(_pfls[0]),*nr(_node_reduction);
 726   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> nnr;
 727   std::vector<int> cgs,ngs(getNodeGridStructure());
 728   cgs.resize(ngs.size());
 729   std::transform(ngs.begin(),ngs.end(),cgs.begin(),std::bind2nd(std::plus<int>(),-1));
 730   if(pfl)
 731     {
 732       std::vector< std::pair<int,int> > cellParts;
 733       if(MEDCouplingStructuredMesh::IsPartStructured(pfl->begin(),pfl->end(),cgs,cellParts))
 734         {
 735           MEDCouplingAutoRefCountObjectPtr<MEDCMeshMultiLev> ret(new MEDCMeshMultiLev(*this));
 736           if(nr)
 737             { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
 738           ret->_nb_entities[0]=pfl->getNumberOfTuples();
 739           ret->_pfls[0]=0;
 740           std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> > coords(_coords.size());
 741           for(std::size_t i=0;i<_coords.size();i++)
 742             coords[i]=_coords[i]->selectByTupleId2(cellParts[i].first,cellParts[i].second+1,1);
 743           ret->_coords=coords;
 744           return ret.retn();
 745         }
 746       else
 747         {
 748           MEDCouplingAutoRefCountObjectPtr<MEDCouplingCMesh> m(MEDCouplingCMesh::New());
 749           for(std::size_t i=0;i<ngs.size();i++)
 750             m->setCoordsAt(i,_coords[i]);
 751           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m2(m->build1SGTUnstructured());
 752           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m3=dynamic_cast<MEDCoupling1GTUMesh *>(m2->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
 753           MEDCouplingAutoRefCountObjectPtr<MEDUMeshMultiLev> ret(new MEDUMeshMultiLev(*this,m3));
 754           if(nr)
 755             { m3->zipCoords(); nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
 756           return ret.retn();
 757         }
 758     }
 759   else
 760     {
 761       MEDCouplingAutoRefCountObjectPtr<MEDCMeshMultiLev> ret(new MEDCMeshMultiLev(*this));
 762       if(nr)
 763         { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
 764       return ret.retn();
 765     }
 766 }
 767
 768 std::vector< DataArrayDouble * > MEDCMeshMultiLev::buildVTUArrays() const throw(INTERP_KERNEL::Exception)
 769 {
 770   std::size_t sz(_coords.size());
 771   std::vector< DataArrayDouble * > ret(sz);
 772   for(std::size_t i=0;i<sz;i++)
 773     {
 774       ret[i]=const_cast<DataArrayDouble *>((const DataArrayDouble *)_coords[i]);
 775       ret[i]->incrRef();
 776     }
 777   return ret;
 778 }
 779
 780 //=
 781
 782 MEDCurveLinearMeshMultiLev *MEDCurveLinearMeshMultiLev::New(const MEDFileCurveLinearMesh *m, const std::vector<int>& levs) throw(INTERP_KERNEL::Exception)
 783 {
 784   return new MEDCurveLinearMeshMultiLev(m,levs);
 785 }
 786
 787 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)
 788 {
 789   return new MEDCurveLinearMeshMultiLev(m,gts,pfls,nbEntities);
 790 }
 791
 792 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDFileCurveLinearMesh *m, const std::vector<int>& levs)
 793 {
 794   if(!m)
 795     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor : null input pointer !");
 796   if(levs.size()!=1 || levs[0]!=0)
 797     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor : levels supported is 0 only !");
 798   DataArrayDouble *coords(const_cast<DataArrayDouble *>(m->getMesh()->getCoords()));
 799   if(!coords)
 800     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : no coords set !");
 801   coords->incrRef();
 802   _coords=coords;
 803   _structure=m->getMesh()->getNodeGridStructure();
 804 }
 805
 806 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)
 807 {
 808   if(!m)
 809     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : null input pointer !");
 810   if(gts.size()!=1 || pfls.size()!=1)
 811     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : lengthes of gts and pfls must be equal to one !");
 812   int mdim(MEDCouplingStructuredMesh::GetGeoTypeGivenMeshDimension(m->getMeshDimension()));
 813   if(mdim!=gts[0])
 814     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : the unique geo type is invalid regarding meshdim !");
 815   DataArrayDouble *coords(const_cast<DataArrayDouble *>(m->getMesh()->getCoords()));
 816   if(!coords)
 817     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev constructor 2 : no coords set !");
 818   coords->incrRef();
 819   _coords=coords;
 820   _structure=m->getMesh()->getNodeGridStructure();
 821 }
 822
 823 MEDCurveLinearMeshMultiLev::MEDCurveLinearMeshMultiLev(const MEDCurveLinearMeshMultiLev& other):MEDStructuredMeshMultiLev(other),_coords(other._coords),_structure(other._structure)
 824 {
 825 }
 826
 827 std::vector<int> MEDCurveLinearMeshMultiLev::getNodeGridStructure() const throw(INTERP_KERNEL::Exception)
 828 {
 829   return _structure;
 830 }
 831
 832 MEDMeshMultiLev *MEDCurveLinearMeshMultiLev::prepare() const throw(INTERP_KERNEL::Exception)
 833 {
 834   const DataArrayInt *pfl(_pfls[0]),*nr(_node_reduction);
 835   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> nnr;
 836   std::vector<int> cgs,ngs(getNodeGridStructure());
 837   cgs.resize(ngs.size());
 838   std::transform(ngs.begin(),ngs.end(),cgs.begin(),std::bind2nd(std::plus<int>(),-1));
 839   if(pfl)
 840     {
 841       std::vector< std::pair<int,int> > cellParts,nodeParts;
 842       if(MEDCouplingStructuredMesh::IsPartStructured(pfl->begin(),pfl->end(),cgs,cellParts))
 843         {
 844           nodeParts=cellParts;
 845           std::vector<int> st(ngs.size());
 846           for(std::size_t i=0;i<ngs.size();i++)
 847             {
 848               nodeParts[i].second++;
 849               st[i]=nodeParts[i].second-nodeParts[i].first;
 850             }
 851           MEDCouplingAutoRefCountObjectPtr<DataArrayInt> p(MEDCouplingStructuredMesh::BuildExplicitIdsFrom(ngs,nodeParts));
 852           MEDCouplingAutoRefCountObjectPtr<MEDCurveLinearMeshMultiLev> ret(new MEDCurveLinearMeshMultiLev(*this));
 853           if(nr)
 854             { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
 855           ret->_nb_entities[0]=pfl->getNumberOfTuples();
 856           ret->_pfls[0]=0;
 857           ret->_coords=_coords->selectByTupleIdSafe(p->begin(),p->end());
 858           ret->_structure=st;
 859           return ret.retn();
 860         }
 861       else
 862         {
 863           MEDCouplingAutoRefCountObjectPtr<MEDCouplingCurveLinearMesh> m(MEDCouplingCurveLinearMesh::New());
 864           m->setCoords(_coords); m->setNodeGridStructure(&_structure[0],&_structure[0]+_structure.size());
 865           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1SGTUMesh> m2(m->build1SGTUnstructured());
 866           MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> m3=dynamic_cast<MEDCoupling1GTUMesh *>(m2->buildPartOfMySelfKeepCoords(pfl->begin(),pfl->end()));
 867           MEDCouplingAutoRefCountObjectPtr<MEDUMeshMultiLev> ret(new MEDUMeshMultiLev(*this,m3));
 868           if(nr)
 869             { m3->zipCoords(); nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
 870           return ret.retn();
 871         }
 872     }
 873   else
 874     {
 875       MEDCouplingAutoRefCountObjectPtr<MEDCurveLinearMeshMultiLev> ret(new MEDCurveLinearMeshMultiLev(*this));
 876       if(nr)
 877         { nnr=nr->deepCpy(); nnr->sort(true); ret->setNodeReduction(nnr); }
 878       return ret.retn();
 879     }
 880 }
 881
 882 void MEDCurveLinearMeshMultiLev::buildVTUArrays(DataArrayDouble *&coords, std::vector<int>& nodeStrct) const throw(INTERP_KERNEL::Exception)
 883 {
 884   nodeStrct=_structure;
 885   const DataArrayDouble *coo(_coords);
 886   if(!coo)
 887     throw INTERP_KERNEL::Exception("MEDCurveLinearMeshMultiLev::buildVTUArrays : null pointer on coordinates !");
 888   coords=const_cast<DataArrayDouble *>(coo); coords->incrRef();
 889 }
 890
 891 //=
 892
 893 MEDFileField1TSStructItem2::MEDFileField1TSStructItem2()
 894 {
 895 }
 896
 897 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)
 898 {
 899   _pfl->setName(c.c_str());
 900 }
 901
 902 void MEDFileField1TSStructItem2::checkWithMeshStructForCells(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
 903 {
 904   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
 905   checkInRange(nbOfEnt,1,globs);
 906 }
 907
 908 void MEDFileField1TSStructItem2::checkWithMeshStructForGaussNE(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
 909 {
 910   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
 911   const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(_geo_type);
 912   checkInRange(nbOfEnt,(int)cm.getNumberOfNodes(),globs);
 913 }
 914
 915 void MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
 916 {
 917   if(!globs)
 918     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT : no globals specified !");
 919   if(_loc.empty())
 920     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkWithMeshStructForGaussPT : no localization specified !");
 921   const MEDFileFieldLoc& loc=globs->getLocalization(_loc.c_str());
 922   int nbOfEnt=mst->getNumberOfElemsOfGeoType(_geo_type);
 923   checkInRange(nbOfEnt,loc.getNumberOfGaussPoints(),globs);
 924 }
 925
 926 int MEDFileField1TSStructItem2::getNbOfIntegrationPts(const MEDFileFieldGlobsReal *globs) const
 927 {
 928   if(_loc.empty())
 929     {
 930       if(getPflName().empty())
 931         return (_start_end.second-_start_end.first)/_nb_of_entity;
 932       else
 933         return (_start_end.second-_start_end.first)/getPfl(globs)->getNumberOfTuples();
 934     }
 935   else
 936     {
 937       const MEDFileFieldLoc& loc(globs->getLocalization(_loc.c_str()));
 938       return loc.getNumberOfGaussPoints();
 939     }
 940 }
 941
 942 std::string MEDFileField1TSStructItem2::getPflName() const
 943 {
 944   return _pfl->getName();
 945 }
 946
 947 const DataArrayInt *MEDFileField1TSStructItem2::getPfl(const MEDFileFieldGlobsReal *globs) const
 948 {
 949   if(!_pfl->isAllocated())
 950     {
 951       if(_pfl->getName().empty())
 952         return 0;
 953       else
 954         return globs->getProfile(_pfl->getName().c_str());
 955     }
 956   else
 957     return _pfl;
 958 }
 959
 960 /*!
 961  * \param [in] nbOfEntity - number of entity that can be either cells or nodes. Not other possiblity.
 962  * \param [in] nip - number of integration points. 1 for ON_CELLS and NO_NODES
 963  */
 964 void MEDFileField1TSStructItem2::checkInRange(int nbOfEntity, int nip, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
 965 {
 966   _nb_of_entity=nbOfEntity;
 967   if(_pfl->getName().empty())
 968     {
 969       if(nbOfEntity!=(_start_end.second-_start_end.first)/nip)
 970         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Mismatch between number of entities and size of node field !");
 971       return ;
 972     }
 973   else
 974     {
 975       if(!globs)
 976         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Presence of a profile on field whereas no globals found in file !");
 977       const DataArrayInt *pfl=globs->getProfile(_pfl->getName().c_str());
 978       if(!pfl)
 979         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::checkInRange : Presence of a profile on field whereas no such profile found in file !");
 980       pfl->checkAllIdsInRange(0,nbOfEntity);
 981     }
 982 }
 983
 984 bool MEDFileField1TSStructItem2::isFastlyEqual(int& startExp, INTERP_KERNEL::NormalizedCellType gt, const char *pflName) const
 985 {
 986   if(startExp!=_start_end.first)
 987     return false;
 988   if(gt!=_geo_type)
 989     return false;
 990   if(getPflName()!=pflName)
 991     return false;
 992   startExp=_start_end.second;
 993   return true;
 994 }
 995
 996 bool MEDFileField1TSStructItem2::operator==(const MEDFileField1TSStructItem2& other) const throw(INTERP_KERNEL::Exception)
 997 {
 998   //_nb_of_entity is not taken into account here. It is not a bug, because no mesh consideration needed here to perform fast compare.
 999   //idem for _loc. It is not an effective attribute for support comparison.
1000   return _geo_type==other._geo_type && _start_end==other._start_end && _pfl->getName()==other._pfl->getName();
1001 }
1002
1003 bool MEDFileField1TSStructItem2::isCellSupportEqual(const MEDFileField1TSStructItem2& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1004 {
1005   if(_geo_type!=other._geo_type)
1006     return false;
1007   if(_nb_of_entity!=other._nb_of_entity)
1008     return false;
1009   if((_pfl->getName().empty() && !other._pfl->getName().empty()) || (!_pfl->getName().empty() && other._pfl->getName().empty()))
1010     return false;
1011   if(_pfl->getName().empty() && other._pfl->getName().empty())
1012     return true;
1013   const DataArrayInt *pfl1(getPfl(globs)),*pfl2(other.getPfl(globs));
1014   return pfl1->isEqualWithoutConsideringStr(*pfl2);
1015 }
1016
1017 bool MEDFileField1TSStructItem2::isNodeSupportEqual(const MEDFileField1TSStructItem2& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1018 {
1019   return isCellSupportEqual(other,globs);
1020 }
1021
1022 /*!
1023  * \a objs must be non empty. \a objs should contain items having same geometric type.
1024  */
1025 MEDFileField1TSStructItem2 MEDFileField1TSStructItem2::BuildAggregationOf(const std::vector<const MEDFileField1TSStructItem2 *>& objs, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
1026 {
1027   if(objs.empty())
1028     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : empty input !");
1029   if(objs.size()==1)
1030     return MEDFileField1TSStructItem2(*objs[0]);
1031   INTERP_KERNEL::NormalizedCellType gt(objs[0]->_geo_type);
1032   int nbEntityRef(objs[0]->_nb_of_entity);
1033   std::size_t sz(objs.size());
1034   std::vector<const DataArrayInt *> arrs(sz);
1035   for(std::size_t i=0;i<sz;i++)
1036     {
1037       const MEDFileField1TSStructItem2 *obj(objs[i]);
1038       if(gt!=obj->_geo_type)
1039         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! All input must have the same geo type !");
1040       if(nbEntityRef!=obj->_nb_of_entity)
1041         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! All input must have the global nb of entity !");
1042       if(obj->_pfl->getName().empty())
1043         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : invalid situation ! Several same geo type chunk must all lie on profiles !");
1044       arrs[i]=globs->getProfile(obj->_pfl->getName().c_str());
1045     }
1046   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> arr(DataArrayInt::Aggregate(arrs));
1047   arr->sort();
1048   int oldNbTuples(arr->getNumberOfTuples());
1049   arr=arr->buildUnique();
1050   if(oldNbTuples!=arr->getNumberOfTuples())
1051     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem2::BuildAggregationOf : some entities are present several times !");
1052   if(arr->isIdentity() && oldNbTuples==nbEntityRef)
1053     {
1054       std::pair<int,int> p(0,nbEntityRef);
1055       std::string a,b;
1056       MEDFileField1TSStructItem2 ret(gt,p,a,b);
1057       ret._nb_of_entity=nbEntityRef;
1058       return ret;
1059     }
1060   else
1061     {
1062       arr->setName(NEWLY_CREATED_PFL_NAME);
1063       std::pair<int,int> p(0,oldNbTuples);
1064       std::string a,b;
1065       MEDFileField1TSStructItem2 ret(gt,p,a,b);
1066       ret._nb_of_entity=nbEntityRef;
1067       ret._pfl=arr;
1068       return ret;
1069     }
1070 }
1071
1072 std::size_t MEDFileField1TSStructItem2::getHeapMemorySize() const
1073 {
1074   std::size_t ret(0);
1075   const DataArrayInt *pfl(_pfl);
1076   if(pfl)
1077     ret+=pfl->getHeapMemorySize();
1078   ret+=_loc.capacity();
1079   return ret;
1080 }
1081
1082 //=
1083
1084 MEDFileField1TSStructItem::MEDFileField1TSStructItem(TypeOfField a, const std::vector< MEDFileField1TSStructItem2 >& b):_computed(false),_type(a),_items(b)
1085 {
1086 }
1087
1088 void MEDFileField1TSStructItem::checkWithMeshStruct(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
1089 {
1090   switch(_type)
1091     {
1092     case ON_NODES:
1093       {
1094         int nbOfEnt=mst->getNumberOfNodes();
1095         if(_items.size()!=1)
1096           throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::checkWithMeshStruct : for nodes field only one subdivision supported !");
1097         _items[0].checkInRange(nbOfEnt,1,globs);
1098         break ;
1099       }
1100     case ON_CELLS:
1101       {
1102         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1103           (*it).checkWithMeshStructForCells(mst,globs);
1104         break;
1105       }
1106     case ON_GAUSS_NE:
1107       {
1108         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1109           (*it).checkWithMeshStructForGaussNE(mst,globs);
1110         break;
1111       }
1112     case ON_GAUSS_PT:
1113       {
1114         for(std::vector< MEDFileField1TSStructItem2 >::iterator it=_items.begin();it!=_items.end();it++)
1115           (*it).checkWithMeshStructForGaussPT(mst,globs);
1116         break;
1117       }
1118     default:
1119       throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::checkWithMeshStruct : not managed field type !");
1120     }
1121 }
1122
1123 bool MEDFileField1TSStructItem::operator==(const MEDFileField1TSStructItem& other) const throw(INTERP_KERNEL::Exception)
1124 {
1125   if(_type!=other._type)
1126     return false;
1127   if(_items.size()!=other._items.size())
1128     return false;
1129   for(std::size_t i=0;i<_items.size();i++)
1130     if(!(_items[i]==other._items[i]))
1131       return false;
1132   return true;
1133 }
1134
1135 bool MEDFileField1TSStructItem::isCellSupportEqual(const MEDFileField1TSStructItem& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1136 {
1137   if(_type!=other._type)
1138     return false;
1139   if(_items.size()!=other._items.size())
1140     return false;
1141   for(std::size_t i=0;i<_items.size();i++)
1142     if(!(_items[i].isCellSupportEqual(other._items[i],globs)))
1143       return false;
1144   return true;
1145 }
1146
1147 bool MEDFileField1TSStructItem::isNodeSupportEqual(const MEDFileField1TSStructItem& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1148 {
1149   if(_type!=other._type)
1150     return false;
1151   if(_items.size()!=other._items.size())
1152     return false;
1153   for(std::size_t i=0;i<_items.size();i++)
1154     if(!(_items[i].isNodeSupportEqual(other._items[i],globs)))
1155       return false;
1156   return true;
1157 }
1158
1159 bool MEDFileField1TSStructItem::isEntityCell() const
1160 {
1161   if(_type==ON_NODES)
1162     return false;
1163   else
1164     return true;
1165 }
1166
1167 class CmpGeo
1168 {
1169 public:
1170   CmpGeo(INTERP_KERNEL::NormalizedCellType geoTyp):_geo_type(geoTyp) { }
1171   bool operator()(const std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > & v) const { return _geo_type==v.first; }
1172 private:
1173   INTERP_KERNEL::NormalizedCellType _geo_type;
1174 };
1175
1176 MEDFileField1TSStructItem MEDFileField1TSStructItem::simplifyMeOnCellEntity(const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1177 {
1178   if(!isEntityCell())
1179     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::simplifyMeOnCellEntity : must be on ON_CELLS, ON_GAUSS_NE or ON_GAUSS_PT !");
1180   std::vector< std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > > m;
1181   std::size_t i=0;
1182   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++,i++)
1183     {
1184       std::vector< std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> > >::iterator it0(std::find_if(m.begin(),m.end(),CmpGeo((*it).getGeo())));
1185       if(it0==m.end())
1186         m.push_back(std::pair< INTERP_KERNEL::NormalizedCellType, std::vector<std::size_t> >((*it).getGeo(),std::vector<std::size_t>(1,i)));
1187       else
1188         (*it0).second.push_back(i);
1189     }
1190   if(m.size()==_items.size())
1191     {
1192       MEDFileField1TSStructItem ret(*this);
1193       ret._type=ON_CELLS;
1194       return ret;
1195     }
1196   std::size_t sz(m.size());
1197   std::vector< MEDFileField1TSStructItem2 > items(sz);
1198   for(i=0;i<sz;i++)
1199     {
1200       const std::vector<std::size_t>& ids=m[i].second;
1201       std::vector<const MEDFileField1TSStructItem2 *>objs(ids.size());
1202       for(std::size_t j=0;j<ids.size();j++)
1203         objs[j]=&_items[ids[j]];
1204       items[i]=MEDFileField1TSStructItem2::BuildAggregationOf(objs,globs);
1205     }
1206   MEDFileField1TSStructItem ret(ON_CELLS,items);
1207   ret._computed=true;
1208   return ret;
1209 }
1210
1211 /*!
1212  * \a this is expected to be ON_CELLS and simplified.
1213  */
1214 bool MEDFileField1TSStructItem::isCompatibleWithNodesDiscr(const MEDFileField1TSStructItem& other, const MEDFileMeshStruct *meshSt, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1215 {
1216   if(other._type!=ON_NODES)
1217     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isCompatibleWithNodesDiscr : other must be on nodes !");
1218   if(other._items.size()!=1)
1219     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isCompatibleWithNodesDiscr : other is on nodes but number of subparts !");
1220   int theFirstLevFull;
1221   bool ret0=isFullyOnOneLev(meshSt,theFirstLevFull);
1222   const MEDFileField1TSStructItem2& otherNodeIt(other._items[0]);
1223   if(otherNodeIt.getPflName().empty())
1224     {//on all nodes
1225       if(!ret0)
1226         return false;
1227       return theFirstLevFull==0;
1228     }
1229   else
1230     {
1231       const DataArrayInt *pfl=globs->getProfile(otherNodeIt.getPflName().c_str());
1232       MEDCouplingAutoRefCountObjectPtr<DataArrayInt> cpyPfl(pfl->deepCpy());
1233       cpyPfl->sort();
1234       int nbOfNodes(meshSt->getNumberOfNodes());
1235       if(cpyPfl->isIdentity() && cpyPfl->getNumberOfTuples()==nbOfNodes)
1236         {//on all nodes also !
1237           if(!ret0)
1238             return false;
1239           return theFirstLevFull==0;
1240         }
1241       std::vector<bool> nodesFetched(nbOfNodes,false);
1242       meshSt->getTheMesh()->whichAreNodesFetched(*this,globs,nodesFetched);
1243       return cpyPfl->isFittingWith(nodesFetched);
1244     }
1245 }
1246
1247 bool MEDFileField1TSStructItem::isFullyOnOneLev(const MEDFileMeshStruct *meshSt, int& theFirstLevFull) const throw(INTERP_KERNEL::Exception)
1248 {
1249   if(_type!=ON_CELLS)
1250     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : works only for ON_CELLS discretization !");
1251   if(_items.empty())
1252     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : items vector is empty !");
1253   int nbOfLevs(meshSt->getNumberOfLevs());
1254   if(nbOfLevs==0)
1255     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : no levels in input mesh structure !");
1256   std::vector<int> levs(nbOfLevs);
1257   theFirstLevFull=1;
1258   int nbOfGT=0;
1259   std::set<INTERP_KERNEL::NormalizedCellType> gts;
1260   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++)
1261     {
1262       if(!(*it).getPflName().empty())
1263         return false;
1264       INTERP_KERNEL::NormalizedCellType gt((*it).getGeo());
1265       if(gts.find(gt)!=gts.end())
1266         throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::isFullyOnOneLev : internal error !");
1267       gts.insert(gt);
1268       int pos(meshSt->getLevelOfGeoType((*it).getGeo()));
1269       levs[-pos]++;
1270     }
1271   for(int i=0;i<nbOfLevs;i++)
1272     if(meshSt->getNumberOfGeoTypesInLev(-i)==levs[i])
1273       { theFirstLevFull=-i; return true; }
1274   return false;
1275 }
1276
1277 const MEDFileField1TSStructItem2& MEDFileField1TSStructItem::operator[](std::size_t i) const throw(INTERP_KERNEL::Exception)
1278 {
1279   if(i<0 || i>=_items.size())
1280     throw INTERP_KERNEL::Exception("MEDFileField1TSStructItem::operator[] : input is not in valid range !");
1281   return _items[i];
1282 }
1283
1284 std::size_t MEDFileField1TSStructItem::getHeapMemorySize() const
1285 {
1286   std::size_t ret(0);
1287   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++)
1288     ret+=(*it).getHeapMemorySize();
1289   ret+=_items.size()*sizeof(MEDFileField1TSStructItem2);
1290   return ret;
1291 }
1292
1293 MEDMeshMultiLev *MEDFileField1TSStructItem::buildFromScratchDataSetSupportOnCells(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1294 {
1295   std::size_t sz(_items.size());
1296   std::vector<INTERP_KERNEL::NormalizedCellType> a0(sz);
1297   std::vector<const DataArrayInt *> a1(sz);
1298   std::vector<int> a2(sz);
1299   std::size_t i(0);
1300   for(std::vector< MEDFileField1TSStructItem2 >::const_iterator it=_items.begin();it!=_items.end();it++,i++)
1301     {
1302       a0[i]=(*it).getGeo();
1303       a1[i]=(*it).getPfl(globs);
1304       a2[i]=mst->getNumberOfElemsOfGeoType((*it).getGeo());
1305     }
1306   return MEDMeshMultiLev::New(mst->getTheMesh(),a0,a1,a2);
1307 }
1308
1309 MEDFileField1TSStructItem MEDFileField1TSStructItem::BuildItemFrom(const MEDFileAnyTypeField1TS *ref, const MEDFileMeshStruct *meshSt)
1310 {
1311   TypeOfField atype;
1312   std::vector< MEDFileField1TSStructItem2 > anItems;
1313   //
1314   std::vector< std::vector<std::string> > pfls,locs;
1315   std::vector< std::vector<TypeOfField> > typesF;
1316   std::vector<INTERP_KERNEL::NormalizedCellType> geoTypes;
1317   std::vector< std::vector<std::pair<int,int> > > strtEnds=ref->getFieldSplitedByType(0,geoTypes,typesF,pfls,locs);
1318   std::size_t nbOfGeoTypes(geoTypes.size());
1319   if(nbOfGeoTypes==0)
1320     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : not null by empty ref  !");
1321   bool isFirst=true;
1322   for(std::size_t i=0;i<nbOfGeoTypes;i++)
1323     {
1324       std::size_t sz=typesF[i].size();
1325       if(strtEnds[i].size()<1 || sz<1 || pfls[i].size()<1)
1326         throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : internal error #1 !");
1327       //
1328       if(isFirst)
1329         atype=typesF[i][0];
1330       isFirst=false;
1331       //
1332       for(std::size_t j=0;j<sz;j++)
1333         {
1334           if(atype==typesF[i][j])
1335             anItems.push_back(MEDFileField1TSStructItem2(geoTypes[i],strtEnds[i][j],pfls[i][j],locs[i][j]));
1336           else
1337             throw INTERP_KERNEL::Exception("MEDFileField1TSStruct : can be applied only on single spatial discretization fields ! Call SplitPerDiscretization method !");
1338         }
1339     }
1340   MEDFileField1TSStructItem ret(atype,anItems);
1341   ret.checkWithMeshStruct(meshSt,ref);
1342   return ret;
1343 }
1344
1345 //=
1346
1347 MEDFileField1TSStruct *MEDFileField1TSStruct::New(const MEDFileAnyTypeField1TS *ref, MEDFileMeshStruct *mst) throw(INTERP_KERNEL::Exception)
1348 {
1349   return new MEDFileField1TSStruct(ref,mst);
1350 }
1351
1352 MEDFileField1TSStruct::MEDFileField1TSStruct(const MEDFileAnyTypeField1TS *ref, MEDFileMeshStruct *mst)
1353 {
1354   _already_checked.push_back(MEDFileField1TSStructItem::BuildItemFrom(ref,mst));
1355 }
1356
1357 void MEDFileField1TSStruct::checkWithMeshStruct(MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) throw(INTERP_KERNEL::Exception)
1358 {
1359   if(_already_checked.empty())
1360     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::checkWithMeshStruct : not correctly initialized !");
1361   _already_checked.back().checkWithMeshStruct(mst,globs);
1362 }
1363
1364 bool MEDFileField1TSStruct::isEqualConsideringThePast(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *mst) const throw(INTERP_KERNEL::Exception)
1365 {
1366   MEDFileField1TSStructItem b(MEDFileField1TSStructItem::BuildItemFrom(other,mst));
1367   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++)
1368     {
1369       if((*it)==b)
1370         return true;
1371     }
1372   return false;
1373 }
1374
1375 /*!
1376  * Not const because \a other structure will be added to the \c _already_checked attribute in case of success.
1377  */
1378 bool MEDFileField1TSStruct::isSupportSameAs(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *meshSt) throw(INTERP_KERNEL::Exception)
1379 {
1380   if(_already_checked.empty())
1381     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isSupportSameAs : no ref !");
1382   MEDFileField1TSStructItem b(MEDFileField1TSStructItem::BuildItemFrom(other,meshSt));
1383   if(!_already_checked[0].isEntityCell() || !b.isEntityCell())
1384     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isSupportSameAs : only available on cell entities !");
1385   MEDFileField1TSStructItem other1(b.simplifyMeOnCellEntity(other));
1386   int found=-1,i=0;
1387   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1388     if((*it).isComputed())
1389       { found=i; break; }
1390   bool ret(false);
1391   if(found==-1)
1392     {
1393       MEDFileField1TSStructItem this1(_already_checked[0].simplifyMeOnCellEntity(other));
1394       ret=this1.isCellSupportEqual(other1,other);
1395       if(ret)
1396         _already_checked.push_back(this1);
1397     }
1398   else
1399     ret=_already_checked[found].isCellSupportEqual(other1,other);
1400   if(ret)
1401     _already_checked.push_back(b);
1402   return ret;
1403 }
1404
1405 /*!
1406  * \param [in] other - a field with only one spatial discretization : ON_NODES.
1407  */
1408 bool MEDFileField1TSStruct::isCompatibleWithNodesDiscr(const MEDFileAnyTypeField1TS *other, const MEDFileMeshStruct *meshSt) throw(INTERP_KERNEL::Exception)
1409 {
1410   if(_already_checked.empty())
1411     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::isCompatibleWithNodesDiscr : no ref !");
1412   MEDFileField1TSStructItem other1(MEDFileField1TSStructItem::BuildItemFrom(other,meshSt));
1413   if(_already_checked[0].isEntityCell())
1414     {
1415       int found=-1,i=0;
1416       for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1417         if((*it).isComputed())
1418           { found=i; break; }
1419       bool ret(false);
1420       if(found==-1)
1421         {
1422           MEDFileField1TSStructItem this1(_already_checked[0].simplifyMeOnCellEntity(other));
1423           ret=this1.isCompatibleWithNodesDiscr(other1,meshSt,other);
1424           if(ret)
1425             _already_checked.push_back(this1);
1426         }
1427       else
1428         ret=_already_checked[found].isCompatibleWithNodesDiscr(other1,meshSt,other);
1429       if(ret)
1430         _already_checked.push_back(other1);
1431       return ret;
1432     }
1433   else
1434     return _already_checked[0].isNodeSupportEqual(other1,other);
1435 }
1436
1437 std::size_t MEDFileField1TSStruct::getHeapMemorySize() const
1438 {
1439   std::size_t ret(0);
1440   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++)
1441     ret+=(*it).getHeapMemorySize();
1442   ret+=_already_checked.capacity()*sizeof(MEDFileField1TSStructItem);
1443   return ret;
1444 }
1445
1446 MEDMeshMultiLev *MEDFileField1TSStruct::buildFromScratchDataSetSupport(const MEDFileMeshStruct *mst, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1447 {
1448   if(_already_checked.empty())
1449     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::buildFromScratchDataSetSupport : No outline structure in this !");
1450   int pos0(-1),pos1(-1);
1451   if(presenceOfCellDiscr(pos0))
1452     {
1453       MEDCouplingAutoRefCountObjectPtr<MEDMeshMultiLev> ret(_already_checked[pos0].buildFromScratchDataSetSupportOnCells(mst,globs));
1454       if(presenceOfPartialNodeDiscr(pos1))
1455         ret->setNodeReduction(_already_checked[pos1][0].getPfl(globs));
1456       return ret.retn();
1457     }
1458   else
1459     {
1460       if(!presenceOfPartialNodeDiscr(pos1))
1461         {//we have only all nodes, no cell definition info -> level 0;
1462           std::vector<int> levs(1,0);
1463           return MEDMeshMultiLev::New(mst->getTheMesh(),levs);
1464         }
1465       else
1466         return MEDMeshMultiLev::NewOnlyOnNode(mst->getTheMesh(),_already_checked[pos1][0].getPfl(globs));
1467     }
1468 }
1469
1470 bool MEDFileField1TSStruct::isDataSetSupportFastlyEqualTo(const MEDFileField1TSStruct& other, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1471 {
1472   int b0,b1;
1473   bool a0(presenceOfCellDiscr(b0)),a1(presenceOfPartialNodeDiscr(b1));
1474   int d0,d1;
1475   bool c0(other.presenceOfCellDiscr(d0)),c1(other.presenceOfPartialNodeDiscr(d1));
1476   if(a0!=c0 || a1!=c1)
1477     return false;
1478   if(a0)
1479     if(!_already_checked[b0].isCellSupportEqual(other._already_checked[d0],globs))
1480       return false;
1481   if(a1)
1482     if(!_already_checked[b1].isNodeSupportEqual(other._already_checked[d1],globs))
1483       return false;
1484   return true;
1485 }
1486
1487 /*!
1488  * Returns true if presence in \a this of discretization ON_CELLS, ON_GAUSS_PT, ON_GAUSS_NE.
1489  * 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.
1490  */
1491 bool MEDFileField1TSStruct::presenceOfCellDiscr(int& pos) const throw(INTERP_KERNEL::Exception)
1492 {
1493   std::size_t refSz(std::numeric_limits<std::size_t>::max());
1494   bool ret(false);
1495   int i(0);
1496   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1497     {
1498       if((*it).getType()!=ON_NODES)
1499         {
1500           ret=true;
1501           std::size_t sz((*it).getNumberOfItems());
1502           if(refSz>sz)
1503             { pos=i; refSz=sz; }
1504         }
1505     }
1506   if(refSz==0)
1507     throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::presenceOfCellDiscr : an element in this on entity CELL is empty !");
1508   return ret;
1509 }
1510
1511 /*!
1512  * Returns true if presence in \a this of discretization ON_NODES.
1513  * If true is returned the pos of the first element containing the single subpart.
1514  */
1515 bool MEDFileField1TSStruct::presenceOfPartialNodeDiscr(int& pos) const throw(INTERP_KERNEL::Exception)
1516 {
1517   int i(0);
1518   for(std::vector<MEDFileField1TSStructItem>::const_iterator it=_already_checked.begin();it!=_already_checked.end();it++,i++)
1519     {
1520       if((*it).getType()==ON_NODES)
1521         {
1522           std::size_t sz((*it).getNumberOfItems());
1523           if(sz==1)
1524             {
1525               if(!(*it)[0].getPflName().empty())
1526                 { pos=i; return true; }
1527             }
1528           else
1529             throw INTERP_KERNEL::Exception("MEDFileField1TSStruct::presenceOfPartialNodeDiscr : an element in this on entity NODE is split into several parts !");
1530         }
1531     }
1532   return false;
1533 }
1534
1535 //=
1536
1537 MEDFileFastCellSupportComparator *MEDFileFastCellSupportComparator::New(const MEDFileMeshStruct *m, const MEDFileAnyTypeFieldMultiTS *ref) throw(INTERP_KERNEL::Exception)
1538 {
1539   return new MEDFileFastCellSupportComparator(m,ref);
1540 }
1541
1542 MEDFileFastCellSupportComparator::MEDFileFastCellSupportComparator(const MEDFileMeshStruct *m, const MEDFileAnyTypeFieldMultiTS *ref)
1543 {
1544   if(!m)
1545     throw INTERP_KERNEL::Exception("MEDFileFastCellSupportComparator constructor : null input mesh struct !");
1546   _mesh_comp=const_cast<MEDFileMeshStruct *>(m); _mesh_comp->incrRef();
1547   int nbPts=ref->getNumberOfTS();
1548   _f1ts_cmps.resize(nbPts);
1549   for(int i=0;i<nbPts;i++)
1550     {
1551       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=ref->getTimeStepAtPos(i);
1552       _f1ts_cmps[i]=MEDFileField1TSStruct::New(elt,_mesh_comp);
1553       _f1ts_cmps[i]->checkWithMeshStruct(_mesh_comp,elt);
1554     }
1555 }
1556
1557 std::size_t MEDFileFastCellSupportComparator::getHeapMemorySize() const
1558 {
1559   std::size_t ret(0);
1560   const MEDFileMeshStruct *mst(_mesh_comp);
1561   if(mst)
1562     ret+=mst->getHeapMemorySize();
1563   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileField1TSStruct> >::const_iterator it=_f1ts_cmps.begin();it!=_f1ts_cmps.end();it++)
1564     {
1565       const MEDFileField1TSStruct *cur(*it);
1566       if(cur)
1567         ret+=cur->getHeapMemorySize()+sizeof(MEDFileField1TSStruct);
1568     }
1569   ret+=_f1ts_cmps.capacity()*sizeof(MEDCouplingAutoRefCountObjectPtr<MEDFileField1TSStruct>);
1570   return ret;
1571 }
1572
1573 bool MEDFileFastCellSupportComparator::isEqual(const MEDFileAnyTypeFieldMultiTS *other) throw(INTERP_KERNEL::Exception)
1574 {
1575   int nbPts=other->getNumberOfTS();
1576   if(nbPts!=(int)_f1ts_cmps.size())
1577     {
1578       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isEqual : unexpected nb of time steps in  input ! Should be " << _f1ts_cmps.size() << " it is in reality " << nbPts << " !";
1579       throw INTERP_KERNEL::Exception(oss.str().c_str());
1580     }
1581   for(int i=0;i<nbPts;i++)
1582     {
1583       MEDCouplingAutoRefCountObjectPtr<MEDFileAnyTypeField1TS> elt=other->getTimeStepAtPos(i);
1584       if(!_f1ts_cmps[i]->isEqualConsideringThePast(elt,_mesh_comp))
1585         if(!_f1ts_cmps[i]->isSupportSameAs(elt,_mesh_comp))
1586           return false;
1587     }
1588   return true;
1589 }
1590
1591 bool MEDFileFastCellSupportComparator::isCompatibleWithNodesDiscr(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::isCompatibleWithNodesDiscr : 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]->isCompatibleWithNodesDiscr(elt,_mesh_comp))
1603         return false;
1604     }
1605   return true;
1606 }
1607
1608 MEDMeshMultiLev *MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport(int timeStepId, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1609 {
1610   if(timeStepId<0 || timeStepId>=(int)_f1ts_cmps.size())
1611     {
1612       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport : requested time step id #" << timeStepId << " is not in [0," << _f1ts_cmps.size() << ") !";
1613       throw INTERP_KERNEL::Exception(oss.str().c_str());
1614     }
1615   const MEDFileField1TSStruct *obj(_f1ts_cmps[timeStepId]);
1616   if(!obj)
1617     {
1618       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::buildFromScratchDataSetSupport : at time step id #" << timeStepId << " no field structure overview defined !";
1619       throw INTERP_KERNEL::Exception(oss.str().c_str());
1620     }
1621   return obj->buildFromScratchDataSetSupport(_mesh_comp,globs);
1622 }
1623
1624 bool MEDFileFastCellSupportComparator::isDataSetSupportEqualToThePreviousOne(int timeStepId, const MEDFileFieldGlobsReal *globs) const throw(INTERP_KERNEL::Exception)
1625 {
1626   if(timeStepId<=0 || timeStepId>=(int)_f1ts_cmps.size())
1627     {
1628       std::ostringstream oss; oss << "MEDFileFastCellSupportComparator::isDataSetSupportEqualToThePreviousOne : requested time step id #" << timeStepId << " is not in [1," << _f1ts_cmps.size() << ") !";
1629       throw INTERP_KERNEL::Exception(oss.str().c_str());
1630     }
1631   const MEDFileField1TSStruct *obj(_f1ts_cmps[timeStepId]);
1632   const MEDFileField1TSStruct *objRef(_f1ts_cmps[timeStepId-1]);
1633   return objRef->isDataSetSupportFastlyEqualTo(*obj,globs);
1634 }