src/MEDLoader/MEDFileFieldOverView.cxx

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