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