src/MEDLoader/MEDFileFieldOverView.cxx

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