MEDLoader/MEDFileField1TS.cxx

   1 // Copyright (C) 2017-2020  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 (EDF R&D)
  20
  21 #include "MEDFileField1TS.hxx"
  22 #include "MEDFileFieldVisitor.hxx"
  23 #include "MEDFileSafeCaller.txx"
  24 #include "MEDLoaderBase.hxx"
  25 #include "MEDFileField.txx"
  26
  27 #include "MEDCouplingFieldTemplate.hxx"
  28 #include "MEDCouplingFieldDouble.hxx"
  29
  30 using namespace MEDCoupling;
  31
  32 extern INTERP_KERNEL::NormalizedCellType typmai2[MED_N_CELL_FIXED_GEO];
  33
  34 template class MEDCoupling::MEDFileField1TSTemplateWithoutSDA<Int32>;
  35 template class MEDCoupling::MEDFileField1TSTemplateWithoutSDA<Int64>;
  36 template class MEDCoupling::MEDFileField1TSTemplateWithoutSDA<float>;
  37 template class MEDCoupling::MEDFileField1TSTemplateWithoutSDA<double>;
  38 template class MEDCoupling::MEDFileField1TSNDTemplateWithoutSDA<Int32>;
  39 template class MEDCoupling::MEDFileField1TSNDTemplateWithoutSDA<Int64>;
  40 template class MEDCoupling::MEDFileField1TSNDTemplateWithoutSDA<float>;
  41 template class MEDCoupling::MEDFileTemplateField1TS<Int32>;
  42 template class MEDCoupling::MEDFileTemplateField1TS<Int64>;
  43 template class MEDCoupling::MEDFileTemplateField1TS<float>;
  44 template class MEDCoupling::MEDFileTemplateField1TS<double>;
  45 template class MEDCoupling::MEDFileNDTemplateField1TS<Int32>;
  46 template class MEDCoupling::MEDFileNDTemplateField1TS<Int64>;
  47 template class MEDCoupling::MEDFileNDTemplateField1TS<float>;
  48
  49 const char MEDFileField1TSWithoutSDA::TYPE_STR[]="FLOAT64";
  50 const char MEDFileInt32Field1TSWithoutSDA::TYPE_STR[]="INT32";
  51 const char MEDFileInt64Field1TSWithoutSDA::TYPE_STR[]="INT64";
  52 const char MEDFileFloatField1TSWithoutSDA::TYPE_STR[]="FLOAT32";
  53
  54 //= MEDFileAnyTypeField1TSWithoutSDA
  55
  56 void MEDFileAnyTypeField1TSWithoutSDA::deepCpyLeavesFrom(const MEDFileAnyTypeField1TSWithoutSDA& other)
  57 {
  58   _field_per_mesh.resize(other._field_per_mesh.size());
  59   std::size_t i=0;
  60   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=other._field_per_mesh.begin();it!=other._field_per_mesh.end();it++,i++)
  61     {
  62       if((const MEDFileFieldPerMesh *)*it)
  63         _field_per_mesh[i]=(*it)->deepCopy(this);
  64     }
  65 }
  66
  67 void MEDFileAnyTypeField1TSWithoutSDA::accept(MEDFileFieldVisitor& visitor) const
  68 {
  69   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
  70     if((*it).isNotNull())
  71       {
  72         visitor.newMeshEntry(*it);
  73         (*it)->accept(visitor);
  74         visitor.endMeshEntry(*it);
  75       }
  76 }
  77
  78 /*!
  79  * Prints a string describing \a this field into a stream. This string is outputted
  80  * by \c print Python command.
  81  *  \param [in] bkOffset - number of white spaces printed at the beginning of each line.
  82  *  \param [in,out] oss - the out stream.
  83  *  \param [in] f1tsId - the field index within a MED file. If \a f1tsId < 0, the tiny
  84  *          info id printed, else, not.
  85  */
  86 void MEDFileAnyTypeField1TSWithoutSDA::simpleRepr(int bkOffset, std::ostream& oss, int f1tsId) const
  87 {
  88   std::string startOfLine(bkOffset,' ');
  89   oss << startOfLine << "Field ";
  90   if(bkOffset==0)
  91     oss << "[Type=" << getTypeStr() << "] with name \"" << getName() << "\" ";
  92   oss << "on one time Step ";
  93   if(f1tsId>=0)
  94     oss << "(" << f1tsId << ") ";
  95   oss << "on iteration=" << _iteration << " order=" << _order << "." << std::endl;
  96   oss << startOfLine << "Time attached is : " << _dt << " [" << _dt_unit << "]." << std::endl;
  97   const DataArray *arr=getUndergroundDataArray();
  98   if(arr)
  99     {
 100       const std::vector<std::string> &comps=arr->getInfoOnComponents();
 101       if(f1tsId<0)
 102         {
 103           oss << startOfLine << "Field has " << comps.size() << " components with the following infos :" << std::endl;
 104           for(std::vector<std::string>::const_iterator it=comps.begin();it!=comps.end();it++)
 105             oss << startOfLine << "  -  \"" << (*it) << "\"" << std::endl;
 106         }
 107       if(arr->isAllocated())
 108         {
 109           oss << startOfLine << "Whole field contains " << arr->getNumberOfTuples() << " tuples." << std::endl;
 110         }
 111       else
 112         oss << startOfLine << "The array of the current field has not allocated yet !" << std::endl;
 113     }
 114   else
 115     {
 116       oss << startOfLine << "Field infos are empty ! Not defined yet !" << std::endl;
 117     }
 118   oss << startOfLine << "----------------------" << std::endl;
 119   if(!_field_per_mesh.empty())
 120     {
 121       int i=0;
 122       for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it2=_field_per_mesh.begin();it2!=_field_per_mesh.end();it2++,i++)
 123         {
 124           const MEDFileFieldPerMesh *cur=(*it2);
 125           if(cur)
 126             cur->simpleRepr(bkOffset,oss,i);
 127           else
 128             oss << startOfLine << "Field per mesh #" << i << " is not defined !" << std::endl;
 129         }
 130     }
 131   else
 132     {
 133       oss << startOfLine << "Field is not defined on any meshes !" << std::endl;
 134     }
 135   oss << startOfLine << "----------------------" << std::endl;
 136 }
 137
 138 std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > MEDFileAnyTypeField1TSWithoutSDA::splitComponents() const
 139 {
 140   const DataArray *arr(getUndergroundDataArray());
 141   if(!arr)
 142     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::splitComponents : no array defined !");
 143   std::size_t nbOfCompo=arr->getNumberOfComponents();
 144   std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > ret(nbOfCompo);
 145   for(std::size_t i=0;i<nbOfCompo;i++)
 146     {
 147       ret[i]=deepCopy();
 148       std::vector<std::size_t> v(1,i);
 149       MCAuto<DataArray> arr2=arr->keepSelectedComponents(v);
 150       ret[i]->setArray(arr2);
 151     }
 152   return ret;
 153 }
 154
 155 MEDFileAnyTypeField1TSWithoutSDA::MEDFileAnyTypeField1TSWithoutSDA(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order):MEDFileFieldNameScope(fieldName,meshName),_iteration(iteration),_order(order),_csit(csit),_nb_of_tuples_to_be_allocated(-2)
 156 {
 157 }
 158
 159 MEDFileAnyTypeField1TSWithoutSDA::MEDFileAnyTypeField1TSWithoutSDA():_iteration(-1),_order(-1),_dt(0.),_csit(-1),_nb_of_tuples_to_be_allocated(-1)
 160 {
 161 }
 162
 163 /*!
 164  * Returns the maximal dimension of supporting elements. Returns -2 if \a this is
 165  * empty. Returns -1 if this in on nodes.
 166  *  \return int - the dimension of \a this.
 167  */
 168 int MEDFileAnyTypeField1TSWithoutSDA::getDimension() const
 169 {
 170   int ret=-2;
 171   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 172     (*it)->getDimension(ret);
 173   return ret;
 174 }
 175
 176 bool MEDFileAnyTypeField1TSWithoutSDA::changeMeshNames(const std::vector< std::pair<std::string,std::string> >& modifTab)
 177 {
 178   bool ret=false;
 179   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 180     {
 181       MEDFileFieldPerMesh *cur(*it);
 182       if(cur)
 183         ret=cur->changeMeshNames(modifTab) || ret;
 184     }
 185   return ret;
 186 }
 187
 188 /*!
 189  * Returns the number of iteration of the state of underlying mesh.
 190  *  \return int - the iteration number.
 191  *  \throw If \c _field_per_mesh.empty()
 192  */
 193 int MEDFileAnyTypeField1TSWithoutSDA::getMeshIteration() const
 194 {
 195   if(_field_per_mesh.empty())
 196     throw INTERP_KERNEL::Exception("MEDFileFieldPerMeshPerTypePerDisc::getMeshIteration : No field set !");
 197   return _field_per_mesh[0]->getMeshIteration();
 198 }
 199
 200 /*!
 201  * Returns the order number of iteration of the state of underlying mesh.
 202  *  \return int - the order number.
 203  *  \throw If \c _field_per_mesh.empty()
 204  */
 205 int MEDFileAnyTypeField1TSWithoutSDA::getMeshOrder() const
 206 {
 207   if(_field_per_mesh.empty())
 208     throw INTERP_KERNEL::Exception("MEDFileFieldPerMeshPerTypePerDisc::getMeshOrder : No field set !");
 209   return _field_per_mesh[0]->getMeshOrder();
 210 }
 211
 212 /*!
 213  * Checks if \a this field is tagged by a given iteration number and a given
 214  * iteration order number.
 215  *  \param [in] iteration - the iteration number of interest.
 216  *  \param [in] order - the iteration order number of interest.
 217  *  \return bool - \c true if \a this->getIteration() == \a iteration &&
 218  *          \a this->getOrder() == \a order.
 219  */
 220 bool MEDFileAnyTypeField1TSWithoutSDA::isDealingTS(int iteration, int order) const
 221 {
 222   return iteration==_iteration && order==_order;
 223 }
 224
 225 /*!
 226  * Returns number of iteration and order number of iteration when
 227  * \a this field has been calculated.
 228  *  \return std::pair<int,int> - a pair of the iteration number and the iteration
 229  *          order number.
 230  */
 231 std::pair<int,int> MEDFileAnyTypeField1TSWithoutSDA::getDtIt() const
 232 {
 233   std::pair<int,int> p;
 234   fillIteration(p);
 235   return p;
 236 }
 237
 238 /*!
 239  * Returns number of iteration and order number of iteration when
 240  * \a this field has been calculated.
 241  *  \param [in,out] p - a pair returning the iteration number and the iteration
 242  *          order number.
 243  */
 244 void MEDFileAnyTypeField1TSWithoutSDA::fillIteration(std::pair<int,int>& p) const
 245 {
 246   p.first=_iteration;
 247   p.second=_order;
 248 }
 249
 250 /*!
 251  * Returns all types of spatial discretization of \a this field.
 252  *  \param [in,out] types - a sequence of types of \a this field.
 253  */
 254 void MEDFileAnyTypeField1TSWithoutSDA::fillTypesOfFieldAvailable(std::vector<TypeOfField>& types) const
 255 {
 256   std::set<TypeOfField> types2;
 257   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 258     {
 259       (*it)->fillTypesOfFieldAvailable(types2);
 260     }
 261   std::back_insert_iterator< std::vector<TypeOfField> > bi(types);
 262   std::copy(types2.begin(),types2.end(),bi);
 263 }
 264
 265 /*!
 266  * Returns all types of spatial discretization of \a this field.
 267  *  \return std::vector<TypeOfField> - a sequence of types of spatial discretization
 268  *          of \a this field.
 269  */
 270 std::vector<TypeOfField> MEDFileAnyTypeField1TSWithoutSDA::getTypesOfFieldAvailable() const
 271 {
 272   std::vector<TypeOfField> ret;
 273   fillTypesOfFieldAvailable(ret);
 274   return ret;
 275 }
 276
 277 std::vector<std::string> MEDFileAnyTypeField1TSWithoutSDA::getPflsReallyUsed2() const
 278 {
 279   std::vector<std::string> ret;
 280   std::set<std::string> ret2;
 281   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 282     {
 283       std::vector<std::string> tmp=(*it)->getPflsReallyUsed();
 284       for(std::vector<std::string>::const_iterator it2=tmp.begin();it2!=tmp.end();it2++)
 285         if(ret2.find(*it2)==ret2.end())
 286           {
 287             ret.push_back(*it2);
 288             ret2.insert(*it2);
 289           }
 290     }
 291   return ret;
 292 }
 293
 294 std::vector<std::string> MEDFileAnyTypeField1TSWithoutSDA::getLocsReallyUsed2() const
 295 {
 296   std::vector<std::string> ret;
 297   std::set<std::string> ret2;
 298   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 299     {
 300       std::vector<std::string> tmp=(*it)->getLocsReallyUsed();
 301       for(std::vector<std::string>::const_iterator it2=tmp.begin();it2!=tmp.end();it2++)
 302         if(ret2.find(*it2)==ret2.end())
 303           {
 304             ret.push_back(*it2);
 305             ret2.insert(*it2);
 306           }
 307     }
 308   return ret;
 309 }
 310
 311 std::vector<std::string> MEDFileAnyTypeField1TSWithoutSDA::getPflsReallyUsedMulti2() const
 312 {
 313   std::vector<std::string> ret;
 314   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 315     {
 316       std::vector<std::string> tmp=(*it)->getPflsReallyUsedMulti();
 317       ret.insert(ret.end(),tmp.begin(),tmp.end());
 318     }
 319   return ret;
 320 }
 321
 322 std::vector<std::string> MEDFileAnyTypeField1TSWithoutSDA::getLocsReallyUsedMulti2() const
 323 {
 324   std::vector<std::string> ret;
 325   std::set<std::string> ret2;
 326   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 327     {
 328       std::vector<std::string> tmp=(*it)->getLocsReallyUsedMulti();
 329       ret.insert(ret.end(),tmp.begin(),tmp.end());
 330     }
 331   return ret;
 332 }
 333
 334 void MEDFileAnyTypeField1TSWithoutSDA::changePflsRefsNamesGen2(const std::vector< std::pair<std::vector<std::string>, std::string > >& mapOfModif)
 335 {
 336   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 337     (*it)->changePflsRefsNamesGen(mapOfModif);
 338 }
 339
 340 void MEDFileAnyTypeField1TSWithoutSDA::changeLocsRefsNamesGen2(const std::vector< std::pair<std::vector<std::string>, std::string > >& mapOfModif)
 341 {
 342   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 343     (*it)->changeLocsRefsNamesGen(mapOfModif);
 344 }
 345
 346 /*!
 347  * Returns all attributes of parts of \a this field lying on a given mesh.
 348  * Each part differs from other ones by a type of supporting mesh entity. The _i_-th
 349  * item of every of returned sequences refers to the _i_-th part of \a this field.
 350  * Thus all sequences returned by this method are of the same length equal to number
 351  * of different types of supporting entities.<br>
 352  * A field part can include sub-parts with several different spatial discretizations,
 353  * \ref MEDCoupling::ON_CELLS "ON_CELLS" and \ref MEDCoupling::ON_GAUSS_PT "ON_GAUSS_PT"
 354  * for example. Hence, some of the returned sequences contains nested sequences, and an item
 355  * of a nested sequence corresponds to a type of spatial discretization.<br>
 356  * This method allows for iteration over MEDFile DataStructure without any overhead.
 357  *  \param [in] mname - a name of a mesh of interest. It can be \c NULL, which is valid
 358  *          for the case with only one underlying mesh. (Actually, the number of meshes is
 359  *          not checked if \a mname == \c NULL).
 360  *  \param [in,out] types - a sequence of types of underlying mesh entities. A type per
 361  *          a field part is returned.
 362  *  \param [in,out] typesF - a sequence of sequences of types of spatial discretizations.
 363  *          This sequence is of the same length as \a types.
 364  *  \param [in,out] pfls - a sequence returning a profile name per each type of spatial
 365  *          discretization. A profile name can be empty.
 366  *          Length of this and of nested sequences is the same as that of \a typesF.
 367  *  \param [in,out] locs - a sequence returning a localization name per each type of spatial
 368  *          discretization. A localization name can be empty.
 369  *          Length of this and of nested sequences is the same as that of \a typesF.
 370  *  \return std::vector< std::vector< std::pair<int,int> > > - a sequence holding a range
 371  *          of ids of tuples within the data array, per each type of spatial
 372  *          discretization within one mesh entity type.
 373  *          Length of this and of nested sequences is the same as that of \a typesF.
 374  *  \throw If no field is lying on \a mname.
 375  */
 376 std::vector< std::vector< std::pair<mcIdType,mcIdType> > > MEDFileAnyTypeField1TSWithoutSDA::getFieldSplitedByType(const std::string& mname, std::vector<INTERP_KERNEL::NormalizedCellType>& types, std::vector< std::vector<TypeOfField> >& typesF, std::vector< std::vector<std::string> >& pfls, std::vector< std::vector<std::string> >& locs) const
 377 {
 378   if(_field_per_mesh.empty())
 379     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getFieldSplitedByType : This is empty !");
 380   return _field_per_mesh[0]->getFieldSplitedByType(types,typesF,pfls,locs);
 381 }
 382
 383 /*!
 384  * Returns dimensions of mesh elements \a this field lies on. The returned value is a
 385  * maximal absolute dimension and values returned via the out parameter \a levs are
 386  * dimensions relative to the maximal absolute dimension. <br>
 387  * This method is designed for MEDFileField1TS instances that have a discretization
 388  * \ref MEDCoupling::ON_CELLS "ON_CELLS",
 389  * \ref MEDCoupling::ON_GAUSS_PT "ON_GAUSS_PT",
 390  * \ref MEDCoupling::ON_GAUSS_NE "ON_GAUSS_NE".
 391  * Only these 3 discretizations will be taken into account here. If \a this is
 392  * \ref MEDCoupling::ON_NODES "ON_NODES", -1 is returned and \a levs are empty.<br>
 393  * This method is useful to make the link between the dimension of the underlying mesh
 394  * and the levels of \a this, because it is possible that the highest dimension of \a this
 395  * field is not equal to the dimension of the underlying mesh.
 396  *
 397  * Let's consider the following case:
 398  * - mesh \a m1 has a meshDimension 3 and has non empty levels [0,-1,-2] with elements
 399  * TETRA4, HEXA8, TRI3 and SEG2.
 400  * - field \a f1 lies on \a m1 and is defined on 3D and 1D elements TETRA4 and SEG2.
 401  * - field \a f2 lies on \a m1 and is defined on 2D and 1D elements TRI3 and SEG2.
 402  *
 403  * In this case \a f1->getNonEmptyLevels() returns (3,[0,-2]) and \a
 404  * f2->getNonEmptyLevels() returns (2,[0,-1]). <br>
 405  * The returned values can be used for example to retrieve a MEDCouplingFieldDouble lying
 406  * on elements of a certain relative level by calling getFieldAtLevel(). \a meshDimRelToMax
 407  * parameter of getFieldAtLevel() is computed basing on the returned values as this:
 408  * <em> meshDimRelToMax = absDim - meshDim + relativeLev </em>.
 409  * For example<br>
 410  * to retrieve the highest level of
 411  * \a f1: <em>f1->getFieldAtLevel( ON_CELLS, 3-3+0 ); // absDim - meshDim + relativeLev</em><br>
 412  * to retrieve the lowest level of \a f1: <em>f1->getFieldAtLevel( ON_CELLS, 3-3+(-2) );</em><br>
 413  * to retrieve the highest level of \a f2: <em>f2->getFieldAtLevel( ON_CELLS, 2-3+0 );</em><br>
 414  * to retrieve the lowest level of \a f2: <em>f2->getFieldAtLevel( ON_CELLS, 2-3+(-1) )</em>.
 415  *  \param [in] mname - a name of a mesh of interest. It can be \c NULL, which is valid
 416  *          for the case with only one underlying mesh. (Actually, the number of meshes is
 417  *          not checked if \a mname == \c NULL).
 418  *  \param [in,out] levs - a sequence returning the dimensions relative to the maximal
 419  *          absolute one. They are in decreasing order. This sequence is cleared before
 420  *          filling it in.
 421  *  \return int - the maximal absolute dimension of elements \a this fields lies on.
 422  *  \throw If no field is lying on \a mname.
 423  */
 424 int MEDFileAnyTypeField1TSWithoutSDA::getNonEmptyLevels(const std::string& mname, std::vector<int>& levs) const
 425 {
 426   levs.clear();
 427   std::vector<INTERP_KERNEL::NormalizedCellType> types;
 428   std::vector< std::vector<TypeOfField> > typesF;
 429   std::vector< std::vector<std::string> > pfls, locs;
 430   if(_field_per_mesh.empty())
 431     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::getNonEmptyLevels : This is empty !");
 432   _field_per_mesh[0]->getFieldSplitedByType(types,typesF,pfls,locs);
 433   if(types.empty())
 434     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getNonEmptyLevels : 'this' is empty !");
 435   std::set<INTERP_KERNEL::NormalizedCellType> st(types.begin(),types.end());
 436   if(st.size()==1 && (*st.begin())==INTERP_KERNEL::NORM_ERROR)
 437     return -1;
 438   st.erase(INTERP_KERNEL::NORM_ERROR);
 439   std::set<int> ret1;
 440   for(std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator it=st.begin();it!=st.end();it++)
 441     {
 442       const INTERP_KERNEL::CellModel& cm=INTERP_KERNEL::CellModel::GetCellModel(*it);
 443       ret1.insert((int)cm.getDimension());
 444     }
 445   int ret=*std::max_element(ret1.begin(),ret1.end());
 446   std::copy(ret1.rbegin(),ret1.rend(),std::back_insert_iterator<std::vector<int> >(levs));
 447   std::transform(levs.begin(),levs.end(),levs.begin(),std::bind2nd(std::plus<int>(),-ret));
 448   return ret;
 449 }
 450
 451 void MEDFileAnyTypeField1TSWithoutSDA::convertMedBallIntoClassic()
 452 {
 453   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it<_field_per_mesh.end();it++)
 454     if((*it).isNotNull())
 455       (*it)->convertMedBallIntoClassic();
 456 }
 457
 458 void MEDFileAnyTypeField1TSWithoutSDA::makeReduction(INTERP_KERNEL::NormalizedCellType ct, TypeOfField tof, const DataArrayIdType *pfl)
 459 {
 460   if(!pfl)
 461     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::makeReduction : null pfl !");
 462   std::string name(pfl->getName());
 463   pfl->checkAllocated();
 464   if(pfl->getNumberOfComponents()!=1)
 465     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::makeReduction : non mono compo array !");
 466   if(name.empty())
 467     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::makeReduction : empty pfl name !");
 468   if(_field_per_mesh.size()!=1)
 469     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::makeReduction : only single mesh supported !");
 470   MCAuto<MEDFileFieldPerMesh> fpm(_field_per_mesh[0]);
 471   if(fpm.isNull())
 472     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::makeReduction : only single not null mesh supported !");
 473   MEDFileFieldPerMeshPerTypePerDisc *disc(fpm->getLeafGivenTypeAndLocId(ct,0));
 474   if(disc->getType()!=tof)
 475     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::makeReduction : error !");
 476   mcIdType s(disc->getStart()),e(disc->getEnd()),nt(pfl->getNumberOfTuples());
 477   DataArray *arr(getUndergroundDataArray());
 478   mcIdType nt2(arr->getNumberOfTuples()),delta((e-s)-nt);
 479   if(delta<0)
 480     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::makeReduction : internal error !");
 481   MCAuto<DataArray> arr0(arr->selectByTupleIdSafeSlice(0,s,1)),arr1(arr->selectByTupleIdSafeSlice(s,e,1)),arr2(arr->selectByTupleIdSafeSlice(e,nt2,1));
 482   MCAuto<DataArray> arr11(arr1->selectByTupleIdSafe(pfl->begin(),pfl->end()));
 483   MCAuto<DataArray> arrOut(arr->buildNewEmptyInstance());
 484   arrOut->alloc(nt2-delta,arr->getNumberOfComponents());
 485   arrOut->copyStringInfoFrom(*arr);
 486   arrOut->setContigPartOfSelectedValuesSlice(0,arr0,0,s,1);
 487   arrOut->setContigPartOfSelectedValuesSlice(s,arr11,0,nt,1);
 488   arrOut->setContigPartOfSelectedValuesSlice(e-delta,arr2,0,nt2-e,1);
 489   setArray(arrOut);
 490   disc->setEnd(e-delta);
 491   disc->setProfile(name);
 492 }
 493
 494 /*!
 495  * \param [in] mName specifies the underlying mesh name. This value can be pointer 0 for users that do not deal with fields on multi mesh.
 496  * \param [in] typ is for the geometric cell type (or INTERP_KERNEL::NORM_ERROR for node field) entry to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set.
 497  * \param [in] locId is the localization id to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set. It corresponds to the position of
 498  *             \c pfls[std::distance(types.begin(),std::find(types.begin(),typ)] vector in MEDFileField1TSWithoutSDA::getFieldSplitedByType. For non gausspoints field users, the value is 0.
 499  */
 500 MEDFileFieldPerMeshPerTypePerDisc *MEDFileAnyTypeField1TSWithoutSDA::getLeafGivenMeshAndTypeAndLocId(const std::string& mName, INTERP_KERNEL::NormalizedCellType typ, int locId)
 501 {
 502   if(_field_per_mesh.empty())
 503     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::getLeafGivenMeshAndTypeAndLocId : This is empty !");
 504   return _field_per_mesh[0]->getLeafGivenTypeAndLocId(typ,locId);
 505 }
 506
 507 /*!
 508  * \param [in] mName specifies the underlying mesh name. This value can be pointer 0 for users that do not deal with fields on multi mesh.
 509  * \param [in] typ is for the geometric cell type (or INTERP_KERNEL::NORM_ERROR for node field) entry to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set.
 510  * \param [in] locId is the localization id to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set. It corresponds to the position of
 511  *             \c pfls[std::distance(types.begin(),std::find(types.begin(),typ)] vector in MEDFileField1TSWithoutSDA::getFieldSplitedByType. For non gausspoints field users, the value is 0.
 512  */
 513 const MEDFileFieldPerMeshPerTypePerDisc *MEDFileAnyTypeField1TSWithoutSDA::getLeafGivenMeshAndTypeAndLocId(const std::string& mName, INTERP_KERNEL::NormalizedCellType typ, int locId) const
 514 {
 515   if(_field_per_mesh.empty())
 516     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::getLeafGivenMeshAndTypeAndLocId : This is empty !");
 517   return _field_per_mesh[0]->getLeafGivenTypeAndLocId(typ,locId);
 518 }
 519
 520 /*!
 521  * \param [in] mName specifies the underlying mesh name. This value can be pointer 0 for users that do not deal with fields on multi mesh.
 522  */
 523 int MEDFileAnyTypeField1TSWithoutSDA::getMeshIdFromMeshName(const std::string& mName) const
 524 {
 525   if(_field_per_mesh.empty())
 526     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getMeshIdFromMeshName : No field set !");
 527   if(mName.empty())
 528     return 0;
 529   std::string mName2(mName);
 530   int ret=0;
 531   std::vector<std::string> msg;
 532   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++,ret++)
 533     if(mName2==(*it)->getMeshName())
 534       return ret;
 535     else
 536       msg.push_back((*it)->getMeshName());
 537   std::ostringstream oss; oss << "MEDFileField1TSWithoutSDA::getMeshIdFromMeshName : No such mesh \"" << mName2 << "\" as underlying mesh of field \"" << getName() << "\" !\n";
 538   oss << "Possible meshes are : ";
 539   for(std::vector<std::string>::const_iterator it2=msg.begin();it2!=msg.end();it2++)
 540     oss << "\"" << (*it2) << "\" ";
 541   throw INTERP_KERNEL::Exception(oss.str());
 542 }
 543
 544 int MEDFileAnyTypeField1TSWithoutSDA::addNewEntryIfNecessary(const MEDCouplingMesh *mesh)
 545 {
 546   if(!mesh)
 547     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::addNewEntryIfNecessary : input mesh is NULL !");
 548   std::string tmp(mesh->getName());
 549   if(tmp.empty())
 550     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::addNewEntryIfNecessary : empty mesh name ! unsupported by MED file !");
 551   setMeshName(tmp);
 552   std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();
 553   int i=0;
 554   for(;it!=_field_per_mesh.end();it++,i++)
 555     {
 556       if((*it)->getMeshName()==tmp)
 557         return i;
 558     }
 559   std::size_t sz=_field_per_mesh.size();
 560   _field_per_mesh.resize(sz+1);
 561   _field_per_mesh[sz]=MEDFileFieldPerMesh::New(this,mesh);
 562   return (int)sz;
 563 }
 564
 565 bool MEDFileAnyTypeField1TSWithoutSDA::renumberEntitiesLyingOnMesh(const std::string& meshName, const std::vector<mcIdType>& oldCode, const std::vector<mcIdType>& newCode, const DataArrayIdType *renumO2N,
 566                                                                    MEDFileFieldGlobsReal& glob)
 567 {
 568   bool ret=false;
 569   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 570     {
 571       MEDFileFieldPerMesh *fpm(*it);
 572       if(fpm)
 573         ret=fpm->renumberEntitiesLyingOnMesh(meshName,oldCode,newCode,renumO2N,glob) || ret;
 574     }
 575   return ret;
 576 }
 577
 578 /*!
 579  * This method splits \a this into several sub-parts so that each sub parts have exactly one spatial discretization. This method implements the minimal
 580  * splitting that leads to single spatial discretization of this.
 581  *
 582  * \sa splitMultiDiscrPerGeoTypes
 583  */
 584 std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > MEDFileAnyTypeField1TSWithoutSDA::splitDiscretizations() const
 585 {
 586   std::vector<INTERP_KERNEL::NormalizedCellType> types;
 587   std::vector< std::vector<TypeOfField> > typesF;
 588   std::vector< std::vector<std::string> > pfls,locs;
 589   std::vector< std::vector<std::pair<mcIdType,mcIdType> > > bgEnd(getFieldSplitedByType(getMeshName().c_str(),types,typesF,pfls,locs));
 590   std::set<TypeOfField> allEnt;
 591   for(std::vector< std::vector<TypeOfField> >::const_iterator it1=typesF.begin();it1!=typesF.end();it1++)
 592     for(std::vector<TypeOfField>::const_iterator it2=(*it1).begin();it2!=(*it1).end();it2++)
 593       allEnt.insert(*it2);
 594   std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > ret(allEnt.size());
 595   std::set<TypeOfField>::const_iterator it3(allEnt.begin());
 596   for(std::size_t i=0;i<allEnt.size();i++,it3++)
 597     {
 598       std::vector< std::pair<mcIdType,mcIdType> > its;
 599       ret[i]=shallowCpy();
 600       mcIdType newLgth(ret[i]->keepOnlySpatialDiscretization(*it3,its));
 601       ret[i]->updateData(newLgth,its);
 602     }
 603   return ret;
 604 }
 605
 606 /*!
 607  * This method performs a sub splitting as splitDiscretizations does but finer. This is the finest splitting level that can be done.
 608  * This method implements the minimal splitting so that each returned elements are mono Gauss discretization per geometric type.
 609  *
 610  * \sa splitDiscretizations
 611  */
 612 std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > MEDFileAnyTypeField1TSWithoutSDA::splitMultiDiscrPerGeoTypes() const
 613 {
 614   std::vector<INTERP_KERNEL::NormalizedCellType> types;
 615   std::vector< std::vector<TypeOfField> > typesF;
 616   std::vector< std::vector<std::string> > pfls,locs;
 617   std::vector< std::vector<std::pair<mcIdType,mcIdType> > > bgEnd(getFieldSplitedByType(getMeshName().c_str(),types,typesF,pfls,locs));
 618   std::set<TypeOfField> allEnt;
 619   std::size_t nbOfMDPGT(0),ii(0);
 620   for(std::vector< std::vector<TypeOfField> >::const_iterator it1=typesF.begin();it1!=typesF.end();it1++,ii++)
 621     {
 622       nbOfMDPGT=std::max(nbOfMDPGT,locs[ii].size());
 623       for(std::vector<TypeOfField>::const_iterator it2=(*it1).begin();it2!=(*it1).end();it2++)
 624         allEnt.insert(*it2);
 625     }
 626   if(allEnt.size()!=1)
 627     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::splitMultiDiscrPerGeoTypes : this field is expected to be defined only on one spatial discretization !");
 628   if(nbOfMDPGT==0)
 629     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::splitMultiDiscrPerGeoTypes : empty field !");
 630   if(nbOfMDPGT==1)
 631     {
 632       std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > ret0(1);
 633       ret0[0]=const_cast<MEDFileAnyTypeField1TSWithoutSDA *>(this); this->incrRef();
 634       return ret0;
 635     }
 636   std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > ret(nbOfMDPGT);
 637   for(std::size_t i=0;i<nbOfMDPGT;i++)
 638     {
 639       std::vector< std::pair<mcIdType,mcIdType> > its;
 640       ret[i]=shallowCpy();
 641       mcIdType newLgth(ret[i]->keepOnlyGaussDiscretization(i,its));
 642       ret[i]->updateData(newLgth,its);
 643     }
 644   return ret;
 645 }
 646
 647 mcIdType MEDFileAnyTypeField1TSWithoutSDA::keepOnlySpatialDiscretization(TypeOfField tof, std::vector< std::pair<mcIdType,mcIdType> >& its)
 648 {
 649   mcIdType globalCounter(0);
 650   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 651     (*it)->keepOnlySpatialDiscretization(tof,globalCounter,its);
 652   return globalCounter;
 653 }
 654
 655 mcIdType MEDFileAnyTypeField1TSWithoutSDA::keepOnlyGaussDiscretization(std::size_t idOfDisc, std::vector< std::pair<mcIdType,mcIdType> >& its)
 656 {
 657   mcIdType globalCounter(0);
 658   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 659     (*it)->keepOnlyGaussDiscretization(idOfDisc,globalCounter,its);
 660   return globalCounter;
 661 }
 662
 663 void MEDFileAnyTypeField1TSWithoutSDA::updateData(mcIdType newLgth, const std::vector< std::pair<mcIdType,mcIdType> >& oldStartStops)
 664 {
 665   if(_nb_of_tuples_to_be_allocated>=0)
 666     {
 667       _nb_of_tuples_to_be_allocated=newLgth;
 668       const DataArray *oldArr(getUndergroundDataArray());
 669       if(oldArr)
 670         {
 671           MCAuto<DataArray> newArr(createNewEmptyDataArrayInstance());
 672           newArr->setInfoAndChangeNbOfCompo(oldArr->getInfoOnComponents());
 673           setArray(newArr);
 674           _nb_of_tuples_to_be_allocated=newLgth;//force the _nb_of_tuples_to_be_allocated because setArray has been used specialy
 675         }
 676       return ;
 677     }
 678   if(_nb_of_tuples_to_be_allocated==-1)
 679     return ;
 680   if(_nb_of_tuples_to_be_allocated==-2 || _nb_of_tuples_to_be_allocated==-3)
 681     {
 682       const DataArray *oldArr(getUndergroundDataArray());
 683       if(!oldArr || !oldArr->isAllocated())
 684         throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::updateData : internal error 1 !");
 685       MCAuto<DataArray> newArr(createNewEmptyDataArrayInstance());
 686       newArr->alloc(newLgth,getNumberOfComponents());
 687       if(oldArr)
 688         newArr->copyStringInfoFrom(*oldArr);
 689       mcIdType pos=0;
 690       for(std::vector< std::pair<mcIdType,mcIdType> >::const_iterator it=oldStartStops.begin();it!=oldStartStops.end();it++)
 691         {
 692           if((*it).second<(*it).first)
 693             throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::updateData : the range in the leaves was invalid !");
 694           newArr->setContigPartOfSelectedValuesSlice(pos,oldArr,(*it).first,(*it).second,1);
 695           pos+=(*it).second-(*it).first;
 696         }
 697       setArray(newArr);
 698       return ;
 699     }
 700   throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::updateData : internal error 2 !");
 701 }
 702
 703 void MEDFileAnyTypeField1TSWithoutSDA::writeLL(med_idt fid, const MEDFileWritable& opts, const MEDFileFieldNameScope& nasc) const
 704 {
 705   if(_field_per_mesh.empty())
 706     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::writeLL : empty field !");
 707   if(_field_per_mesh.size()>1)
 708     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::writeLL : In MED3.0 mode in writing mode only ONE underlying mesh supported !");
 709   _field_per_mesh[0]->copyOptionsFrom(opts);
 710   _field_per_mesh[0]->writeLL(fid,nasc);
 711 }
 712
 713 /*!
 714  * MED file does not support ' ' at the end of the field name. This method corrects the possibly invalid input \a nonCorrectFieldName to a correct one by right stripping input.
 715  */
 716 std::string MEDFileAnyTypeField1TSWithoutSDA::FieldNameToMEDFileConvention(const std::string& nonCorrectFieldName)
 717 {
 718   std::string::size_type pos0(nonCorrectFieldName.find_last_not_of(' '));
 719   if(pos0==std::string::npos)
 720     return nonCorrectFieldName;
 721   if(pos0+1==nonCorrectFieldName.length())
 722     return nonCorrectFieldName;
 723   return nonCorrectFieldName.substr(0,pos0+1);
 724 }
 725
 726 /*!
 727  * This methods returns true is the allocation has been needed leading to a modification of state in \a this->_nb_of_tuples_to_be_allocated.
 728  * If false is returned the memory allocation is not required.
 729  */
 730 bool MEDFileAnyTypeField1TSWithoutSDA::allocIfNecessaryTheArrayToReceiveDataFromFile()
 731 {
 732   if(_nb_of_tuples_to_be_allocated>=0)
 733     {
 734       getOrCreateAndGetArray()->alloc(_nb_of_tuples_to_be_allocated,getNumberOfComponents());
 735       _nb_of_tuples_to_be_allocated=-2;
 736       return true;
 737     }
 738   if(_nb_of_tuples_to_be_allocated==-2 || _nb_of_tuples_to_be_allocated==-3)
 739     return false;
 740   if(_nb_of_tuples_to_be_allocated==-1)
 741     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::allocIfNecessaryTheArrayToReceiveDataFromFile : trying to read from a file an empty instance ! Need to prepare the structure before !");
 742   if(_nb_of_tuples_to_be_allocated<-3)
 743     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::allocIfNecessaryTheArrayToReceiveDataFromFile : internal error !");
 744   throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::allocIfNecessaryTheArrayToReceiveDataFromFile : internal error !");
 745 }
 746
 747 void MEDFileAnyTypeField1TSWithoutSDA::loadOnlyStructureOfDataRecursively(med_idt fid, const MEDFileFieldNameScope& nasc, const MEDFileMeshes *ms, const MEDFileEntities *entities, const MEDFileCapability *capability)
 748 {
 749   med_int numdt,numit;
 750   med_float dt;
 751   med_int meshnumdt(-1),meshnumit(-1);
 752   MEDFILESAFECALLERRD0(MEDfieldComputingStepInfo,(fid,nasc.getName().c_str(),_csit,&numdt,&numit,&_dt));
 753   if(!capability || !capability->isFastReader())
 754   {
 755     med_bool localMesh;
 756     med_int nmesh;
 757     INTERP_KERNEL::AutoPtr<char> meshName(MEDLoaderBase::buildEmptyString(MED_NAME_SIZE));
 758     MEDFILESAFECALLERRD0(MEDfield23ComputingStepMeshInfo,(fid,nasc.getName().c_str(),_csit,&numdt,&numit,&dt,&nmesh,meshName,&localMesh,&meshnumdt,&meshnumit)); // to check with Adrien for legacy MED files
 759   }
 760   if(_iteration!=numdt || _order!=numit)
 761     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::loadBigArraysRecursively : unexpected exception internal error !");
 762   _field_per_mesh.resize(1);
 763   //
 764   MEDFileMesh *mm(0);
 765   if(ms)
 766     {
 767       mm=ms->getMeshWithName(getMeshName());
 768     }
 769   //
 770   _field_per_mesh[0]=MEDFileFieldPerMesh::NewOnRead(fid,this,0,FromMedInt<int>(meshnumdt),FromMedInt<int>(meshnumit),nasc,mm,entities);
 771   _nb_of_tuples_to_be_allocated=0;
 772   _field_per_mesh[0]->loadOnlyStructureOfDataRecursively(fid,_nb_of_tuples_to_be_allocated,nasc);
 773 }
 774
 775 void MEDFileAnyTypeField1TSWithoutSDA::loadBigArraysRecursively(med_idt fid, const MEDFileFieldNameScope& nasc)
 776 {
 777   allocIfNecessaryTheArrayToReceiveDataFromFile();
 778   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 779     (*it)->loadBigArraysRecursively(fid,nasc);
 780 }
 781
 782 void MEDFileAnyTypeField1TSWithoutSDA::loadBigArraysRecursivelyIfNecessary(med_idt fid, const MEDFileFieldNameScope& nasc)
 783 {
 784   if(allocIfNecessaryTheArrayToReceiveDataFromFile())
 785     for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 786       (*it)->loadBigArraysRecursively(fid,nasc);
 787 }
 788
 789 void MEDFileAnyTypeField1TSWithoutSDA::loadStructureAndBigArraysRecursively(med_idt fid, const MEDFileFieldNameScope& nasc, const MEDFileMeshes *ms, const MEDFileEntities *entities)
 790 {
 791   loadOnlyStructureOfDataRecursively(fid,nasc,ms,entities);
 792   loadBigArraysRecursively(fid,nasc);
 793 }
 794
 795 void MEDFileAnyTypeField1TSWithoutSDA::unloadArrays()
 796 {
 797   DataArray *thisArr(getUndergroundDataArray());
 798   if(thisArr && thisArr->isAllocated())
 799     {
 800       _nb_of_tuples_to_be_allocated=thisArr->getNumberOfTuples();
 801       thisArr->desallocate();
 802     }
 803 }
 804
 805 std::size_t MEDFileAnyTypeField1TSWithoutSDA::getHeapMemorySizeWithoutChildren() const
 806 {
 807   return _mesh_name.capacity()+_dt_unit.capacity()+_field_per_mesh.capacity()*sizeof(MCAuto< MEDFileFieldPerMesh >);
 808 }
 809
 810 std::vector<const BigMemoryObject *> MEDFileAnyTypeField1TSWithoutSDA::getDirectChildrenWithNull() const
 811 {
 812   std::vector<const BigMemoryObject *> ret;
 813   if(getUndergroundDataArray())
 814     ret.push_back(getUndergroundDataArray());
 815   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
 816     ret.push_back((const MEDFileFieldPerMesh *)*it);
 817   return ret;
 818 }
 819
 820 /*!
 821  * Adds a MEDCouplingFieldDouble to \a this. The underlying mesh of the given field is
 822  * checked if its elements are sorted suitable for writing to MED file ("STB" stands for
 823  * "Sort By Type"), if not, an exception is thrown.
 824  *  \param [in] field - the field to add to \a this. The array of field \a field is ignored
 825  *  \param [in] arr - the array of values.
 826  *  \param [in,out] glob - the global data where profiles and localization present in
 827  *          \a field, if any, are added.
 828  *  \throw If the name of \a field is empty.
 829  *  \throw If the data array of \a field is not set.
 830  *  \throw If \a this->_arr is already allocated but has different number of components
 831  *         than \a field.
 832  *  \throw If the underlying mesh of \a field has no name.
 833  *  \throw If elements in the mesh are not in the order suitable for writing to the MED file.
 834  */
 835 void MEDFileAnyTypeField1TSWithoutSDA::setFieldNoProfileSBT(const TimeHolder *th, const MEDCouplingFieldTemplate *field, const DataArray *arr, MEDFileFieldGlobsReal& glob, const MEDFileFieldNameScope& nasc)
 836 {
 837   const MEDCouplingMesh *mesh(field->getMesh());
 838   //
 839   TypeOfField type(field->getTypeOfField());
 840   std::vector<DataArrayIdType *> dummy;
 841   if(mesh)
 842     setMeshName(mesh->getName());
 843   mcIdType start(copyTinyInfoFrom(th,field,arr));
 844   int pos(addNewEntryIfNecessary(mesh));
 845   if(type!=ON_NODES)
 846     {
 847       std::vector<mcIdType> code=MEDFileField1TSWithoutSDA::CheckSBTMesh(mesh);
 848       _field_per_mesh[pos]->assignFieldNoProfileNoRenum(start,code,field,arr,glob,nasc);
 849     }
 850   else
 851     _field_per_mesh[pos]->assignNodeFieldNoProfile(start,field,arr,glob);
 852 }
 853
 854 /*!
 855  * Adds a MEDCouplingFieldDouble to \a this. Specified entities of a given dimension
 856  * of a given mesh are used as the support of the given field (a real support is not used).
 857  * Elements of the given mesh must be sorted suitable for writing to MED file.
 858  * Order of underlying mesh entities of the given field specified by \a profile parameter
 859  * is not prescribed; this method permutes field values to have them sorted by element
 860  * type as required for writing to MED file. A new profile is added only if no equal
 861  * profile is missing.
 862  *  \param [in] field - the field to add to \a this. The field double values are ignored.
 863  *  \param [in] arrOfVals - the values of the field \a field used.
 864  *  \param [in] mesh - the supporting mesh of \a field.
 865  *  \param [in] meshDimRelToMax - a relative dimension of mesh entities \a field lies on.
 866  *  \param [in] profile - ids of mesh entities on which corresponding field values lie.
 867  *  \param [in,out] glob - the global data where profiles and localization present in
 868  *          \a field, if any, are added.
 869  *  \param [in] nasc - the name scope used to assign names. Depends on the caller on the top call stack
 870  *  \param [in] smartPflKiller - specifies if this method tries at most to avoid profiles
 871  *  \throw If either \a field or \a mesh or \a profile has an empty name.
 872  *  \throw If there are no mesh entities of \a meshDimRelToMax dimension in \a mesh.
 873  *  \throw If the data array of \a field is not set.
 874  *  \throw If \a this->_arr is already allocated but has different number of components
 875  *         than \a field.
 876  *  \throw If elements in \a mesh are not in the order suitable for writing to the MED file.
 877  *  \sa setFieldNoProfileSBT()
 878  */
 879 void MEDFileAnyTypeField1TSWithoutSDA::setFieldProfile(const TimeHolder *th, const MEDCouplingFieldTemplate *field, const DataArray *arrOfVals, const MEDFileMesh *mesh, int meshDimRelToMax, const DataArrayIdType *profile, MEDFileFieldGlobsReal& glob, const MEDFileFieldNameScope& nasc, bool smartPflKiller)
 880 {
 881   if(!field)
 882     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::setFieldProfile : input field is null !");
 883   if(!arrOfVals || !arrOfVals->isAllocated())
 884     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::setFieldProfile : input array is null or not allocated !");
 885   TypeOfField type=field->getTypeOfField();
 886   std::vector<DataArrayIdType *> idsInPflPerType;
 887   std::vector<DataArrayIdType *> idsPerType;
 888   std::vector<mcIdType> code,code2;
 889   MCAuto<MEDCouplingMesh> m(mesh->getMeshAtLevel(meshDimRelToMax));
 890   if(type!=ON_NODES)
 891     {
 892       m->splitProfilePerType(profile,code,idsInPflPerType,idsPerType,smartPflKiller);
 893       std::vector< MCAuto<DataArrayIdType> > idsInPflPerType2(idsInPflPerType.size()); std::copy(idsInPflPerType.begin(),idsInPflPerType.end(),idsInPflPerType2.begin());
 894       std::vector< MCAuto<DataArrayIdType> > idsPerType2(idsPerType.size()); std::copy(idsPerType.begin(),idsPerType.end(),idsPerType2.begin());
 895       std::vector<const DataArrayIdType *> idsPerType3(idsPerType.size()); std::copy(idsPerType.begin(),idsPerType.end(),idsPerType3.begin());
 896       // start of check
 897       MCAuto<MEDCouplingFieldTemplate> field2=field->clone(false);
 898       mcIdType nbOfTuplesExp=field2->getNumberOfTuplesExpectedRegardingCode(code,idsPerType3);
 899       if(nbOfTuplesExp!=arrOfVals->getNumberOfTuples())
 900         {
 901           std::ostringstream oss; oss << "MEDFileAnyTypeField1TSWithoutSDA::setFieldProfile : The array is expected to have " << nbOfTuplesExp << " tuples ! It has " << arrOfVals->getNumberOfTuples() << " !";
 902           throw INTERP_KERNEL::Exception(oss.str());
 903         }
 904       // end of check
 905       mcIdType start(copyTinyInfoFrom(th,field,arrOfVals));
 906       code2=m->getDistributionOfTypes();
 907       //
 908       mcIdType pos=addNewEntryIfNecessary(m);
 909       _field_per_mesh[pos]->assignFieldProfile(start,profile,code,code2,idsInPflPerType,idsPerType,field,arrOfVals,m,glob,nasc);
 910     }
 911   else
 912     {
 913       if(!profile || !profile->isAllocated() || profile->getNumberOfComponents()!=1)
 914         throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::setFieldProfile : input profile is null, not allocated or with number of components != 1 !");
 915       std::vector<mcIdType> v(3); v[0]=-1; v[1]=profile->getNumberOfTuples(); v[2]=0;
 916       std::vector<const DataArrayIdType *> idsPerType3(1); idsPerType3[0]=profile;
 917       mcIdType nbOfTuplesExp=field->getNumberOfTuplesExpectedRegardingCode(v,idsPerType3);
 918       if(nbOfTuplesExp!=arrOfVals->getNumberOfTuples())
 919         {
 920           std::ostringstream oss; oss << "MEDFileAnyTypeField1TSWithoutSDA::setFieldProfile : For node field, the array is expected to have " << nbOfTuplesExp << " tuples ! It has " << arrOfVals->getNumberOfTuples() << " !";
 921           throw INTERP_KERNEL::Exception(oss.str());
 922         }
 923       mcIdType start(copyTinyInfoFrom(th,field,arrOfVals));
 924       mcIdType pos(addNewEntryIfNecessary(m));
 925       _field_per_mesh[pos]->assignNodeFieldProfile(start,profile,field,arrOfVals,glob,nasc);
 926     }
 927 }
 928
 929 /*!
 930  * \param [in] newNbOfTuples - The new nb of tuples to be allocated.
 931  */
 932 void MEDFileAnyTypeField1TSWithoutSDA::allocNotFromFile(mcIdType newNbOfTuples)
 933 {
 934   if(_nb_of_tuples_to_be_allocated>=0)
 935     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::allocNotFromFile : the object is expected to be appended to a data coming from a file but not loaded ! Load before appending data !");
 936   DataArray *arr(getOrCreateAndGetArray());
 937   arr->alloc(newNbOfTuples,arr->getNumberOfComponents());
 938   _nb_of_tuples_to_be_allocated=-3;
 939 }
 940
 941 /*!
 942  * Copies tiny info and allocates \a this->_arr instance of DataArrayDouble to
 943  * append data of a given MEDCouplingFieldDouble. So that the size of \a this->_arr becomes
 944  * larger by the size of \a field. Returns an id of the first not filled
 945  * tuple of \a this->_arr.
 946  *  \param [in] field - the field to copy the info on components and the name from.
 947  *  \return int - the id of first not initialized tuple of \a this->_arr.
 948  *  \throw If the name of \a field is empty.
 949  *  \throw If the data array of \a field is not set.
 950  *  \throw If \a this->_arr is already allocated but has different number of components
 951  *         than \a field.
 952  */
 953 mcIdType MEDFileAnyTypeField1TSWithoutSDA::copyTinyInfoFrom(const TimeHolder *th, const MEDCouplingFieldTemplate *field, const DataArray *arr)
 954 {
 955   if(!field)
 956     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::copyTinyInfoFrom : input field is NULL !");
 957   std::string name(field->getName());
 958   setName(name.c_str());
 959   if(field->getMesh())
 960     setMeshName(field->getMesh()->getName());
 961   setDtUnit(th->getTimeUnit());
 962   if(name.empty())
 963     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::copyTinyInfoFrom : unsupported fields with no name in MED file !");
 964   if(!arr)
 965     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::copyTinyInfoFrom : no array set !");
 966   if(!arr->isAllocated())
 967     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::copyTinyInfoFrom : array is not allocated !");
 968   _dt=th->getTime(_iteration,_order);
 969   getOrCreateAndGetArray()->setInfoAndChangeNbOfCompo(arr->getInfoOnComponents());
 970   if(!getOrCreateAndGetArray()->isAllocated())
 971     {
 972       allocNotFromFile(arr->getNumberOfTuples());
 973       return 0;
 974     }
 975   else
 976     {
 977       mcIdType oldNbOfTuples=getOrCreateAndGetArray()->getNumberOfTuples();
 978       mcIdType newNbOfTuples=oldNbOfTuples+arr->getNumberOfTuples();
 979       getOrCreateAndGetArray()->reAlloc(newNbOfTuples);
 980       _nb_of_tuples_to_be_allocated=-3;
 981       return oldNbOfTuples;
 982     }
 983 }
 984
 985 /*!
 986  * Returns number of components in \a this field
 987  *  \return int - the number of components.
 988  */
 989 std::size_t MEDFileAnyTypeField1TSWithoutSDA::getNumberOfComponents() const
 990 {
 991   return getOrCreateAndGetArray()->getNumberOfComponents();
 992 }
 993
 994 /*!
 995  * Change info on components in \a this.
 996  * \throw If size of \a infos is not equal to the number of components already in \a this.
 997  */
 998 void MEDFileAnyTypeField1TSWithoutSDA::setInfo(const std::vector<std::string>& infos)
 999 {
1000   DataArray *arr=getOrCreateAndGetArray();
1001   arr->setInfoOnComponents(infos);//will throw an exception if number of components mismatches
1002 }
1003
1004 /*!
1005  * Returns info on components of \a this field.
1006  *  \return const std::vector<std::string>& - a sequence of strings each being an
1007  *          information on _i_-th component.
1008  */
1009 const std::vector<std::string>& MEDFileAnyTypeField1TSWithoutSDA::getInfo() const
1010 {
1011   const DataArray *arr=getOrCreateAndGetArray();
1012   return arr->getInfoOnComponents();
1013 }
1014
1015 /*!
1016  * Returns a mutable info on components of \a this field.
1017  *  \return std::vector<std::string>& - a sequence of strings each being an
1018  *          information on _i_-th component.
1019  */
1020 std::vector<std::string>& MEDFileAnyTypeField1TSWithoutSDA::getInfo()
1021 {
1022   DataArray *arr=getOrCreateAndGetArray();
1023   return arr->getInfoOnComponents();
1024 }
1025
1026 bool MEDFileAnyTypeField1TSWithoutSDA::presenceOfMultiDiscPerGeoType() const
1027 {
1028   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
1029     {
1030       const MEDFileFieldPerMesh *fpm(*it);
1031       if(!fpm)
1032         continue;
1033       if(fpm->presenceOfMultiDiscPerGeoType())
1034         return true;
1035     }
1036   return false;
1037 }
1038
1039 bool MEDFileAnyTypeField1TSWithoutSDA::presenceOfStructureElements() const
1040 {
1041   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
1042     if((*it).isNotNull())
1043       if((*it)->presenceOfStructureElements())
1044         return true;
1045   return false;
1046 }
1047
1048 bool MEDFileAnyTypeField1TSWithoutSDA::onlyStructureElements() const
1049 {
1050   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
1051     if((*it).isNotNull())
1052       if(!(*it)->onlyStructureElements())
1053         return false;
1054   return true;
1055 }
1056
1057 void MEDFileAnyTypeField1TSWithoutSDA::killStructureElements()
1058 {
1059   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
1060     if((*it).isNotNull())
1061       (*it)->killStructureElements();
1062 }
1063
1064 void MEDFileAnyTypeField1TSWithoutSDA::keepOnlyStructureElements()
1065 {
1066   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
1067     if((*it).isNotNull())
1068       (*it)->keepOnlyStructureElements();
1069 }
1070
1071 void MEDFileAnyTypeField1TSWithoutSDA::keepOnlyOnSE(const std::string& seName)
1072 {
1073   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
1074     if((*it).isNotNull())
1075       (*it)->keepOnlyOnSE(seName);
1076 }
1077
1078 void MEDFileAnyTypeField1TSWithoutSDA::getMeshSENames(std::vector< std::pair<std::string,std::string> >& ps) const
1079 {
1080   for(std::vector< MCAuto< MEDFileFieldPerMesh > >::const_iterator it=_field_per_mesh.begin();it!=_field_per_mesh.end();it++)
1081     if((*it).isNotNull())
1082       (*it)->getMeshSENames(ps);
1083 }
1084
1085 MEDCouplingFieldDouble *MEDFileAnyTypeField1TSWithoutSDA::fieldOnMesh(const MEDFileFieldGlobsReal *glob, const MEDFileMesh *mesh, MCAuto<DataArray>& arrOut, const MEDFileFieldNameScope& nasc) const
1086 {
1087   static const char MSG0[]="MEDFileAnyTypeField1TSWithoutSDA::fieldOnMesh : the field is too complex to be able to be extracted with  \"field\" method ! Call getFieldOnMeshAtLevel method instead to deal with complexity !";
1088   if(_field_per_mesh.empty())
1089     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::fieldOnMesh : the field is empty ! Nothing to extract !");
1090   if(_field_per_mesh.size()>1)
1091     throw INTERP_KERNEL::Exception(MSG0);
1092   if(_field_per_mesh[0].isNull())
1093     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::fieldOnMesh : the field is inconsistent !");
1094   const MEDFileFieldPerMesh *pm(_field_per_mesh[0]);
1095   std::set<TypeOfField> types;
1096   pm->fillTypesOfFieldAvailable(types);
1097   if(types.size()!=1)
1098     throw INTERP_KERNEL::Exception(MSG0);
1099   TypeOfField type(*types.begin());
1100   int meshDimRelToMax(0);
1101   if(type==ON_NODES)
1102     meshDimRelToMax=0;
1103   else
1104     {
1105       int myDim(std::numeric_limits<int>::max());
1106       bool isUnique(pm->isUniqueLevel(myDim));
1107       if(!isUnique)
1108         throw INTERP_KERNEL::Exception(MSG0);
1109       meshDimRelToMax=myDim-mesh->getMeshDimension();
1110       if(meshDimRelToMax>0)
1111         throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::fieldOnMesh : the mesh attached to field is not compatible with the field !");
1112     }
1113   return MEDFileAnyTypeField1TSWithoutSDA::getFieldOnMeshAtLevel(type,meshDimRelToMax,0/*renumPol*/,glob,mesh,arrOut,nasc);
1114 }
1115
1116 /*!
1117  * Returns a new MEDCouplingFieldDouble of given type lying on a given support.
1118  *  \param [in] type - a spatial discretization of the new field.
1119  *  \param [in] meshDimRelToMax - a relative dimension of the supporting mesh entities.
1120  *  \param [in] mName - a name of the supporting mesh.
1121  *  \param [in] renumPol - specifies how to permute values of the result field according to
1122  *          the optional numbers of cells and nodes, if any. The valid values are
1123  *          - 0 - do not permute.
1124  *          - 1 - permute cells.
1125  *          - 2 - permute nodes.
1126  *          - 3 - permute cells and nodes.
1127  *
1128  *  \param [in] glob - the global data storing profiles and localization.
1129  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble. The
1130  *          caller is to delete this field using decrRef() as it is no more needed.
1131  *  \throw If the MED file is not readable.
1132  *  \throw If there is no mesh named \a mName in the MED file.
1133  *  \throw If there are no mesh entities of \a meshDimRelToMax dimension in the mesh.
1134  *  \throw If no field of \a this is lying on the mesh \a mName.
1135  *  \throw If no field values of the given \a type or given \a meshDimRelToMax are available.
1136  */
1137 MEDCouplingFieldDouble *MEDFileAnyTypeField1TSWithoutSDA::getFieldAtLevel(TypeOfField type, int meshDimRelToMax, const std::string& mName, int renumPol, const MEDFileFieldGlobsReal *glob, MCAuto<DataArray>& arrOut, const MEDFileFieldNameScope& nasc) const
1138 {
1139   MCAuto<MEDFileMesh> mm;
1140   if(mName.empty())
1141     mm=MEDFileMesh::New(glob->getFileName(),getMeshName().c_str(),getMeshIteration(),getMeshOrder());
1142   else
1143     mm=MEDFileMesh::New(glob->getFileName(),mName,getMeshIteration(),getMeshOrder());
1144   return MEDFileAnyTypeField1TSWithoutSDA::getFieldOnMeshAtLevel(type,meshDimRelToMax,renumPol,glob,mm,arrOut,nasc);
1145 }
1146
1147 /*!
1148  * Returns a new MEDCouplingFieldDouble of given type lying on a given support.
1149  *  \param [in] type - a spatial discretization of the new field.
1150  *  \param [in] meshDimRelToMax - a relative dimension of the supporting mesh entities.
1151  *  \param [in] renumPol - specifies how to permute values of the result field according to
1152  *          the optional numbers of cells and nodes, if any. The valid values are
1153  *          - 0 - do not permute.
1154  *          - 1 - permute cells.
1155  *          - 2 - permute nodes.
1156  *          - 3 - permute cells and nodes.
1157  *
1158  *  \param [in] glob - the global data storing profiles and localization.
1159  *  \param [in] mesh - the supporting mesh.
1160  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble. The
1161  *          caller is to delete this field using decrRef() as it is no more needed.
1162  *  \throw If the MED file is not readable.
1163  *  \throw If no field of \a this is lying on \a mesh.
1164  *  \throw If there are no mesh entities of \a meshDimRelToMax dimension in the mesh.
1165  *  \throw If no field values of the given \a type or given \a meshDimRelToMax are available.
1166  */
1167 MEDCouplingFieldDouble *MEDFileAnyTypeField1TSWithoutSDA::getFieldOnMeshAtLevel(TypeOfField type, int meshDimRelToMax, int renumPol, const MEDFileFieldGlobsReal *glob, const MEDFileMesh *mesh, MCAuto<DataArray>& arrOut, const MEDFileFieldNameScope& nasc) const
1168 {
1169   MCAuto<MEDCouplingMesh> m(mesh->getMeshAtLevel(meshDimRelToMax,false));
1170   const DataArrayIdType *d(mesh->getNumberFieldAtLevel(meshDimRelToMax)),*e(mesh->getNumberFieldAtLevel(1));
1171   if(meshDimRelToMax==1)
1172     (static_cast<MEDCouplingUMesh *>((MEDCouplingMesh *)m))->setMeshDimension(0);
1173   return MEDFileAnyTypeField1TSWithoutSDA::getFieldOnMeshAtLevel(type,renumPol,glob,m,d,e,arrOut,nasc);
1174 }
1175
1176 /*!
1177  * Returns a new MEDCouplingFieldDouble of a given type lying on the top level cells of a
1178  * given mesh.
1179  *  \param [in] type - a spatial discretization of the new field.
1180  *  \param [in] mName - a name of the supporting mesh.
1181  *  \param [in] renumPol - specifies how to permute values of the result field according to
1182  *          the optional numbers of cells and nodes, if any. The valid values are
1183  *          - 0 - do not permute.
1184  *          - 1 - permute cells.
1185  *          - 2 - permute nodes.
1186  *          - 3 - permute cells and nodes.
1187  *
1188  *  \param [in] glob - the global data storing profiles and localization.
1189  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble. The
1190  *          caller is to delete this field using decrRef() as it is no more needed.
1191  *  \throw If the MED file is not readable.
1192  *  \throw If there is no mesh named \a mName in the MED file.
1193  *  \throw If there are no mesh entities in the mesh.
1194  *  \throw If no field values of the given \a type are available.
1195  */
1196 MEDCouplingFieldDouble *MEDFileAnyTypeField1TSWithoutSDA::getFieldAtTopLevel(TypeOfField type, const std::string& mName, int renumPol, const MEDFileFieldGlobsReal *glob, MCAuto<DataArray>& arrOut, const MEDFileFieldNameScope& nasc) const
1197 {
1198   MCAuto<MEDFileMesh> mm;
1199   if(mName.empty())
1200     mm=MEDFileMesh::New(glob->getFileName(),getMeshName().c_str(),getMeshIteration(),getMeshOrder());
1201   else
1202     mm=MEDFileMesh::New(glob->getFileName(),mName,getMeshIteration(),getMeshOrder());
1203   int absDim=getDimension();
1204   int meshDimRelToMax=absDim-mm->getMeshDimension();
1205   return MEDFileAnyTypeField1TSWithoutSDA::getFieldOnMeshAtLevel(type,meshDimRelToMax,renumPol,glob,mm,arrOut,nasc);
1206 }
1207
1208 /*!
1209  * Returns a new MEDCouplingFieldDouble of given type lying on a given support.
1210  *  \param [in] type - a spatial discretization of the new field.
1211  *  \param [in] renumPol - specifies how to permute values of the result field according to
1212  *          the optional numbers of cells and nodes, if any. The valid values are
1213  *          - 0 - do not permute.
1214  *          - 1 - permute cells.
1215  *          - 2 - permute nodes.
1216  *          - 3 - permute cells and nodes.
1217  *
1218  *  \param [in] glob - the global data storing profiles and localization.
1219  *  \param [in] mesh - the supporting mesh.
1220  *  \param [in] cellRenum - the cell numbers array used for permutation of the result
1221  *         field according to \a renumPol.
1222  *  \param [in] nodeRenum - the node numbers array used for permutation of the result
1223  *         field according to \a renumPol.
1224  *  \return MEDCouplingFieldDouble * - a new instance of MEDCouplingFieldDouble. The
1225  *          caller is to delete this field using decrRef() as it is no more needed.
1226  *  \throw If there are no mesh entities of \a meshDimRelToMax dimension in the mesh.
1227  *  \throw If no field of \a this is lying on \a mesh.
1228  *  \throw If no field values of the given \a type or given \a meshDimRelToMax are available.
1229  */
1230 MEDCouplingFieldDouble *MEDFileAnyTypeField1TSWithoutSDA::getFieldOnMeshAtLevel(TypeOfField type, int renumPol, const MEDFileFieldGlobsReal *glob, const MEDCouplingMesh *mesh, const DataArrayIdType *cellRenum, const DataArrayIdType *nodeRenum, MCAuto<DataArray>& arrOut, const MEDFileFieldNameScope& nasc) const
1231 {
1232   static const char msg1[]="MEDFileField1TSWithoutSDA::getFieldOnMeshAtLevel : request for a renumbered field following mesh numbering whereas it is a profile field !";
1233   bool isPfl=false;
1234   MCAuto<MEDCouplingFieldDouble> ret=_field_per_mesh[0]->getFieldOnMeshAtLevel(type,glob,mesh,isPfl,arrOut,nasc);
1235   switch(renumPol)
1236   {
1237     case 0:
1238       {
1239         //no need to test _field_per_mesh.empty() because geMeshName has already done it
1240         return ret.retn();
1241       }
1242     case 3:
1243     case 1:
1244       {
1245         if(isPfl)
1246           throw INTERP_KERNEL::Exception(msg1);
1247         //no need to test _field_per_mesh.empty() because geMeshName has already done it
1248         if(cellRenum)
1249           {
1250             if((int)cellRenum->getNbOfElems()!=mesh->getNumberOfCells())
1251               {
1252                 std::ostringstream oss; oss << "MEDFileField1TSWithoutSDA::getFieldOnMeshAtLevel : Request of simple renumbering but it seems that underlying mesh \"" << mesh->getName() << "\" of requested field ";
1253                 oss << "\"" << getName() << "\" has partial renumbering (some geotype has no renumber) !";
1254                 throw INTERP_KERNEL::Exception(oss.str());
1255               }
1256             MEDCouplingFieldDiscretization *disc=ret->getDiscretization();
1257             if(!disc) throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TSWithoutSDA::getFieldOnMeshAtLevel : internal error, no discretization on field !");
1258             std::vector<DataArray *> arrOut2(1,arrOut);
1259             // 2 following lines replace ret->renumberCells(cellRenum->getConstPointer()) if not DataArrayDouble
1260             disc->renumberArraysForCell(ret->getMesh(),arrOut2,cellRenum->getConstPointer(),true);
1261             (const_cast<MEDCouplingMesh*>(ret->getMesh()))->renumberCells(cellRenum->getConstPointer(),true);
1262           }
1263         if(renumPol==1)
1264           return ret.retn();
1265       }
1266       [[clang::fallthrough]];  // yes no break here - silence clang warning.
1267     case 2:
1268       {
1269         //no need to test _field_per_mesh.empty() because geMeshName has already done it
1270         if(isPfl)
1271           throw INTERP_KERNEL::Exception(msg1);
1272         if(nodeRenum)
1273           {
1274             if((int)nodeRenum->getNbOfElems()!=mesh->getNumberOfNodes())
1275               {
1276                 std::ostringstream oss; oss << "MEDFileField1TSWithoutSDA::getFieldOnMeshAtLevel : Request of simple renumbering but it seems that underlying mesh \"" << mesh->getName() << "\" of requested field ";
1277                 oss << "\"" << nasc.getName() << "\" not defined on all nodes !";
1278                 throw INTERP_KERNEL::Exception(oss.str());
1279               }
1280             MCAuto<DataArrayIdType> nodeRenumSafe=nodeRenum->checkAndPreparePermutation();
1281             if(!dynamic_cast<DataArrayDouble *>((DataArray *)arrOut))
1282               throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getFieldOnMeshAtLevel : node renumbering not implemented for not double DataArrays !");
1283             ret->renumberNodes(nodeRenumSafe->getConstPointer());
1284           }
1285         return ret.retn();
1286       }
1287       break;
1288     default:
1289       throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getFieldOnMeshAtLevel : unsupported renum policy ! Dealing with policy 0 1 2 and 3 !");
1290   }
1291   return nullptr;
1292 }
1293
1294 /*!
1295  * Returns values and a profile of the field of a given type lying on a given support.
1296  *  \param [in] type - a spatial discretization of the field.
1297  *  \param [in] meshDimRelToMax - a relative dimension of the supporting mesh entities.
1298  *  \param [in] mesh - the supporting mesh.
1299  *  \param [out] pfl - a new instance of DataArrayIdType holding ids of mesh entities the
1300  *          field of interest lies on. If the field lies on all entities of the given
1301  *          dimension, all ids in \a pfl are zero. The caller is to delete this array
1302  *          using decrRef() as it is no more needed.
1303  *  \param [in] glob - the global data storing profiles and localization.
1304  *  \return DataArrayDouble * - a new instance of DataArrayDouble holding values of the
1305  *          field. The caller is to delete this array using decrRef() as it is no more needed.
1306  *  \throw If there are no mesh entities of \a meshDimRelToMax dimension in \a mesh.
1307  *  \throw If no field of \a this is lying on \a mesh.
1308  *  \throw If no field values of the given \a type are available.
1309  */
1310 DataArray *MEDFileAnyTypeField1TSWithoutSDA::getFieldWithProfile(TypeOfField type, int meshDimRelToMax, const MEDFileMesh *mesh, DataArrayIdType *&pfl, const MEDFileFieldGlobsReal *glob, const MEDFileFieldNameScope& nasc) const
1311 {
1312   MCAuto<MEDCouplingMesh> m(mesh->getMeshAtLevel(meshDimRelToMax));
1313   MCAuto<DataArray> ret=_field_per_mesh[0]->getFieldOnMeshAtLevelWithPfl(type,m,pfl,glob,nasc);
1314   ret->setName(nasc.getName().c_str());
1315   return ret.retn();
1316 }
1317
1318 //= MEDFileField1TSWithoutSDA
1319
1320 /*!
1321  * Throws if a given value is not a valid (non-extended) relative dimension.
1322  *  \param [in] meshDimRelToMax - the relative dimension value.
1323  *  \throw If \a meshDimRelToMax > 0.
1324  */
1325 void MEDFileField1TSWithoutSDA::CheckMeshDimRel(int meshDimRelToMax)
1326 {
1327   if(meshDimRelToMax>0)
1328     throw INTERP_KERNEL::Exception("CheckMeshDimRel : This is a meshDimRel not a meshDimRelExt ! So value should be <=0 !");
1329 }
1330
1331 /*!
1332  * Checks if elements of a given mesh are in the order suitable for writing
1333  * to the MED file. If this is not so, an exception is thrown. In a case of success, returns a
1334  * vector describing types of elements and their number.
1335  *  \param [in] mesh - the mesh to check.
1336  *  \return std::vector<int> - a vector holding for each element type (1) item of
1337  *          INTERP_KERNEL::NormalizedCellType, (2) number of elements, (3) -1.
1338  *          These values are in full-interlace mode.
1339  *  \throw If elements in \a mesh are not in the order suitable for writing to the MED file.
1340  */
1341 std::vector<mcIdType> MEDFileField1TSWithoutSDA::CheckSBTMesh(const MEDCouplingMesh *mesh)
1342 {
1343   if(!mesh)
1344     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::CheckSBTMesh : input mesh is NULL !");
1345   std::set<INTERP_KERNEL::NormalizedCellType> geoTypes=mesh->getAllGeoTypes();
1346   std::size_t nbOfTypes=geoTypes.size();
1347   std::vector<mcIdType> code(3*nbOfTypes);
1348   MCAuto<DataArrayIdType> arr1=DataArrayIdType::New();
1349   arr1->alloc(nbOfTypes,1);
1350   mcIdType *arrPtr=arr1->getPointer();
1351   std::set<INTERP_KERNEL::NormalizedCellType>::const_iterator it=geoTypes.begin();
1352   for(std::size_t i=0;i<nbOfTypes;i++,it++)
1353     arrPtr[i]=ToIdType(std::distance(typmai2,std::find(typmai2,typmai2+MED_N_CELL_FIXED_GEO,*it)));
1354   MCAuto<DataArrayIdType> arr2=arr1->checkAndPreparePermutation();
1355   const mcIdType *arrPtr2=arr2->getConstPointer();
1356   int i=0;
1357   for(it=geoTypes.begin();it!=geoTypes.end();it++,i++)
1358     {
1359       mcIdType pos=arrPtr2[i];
1360       mcIdType nbCells=mesh->getNumberOfCellsWithType(*it);
1361       code[3*pos]=(mcIdType)(*it);
1362       code[3*pos+1]=nbCells;
1363       code[3*pos+2]=-1;//no profiles
1364     }
1365   std::vector<const DataArrayIdType *> idsPerType;//no profiles
1366   DataArrayIdType *da=mesh->checkTypeConsistencyAndContig(code,idsPerType);
1367   if(da)
1368     {
1369       da->decrRef();
1370       throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::CheckSBTMesh : underlying mesh is not sorted by type as MED file expects !");
1371     }
1372   return code;
1373 }
1374
1375 MEDFileField1TSWithoutSDA *MEDFileField1TSWithoutSDA::New(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order, const std::vector<std::string>& infos)
1376 {
1377   return new MEDFileField1TSWithoutSDA(fieldName,meshName,csit,iteration,order,infos);
1378 }
1379
1380 /*!
1381  * Returns all attributes and values of parts of \a this field lying on a given mesh.
1382  * Each part differs from other ones by a type of supporting mesh entity. The _i_-th
1383  * item of every of returned sequences refers to the _i_-th part of \a this field.
1384  * Thus all sequences returned by this method are of the same length equal to number
1385  * of different types of supporting entities.<br>
1386  * A field part can include sub-parts with several different spatial discretizations,
1387  * \ref MEDCoupling::ON_CELLS "ON_CELLS" and \ref MEDCoupling::ON_GAUSS_PT "ON_GAUSS_PT"
1388  * for example. Hence, some of the returned sequences contains nested sequences, and an item
1389  * of a nested sequence corresponds to a type of spatial discretization.<br>
1390  * This method allows for iteration over MEDFile DataStructure with a reduced overhead.
1391  * The overhead is due to selecting values into new instances of DataArrayDouble.
1392  *  \param [in] mname - a name of a mesh of interest. It can be \c NULL, which is valid
1393  *          for the case with only one underlying mesh. (Actually, the number of meshes is
1394  *          not checked if \a mname == \c NULL).
1395  *  \param [in,out] types - a sequence of types of underlying mesh entities. A type per
1396  *          a field part is returned.
1397  *  \param [in,out] typesF - a sequence of sequences of types of spatial discretizations.
1398  *          A field part can include sub-parts with several different spatial discretizations,
1399  *          \ref MEDCoupling::ON_CELLS "ON_CELLS" and
1400  *          \ref MEDCoupling::ON_GAUSS_PT "ON_GAUSS_PT" for example.
1401  *          This sequence is of the same length as \a types.
1402  *  \param [in,out] pfls - a sequence returning a profile name per each type of spatial
1403  *          discretization. A profile name can be empty.
1404  *          Length of this and of nested sequences is the same as that of \a typesF.
1405  *  \param [in,out] locs - a sequence returning a localization name per each type of spatial
1406  *          discretization. A localization name can be empty.
1407  *          Length of this and of nested sequences is the same as that of \a typesF.
1408  *  \return std::vector< std::vector<DataArrayDouble *> > - a sequence holding arrays of values
1409  *          per each type of spatial discretization within one mesh entity type.
1410  *          The caller is to delete each DataArrayDouble using decrRef() as it is no more needed.
1411  *          Length of this and of nested sequences is the same as that of \a typesF.
1412  *  \throw If no field is lying on \a mname.
1413  */
1414 std::vector< std::vector<DataArrayDouble *> > MEDFileField1TSWithoutSDA::getFieldSplitedByType2(const std::string& mname, std::vector<INTERP_KERNEL::NormalizedCellType>& types, std::vector< std::vector<TypeOfField> >& typesF, std::vector< std::vector<std::string> >& pfls, std::vector< std::vector<std::string> >& locs) const
1415 {
1416   if(mname.empty())
1417     if(_field_per_mesh.empty())
1418       throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getFieldSplitedByType : This is empty !");
1419   std::vector< std::vector< std::pair<mcIdType,mcIdType> > > ret0=_field_per_mesh[0]->getFieldSplitedByType(types,typesF,pfls,locs);
1420   std::size_t nbOfRet=ret0.size();
1421   std::vector< std::vector<DataArrayDouble *> > ret(nbOfRet);
1422   for(std::size_t i=0;i<nbOfRet;i++)
1423     {
1424       const std::vector< std::pair<mcIdType,mcIdType> >& p=ret0[i];
1425       std::size_t nbOfRet1=p.size();
1426       ret[i].resize(nbOfRet1);
1427       for(std::size_t j=0;j<nbOfRet1;j++)
1428         {
1429           DataArrayDouble *tmp=_arr->selectByTupleIdSafeSlice(p[j].first,p[j].second,1);
1430           ret[i][j]=tmp;
1431         }
1432     }
1433   return ret;
1434 }
1435
1436 const char *MEDFileField1TSWithoutSDA::getTypeStr() const
1437 {
1438   return TYPE_STR;
1439 }
1440
1441 MEDFileInt32Field1TSWithoutSDA *MEDFileField1TSWithoutSDA::convertToInt() const
1442 {
1443   MCAuto<MEDFileInt32Field1TSWithoutSDA> ret(new MEDFileInt32Field1TSWithoutSDA);
1444   ret->MEDFileAnyTypeField1TSWithoutSDA::operator =(*this);
1445   ret->deepCpyLeavesFrom(*this);
1446   const DataArrayDouble *arr(_arr);
1447   if(arr)
1448     {
1449       MCAuto<DataArrayInt> arr2(arr->convertToIntArr());
1450       ret->setArray(arr2);
1451     }
1452   return ret.retn();
1453 }
1454
1455 /*!
1456  * Returns a pointer to the underground DataArrayDouble instance and a
1457  * sequence describing parameters of a support of each part of \a this field. The
1458  * caller should not decrRef() the returned DataArrayDouble. This method allows for a
1459  * direct access to the field values. This method is intended for the field lying on one
1460  * mesh only.
1461  *  \param [in,out] entries - the sequence describing parameters of a support of each
1462  *         part of \a this field. Each item of this sequence consists of two parts. The
1463  *         first part describes a type of mesh entity and an id of discretization of a
1464  *         current field part. The second part describes a range of values [begin,end)
1465  *         within the returned array relating to the current field part.
1466  *  \return DataArrayDouble * - the pointer to the field values array.
1467  *  \throw If the number of underlying meshes is not equal to 1.
1468  *  \throw If no field values are available.
1469  *  \sa getUndergroundDataArray()
1470  */
1471 DataArray *MEDFileField1TSWithoutSDA::getUndergroundDataArrayExt(std::vector< std::pair<std::pair<INTERP_KERNEL::NormalizedCellType,int>,std::pair<mcIdType,mcIdType> > >& entries) const
1472 {
1473   return getUndergroundDataArrayTemplateExt(entries);
1474 }
1475
1476 MEDFileField1TSWithoutSDA::MEDFileField1TSWithoutSDA(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order, const std::vector<std::string>& infos):MEDFileField1TSTemplateWithoutSDA<double>(fieldName,meshName,csit,iteration,order)
1477 {
1478   DataArrayDouble *arr(getOrCreateAndGetArrayTemplate());
1479   arr->setInfoAndChangeNbOfCompo(infos);
1480 }
1481
1482 MEDFileField1TSWithoutSDA::MEDFileField1TSWithoutSDA():MEDFileField1TSTemplateWithoutSDA<double>()
1483 {
1484 }
1485
1486 MEDFileField1TSWithoutSDA *MEDFileField1TSWithoutSDA::shallowCpy() const
1487 {
1488   MCAuto<MEDFileField1TSWithoutSDA> ret(new MEDFileField1TSWithoutSDA(*this));
1489   ret->deepCpyLeavesFrom(*this);
1490   return ret.retn();
1491 }
1492
1493 MEDFileField1TSWithoutSDA *MEDFileField1TSWithoutSDA::deepCopy() const
1494 {
1495   MCAuto<MEDFileField1TSWithoutSDA> ret(shallowCpy());
1496   if(_arr.isNotNull())
1497     ret->_arr=_arr->deepCopy();
1498   return ret.retn();
1499 }
1500
1501 //= MEDFileInt32Field1TSWithoutSDA
1502
1503 MEDFileInt32Field1TSWithoutSDA *MEDFileInt32Field1TSWithoutSDA::New(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order, const std::vector<std::string>& infos)
1504 {
1505   return new MEDFileInt32Field1TSWithoutSDA(fieldName,meshName,csit,iteration,order,infos);
1506 }
1507
1508 MEDFileInt32Field1TSWithoutSDA::MEDFileInt32Field1TSWithoutSDA()
1509 {
1510 }
1511
1512 MEDFileInt32Field1TSWithoutSDA::MEDFileInt32Field1TSWithoutSDA(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order,
1513                                                            const std::vector<std::string>& infos):MEDFileField1TSNDTemplateWithoutSDA<int>(fieldName,meshName,csit,iteration,order,infos)
1514 {
1515   DataArrayInt32 *arr(getOrCreateAndGetArrayTemplate());
1516   arr->setInfoAndChangeNbOfCompo(infos);
1517 }
1518
1519 const char *MEDFileInt32Field1TSWithoutSDA::getTypeStr() const
1520 {
1521   return TYPE_STR;
1522 }
1523
1524 /*!
1525  * Returns a pointer to the underground DataArrayIdType instance and a
1526  * sequence describing parameters of a support of each part of \a this field. The
1527  * caller should not decrRef() the returned DataArrayIdType. This method allows for a
1528  * direct access to the field values. This method is intended for the field lying on one
1529  * mesh only.
1530  *  \param [in,out] entries - the sequence describing parameters of a support of each
1531  *         part of \a this field. Each item of this sequence consists of two parts. The
1532  *         first part describes a type of mesh entity and an id of discretization of a
1533  *         current field part. The second part describes a range of values [begin,end)
1534  *         within the returned array relating to the current field part.
1535  *  \return DataArrayIdType * - the pointer to the field values array.
1536  *  \throw If the number of underlying meshes is not equal to 1.
1537  *  \throw If no field values are available.
1538  *  \sa getUndergroundDataArray()
1539  */
1540 DataArray *MEDFileInt32Field1TSWithoutSDA::getUndergroundDataArrayExt(std::vector< std::pair<std::pair<INTERP_KERNEL::NormalizedCellType,int>,std::pair<mcIdType,mcIdType> > >& entries) const
1541 {
1542   return getUndergroundDataArrayIntExt(entries);
1543 }
1544
1545 /*!
1546  * Returns a pointer to the underground DataArrayInt instance and a
1547  * sequence describing parameters of a support of each part of \a this field. The
1548  * caller should not decrRef() the returned DataArrayIdType. This method allows for a
1549  * direct access to the field values. This method is intended for the field lying on one
1550  * mesh only.
1551  *  \param [in,out] entries - the sequence describing parameters of a support of each
1552  *         part of \a this field. Each item of this sequence consists of two parts. The
1553  *         first part describes a type of mesh entity and an id of discretization of a
1554  *         current field part. The second part describes a range of values [begin,end)
1555  *         within the returned array relating to the current field part.
1556  *  \return DataArrayInt * - the pointer to the field values array.
1557  *  \throw If the number of underlying meshes is not equal to 1.
1558  *  \throw If no field values are available.
1559  *  \sa getUndergroundDataArray()
1560  */
1561 DataArrayInt32 *MEDFileInt32Field1TSWithoutSDA::getUndergroundDataArrayIntExt(std::vector< std::pair<std::pair<INTERP_KERNEL::NormalizedCellType,int>,std::pair<mcIdType,mcIdType> > >& entries) const
1562 {
1563   if(_field_per_mesh.size()!=1)
1564     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getUndergroundDataArrayExt : field lies on several meshes, this method has no sense !");
1565   if(_field_per_mesh[0]==0)
1566     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getUndergroundDataArrayExt : no field specified !");
1567   _field_per_mesh[0]->getUndergroundDataArrayExt(entries);
1568   return getUndergroundDataArrayTemplate();
1569 }
1570
1571 MEDFileInt32Field1TSWithoutSDA *MEDFileInt32Field1TSWithoutSDA::shallowCpy() const
1572 {
1573   MCAuto<MEDFileInt32Field1TSWithoutSDA> ret(new MEDFileInt32Field1TSWithoutSDA(*this));
1574   ret->deepCpyLeavesFrom(*this);
1575   return ret.retn();
1576 }
1577
1578 MEDFileInt32Field1TSWithoutSDA *MEDFileInt32Field1TSWithoutSDA::deepCopy() const
1579 {
1580   MCAuto<MEDFileInt32Field1TSWithoutSDA> ret(shallowCpy());
1581   if(_arr.isNotNull())
1582     ret->_arr=_arr->deepCopy();
1583   return ret.retn();
1584 }
1585
1586 //= MEDFileInt64Field1TSWithoutSDA
1587
1588 MEDFileInt64Field1TSWithoutSDA *MEDFileInt64Field1TSWithoutSDA::New(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order, const std::vector<std::string>& infos)
1589 {
1590   return new MEDFileInt64Field1TSWithoutSDA(fieldName,meshName,csit,iteration,order,infos);
1591 }
1592
1593 MEDFileInt64Field1TSWithoutSDA::MEDFileInt64Field1TSWithoutSDA()
1594 {
1595 }
1596
1597 MEDFileInt64Field1TSWithoutSDA::MEDFileInt64Field1TSWithoutSDA(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order,
1598                                                            const std::vector<std::string>& infos):MEDFileField1TSNDTemplateWithoutSDA<Int64>(fieldName,meshName,csit,iteration,order,infos)
1599 {
1600   DataArrayInt64 *arr(getOrCreateAndGetArrayTemplate());
1601   arr->setInfoAndChangeNbOfCompo(infos);
1602 }
1603
1604 const char *MEDFileInt64Field1TSWithoutSDA::getTypeStr() const
1605 {
1606   return TYPE_STR;
1607 }
1608
1609 /*!
1610  * Returns a pointer to the underground DataArrayIdType instance and a
1611  * sequence describing parameters of a support of each part of \a this field. The
1612  * caller should not decrRef() the returned DataArrayIdType. This method allows for a
1613  * direct access to the field values. This method is intended for the field lying on one
1614  * mesh only.
1615  *  \param [in,out] entries - the sequence describing parameters of a support of each
1616  *         part of \a this field. Each item of this sequence consists of two parts. The
1617  *         first part describes a type of mesh entity and an id of discretization of a
1618  *         current field part. The second part describes a range of values [begin,end)
1619  *         within the returned array relating to the current field part.
1620  *  \return DataArrayIdType * - the pointer to the field values array.
1621  *  \throw If the number of underlying meshes is not equal to 1.
1622  *  \throw If no field values are available.
1623  *  \sa getUndergroundDataArray()
1624  */
1625 DataArray *MEDFileInt64Field1TSWithoutSDA::getUndergroundDataArrayExt(std::vector< std::pair<std::pair<INTERP_KERNEL::NormalizedCellType,int>,std::pair<mcIdType,mcIdType> > >& entries) const
1626 {
1627   return getUndergroundDataArrayIntExt(entries);
1628 }
1629
1630 /*!
1631  * Returns a pointer to the underground DataArrayInt instance and a
1632  * sequence describing parameters of a support of each part of \a this field. The
1633  * caller should not decrRef() the returned DataArrayIdType. This method allows for a
1634  * direct access to the field values. This method is intended for the field lying on one
1635  * mesh only.
1636  *  \param [in,out] entries - the sequence describing parameters of a support of each
1637  *         part of \a this field. Each item of this sequence consists of two parts. The
1638  *         first part describes a type of mesh entity and an id of discretization of a
1639  *         current field part. The second part describes a range of values [begin,end)
1640  *         within the returned array relating to the current field part.
1641  *  \return DataArrayInt * - the pointer to the field values array.
1642  *  \throw If the number of underlying meshes is not equal to 1.
1643  *  \throw If no field values are available.
1644  *  \sa getUndergroundDataArray()
1645  */
1646 DataArrayInt64 *MEDFileInt64Field1TSWithoutSDA::getUndergroundDataArrayIntExt(std::vector< std::pair<std::pair<INTERP_KERNEL::NormalizedCellType,int>,std::pair<mcIdType,mcIdType> > >& entries) const
1647 {
1648   if(_field_per_mesh.size()!=1)
1649     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getUndergroundDataArrayExt : field lies on several meshes, this method has no sense !");
1650   if(_field_per_mesh[0]==0)
1651     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getUndergroundDataArrayExt : no field specified !");
1652   _field_per_mesh[0]->getUndergroundDataArrayExt(entries);
1653   return getUndergroundDataArrayTemplate();
1654 }
1655
1656 MEDFileInt64Field1TSWithoutSDA *MEDFileInt64Field1TSWithoutSDA::shallowCpy() const
1657 {
1658   MCAuto<MEDFileInt64Field1TSWithoutSDA> ret(new MEDFileInt64Field1TSWithoutSDA(*this));
1659   ret->deepCpyLeavesFrom(*this);
1660   return ret.retn();
1661 }
1662
1663 MEDFileInt64Field1TSWithoutSDA *MEDFileInt64Field1TSWithoutSDA::deepCopy() const
1664 {
1665   MCAuto<MEDFileInt64Field1TSWithoutSDA> ret(shallowCpy());
1666   if(_arr.isNotNull())
1667     ret->_arr=_arr->deepCopy();
1668   return ret.retn();
1669 }
1670
1671 //= MEDFileFloatField1TSWithoutSDA
1672
1673 MEDFileFloatField1TSWithoutSDA *MEDFileFloatField1TSWithoutSDA::New(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order, const std::vector<std::string>& infos)
1674 {
1675   return new MEDFileFloatField1TSWithoutSDA(fieldName,meshName,csit,iteration,order,infos);
1676 }
1677
1678 MEDFileFloatField1TSWithoutSDA::MEDFileFloatField1TSWithoutSDA()
1679 {
1680 }
1681
1682 MEDFileFloatField1TSWithoutSDA::MEDFileFloatField1TSWithoutSDA(const std::string& fieldName, const std::string& meshName, int csit, int iteration, int order,
1683                                                                const std::vector<std::string>& infos):MEDFileField1TSNDTemplateWithoutSDA<float>(fieldName,meshName,csit,iteration,order,infos)
1684 {
1685   DataArrayFloat *arr(getOrCreateAndGetArrayTemplate());
1686   arr->setInfoAndChangeNbOfCompo(infos);
1687 }
1688
1689 const char *MEDFileFloatField1TSWithoutSDA::getTypeStr() const
1690 {
1691   return TYPE_STR;
1692 }
1693
1694 /*!
1695  * Returns a pointer to the underground DataArrayFloat instance and a
1696  * sequence describing parameters of a support of each part of \a this field. The
1697  * caller should not decrRef() the returned DataArrayFloat. This method allows for a
1698  * direct access to the field values. This method is intended for the field lying on one
1699  * mesh only.
1700  *  \param [in,out] entries - the sequence describing parameters of a support of each
1701  *         part of \a this field. Each item of this sequence consists of two parts. The
1702  *         first part describes a type of mesh entity and an id of discretization of a
1703  *         current field part. The second part describes a range of values [begin,end)
1704  *         within the returned array relating to the current field part.
1705  *  \return DataArrayFloat * - the pointer to the field values array.
1706  *  \throw If the number of underlying meshes is not equal to 1.
1707  *  \throw If no field values are available.
1708  *  \sa getUndergroundDataArray()
1709  */
1710 DataArray *MEDFileFloatField1TSWithoutSDA::getUndergroundDataArrayExt(std::vector< std::pair<std::pair<INTERP_KERNEL::NormalizedCellType,int>,std::pair<mcIdType,mcIdType> > >& entries) const
1711 {
1712   return getUndergroundDataArrayFloatExt(entries);
1713 }
1714
1715 /*!
1716  * Returns a pointer to the underground DataArrayFloat instance and a
1717  * sequence describing parameters of a support of each part of \a this field. The
1718  * caller should not decrRef() the returned DataArrayFloat. This method allows for a
1719  * direct access to the field values. This method is intended for the field lying on one
1720  * mesh only.
1721  *  \param [in,out] entries - the sequence describing parameters of a support of each
1722  *         part of \a this field. Each item of this sequence consists of two parts. The
1723  *         first part describes a type of mesh entity and an id of discretization of a
1724  *         current field part. The second part describes a range of values [begin,end)
1725  *         within the returned array relating to the current field part.
1726  *  \return DataArrayFloat * - the pointer to the field values array.
1727  *  \throw If the number of underlying meshes is not equal to 1.
1728  *  \throw If no field values are available.
1729  *  \sa getUndergroundDataArray()
1730  */
1731 DataArrayFloat *MEDFileFloatField1TSWithoutSDA::getUndergroundDataArrayFloatExt(std::vector< std::pair<std::pair<INTERP_KERNEL::NormalizedCellType,int>,std::pair<mcIdType,mcIdType> > >& entries) const
1732 {
1733   if(_field_per_mesh.size()!=1)
1734     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getUndergroundDataArrayExt : field lies on several meshes, this method has no sense !");
1735   if(_field_per_mesh[0]==0)
1736     throw INTERP_KERNEL::Exception("MEDFileField1TSWithoutSDA::getUndergroundDataArrayExt : no field specified !");
1737   _field_per_mesh[0]->getUndergroundDataArrayExt(entries);
1738   return getUndergroundDataArrayTemplate();
1739 }
1740
1741 MEDFileFloatField1TSWithoutSDA *MEDFileFloatField1TSWithoutSDA::shallowCpy() const
1742 {
1743   MCAuto<MEDFileFloatField1TSWithoutSDA> ret(new MEDFileFloatField1TSWithoutSDA(*this));
1744   ret->deepCpyLeavesFrom(*this);
1745   return ret.retn();
1746 }
1747
1748 MEDFileFloatField1TSWithoutSDA *MEDFileFloatField1TSWithoutSDA::deepCopy() const
1749 {
1750   MCAuto<MEDFileFloatField1TSWithoutSDA> ret(shallowCpy());
1751   if(_arr.isNotNull())
1752     ret->_arr=_arr->deepCopy();
1753   return ret.retn();
1754 }
1755
1756 //= MEDFileAnyTypeField1TS
1757
1758 MEDFileAnyTypeField1TS::MEDFileAnyTypeField1TS()
1759 {
1760 }
1761
1762 MEDFileAnyTypeField1TSWithoutSDA *MEDFileAnyTypeField1TS::BuildContentFrom(med_idt fid, bool loadAll, const MEDFileMeshes *ms, const MEDFileEntities *entities)
1763 {
1764   med_field_type typcha;
1765   //
1766   std::vector<std::string> infos;
1767   std::string dtunit,fieldName,meshName;
1768   LocateField2(fid,0,true,fieldName,typcha,infos,dtunit,meshName);
1769   MCAuto<MEDFileAnyTypeField1TSWithoutSDA> ret;
1770   switch(typcha)
1771   {
1772     case MED_FLOAT64:
1773       {
1774         ret=MEDFileField1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1775         break;
1776       }
1777     case MED_INT32:
1778       {
1779         ret=MEDFileInt32Field1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1780         break;
1781       }
1782     case MED_INT64:
1783       {
1784         ret=MEDFileInt64Field1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1785         break;
1786       }
1787     case MED_FLOAT32:
1788       {
1789         ret=MEDFileFloatField1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1790         break;
1791       }
1792     case MED_INT:
1793       {
1794         if(sizeof(med_int)==sizeof(int))
1795           {
1796             ret=MEDFileInt32Field1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1797             break;
1798           }
1799       }
1800     default:
1801       {
1802         std::ostringstream oss; oss << "MEDFileAnyTypeField1TS::BuildContentFrom(fid) : file \'" << FileNameFromFID(fid) << "\' contains field with name \'" << fieldName << "\' but the type of the first field is not in [MED_FLOAT64, MED_FLOAT32, MED_INT32, MED_INT64] !";
1803         throw INTERP_KERNEL::Exception(oss.str());
1804       }
1805   }
1806   ret->setDtUnit(dtunit.c_str());
1807   ret->getOrCreateAndGetArray()->setInfoAndChangeNbOfCompo(infos);
1808   //
1809   med_int numdt,numit;
1810   med_float dt;
1811   MEDFILESAFECALLERRD0(MEDfieldComputingStepInfo,(fid,fieldName.c_str(),1,&numdt,&numit,&dt));
1812   ret->setTime(FromMedInt<int>(numdt),FromMedInt<int>(numit),dt);
1813   ret->_csit=1;
1814   if(loadAll)
1815     ret->loadStructureAndBigArraysRecursively(fid,*((const MEDFileAnyTypeField1TSWithoutSDA*)ret),ms,entities);
1816   else
1817     ret->loadOnlyStructureOfDataRecursively(fid,*((const MEDFileAnyTypeField1TSWithoutSDA*)ret),ms,entities);
1818   return ret.retn();
1819 }
1820
1821 MEDFileAnyTypeField1TS::MEDFileAnyTypeField1TS(med_idt fid, bool loadAll, const MEDFileMeshes *ms, const MEDFileEntities *entities)
1822 try:MEDFileFieldGlobsReal(fid)
1823 {
1824   _content=BuildContentFrom(fid,loadAll,ms,entities);
1825   loadGlobals(fid);
1826 }
1827 catch(INTERP_KERNEL::Exception& e)
1828 {
1829     throw e;
1830 }
1831
1832 MEDFileAnyTypeField1TSWithoutSDA *MEDFileAnyTypeField1TS::BuildContentFrom(med_idt fid, const std::string& fieldName, bool loadAll, const MEDFileMeshes *ms, const MEDFileEntities *entities)
1833 {
1834   med_field_type typcha;
1835   std::vector<std::string> infos;
1836   std::string dtunit,meshName;
1837   int nbSteps(0);
1838   {
1839     int iii=-1;
1840     nbSteps=LocateField(fid,fieldName,iii,typcha,infos,dtunit,meshName);
1841   }
1842   MCAuto<MEDFileAnyTypeField1TSWithoutSDA> ret;
1843   switch(typcha)
1844   {
1845     case MED_FLOAT64:
1846       {
1847         ret=MEDFileField1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1848         break;
1849       }
1850     case MED_INT32:
1851       {
1852         ret=MEDFileInt32Field1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1853         break;
1854       }
1855     case MED_INT64:
1856       {
1857         ret=MEDFileInt64Field1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1858         break;
1859       }
1860     case MED_FLOAT32:
1861       {
1862         ret=MEDFileFloatField1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1863         break;
1864       }
1865     case MED_INT:
1866       {
1867         if(sizeof(med_int)==sizeof(int))
1868           {
1869             ret=MEDFileInt32Field1TSWithoutSDA::New(fieldName,meshName,-1,-1/*iteration*/,-1/*order*/,std::vector<std::string>());
1870             break;
1871           }
1872       }
1873     default:
1874       {
1875         std::ostringstream oss; oss << "MEDFileAnyTypeField1TS::BuildContentFrom(fid,fieldName) : file \'" << FileNameFromFID(fid) << "\' contains field with name \'" << fieldName << "\' but the type of field is not in [MED_FLOAT64, MED_INT32, MED_FLOAT32, MED_INT64] !";
1876         throw INTERP_KERNEL::Exception(oss.str());
1877       }
1878   }
1879   ret->setMeshName(meshName);
1880   ret->setDtUnit(dtunit.c_str());
1881   ret->getOrCreateAndGetArray()->setInfoAndChangeNbOfCompo(infos);
1882   //
1883   if(nbSteps<1)
1884     {
1885       std::ostringstream oss; oss << "MEDFileField1TS(fid,fieldName) : file \'" << FileNameFromFID(fid) << "\' contains field with name \'" << fieldName << "\' but there is no time steps on it !";
1886       throw INTERP_KERNEL::Exception(oss.str());
1887     }
1888   //
1889   med_int numdt,numit;
1890   med_float dt;
1891   MEDFILESAFECALLERRD0(MEDfieldComputingStepInfo,(fid,fieldName.c_str(),1,&numdt,&numit,&dt));
1892   ret->setTime(FromMedInt<int>(numdt),FromMedInt<int>(numit),dt);
1893   ret->_csit=1;
1894   if(loadAll)
1895     ret->loadStructureAndBigArraysRecursively(fid,*((const MEDFileAnyTypeField1TSWithoutSDA*)ret),ms,entities);
1896   else
1897     ret->loadOnlyStructureOfDataRecursively(fid,*((const MEDFileAnyTypeField1TSWithoutSDA*)ret),ms,entities);
1898   return ret.retn();
1899 }
1900
1901 MEDFileAnyTypeField1TS::MEDFileAnyTypeField1TS(med_idt fid, const std::string& fieldName, bool loadAll, const MEDFileMeshes *ms, const MEDFileEntities *entities)
1902 try:MEDFileFieldGlobsReal(fid)
1903 {
1904   _content=BuildContentFrom(fid,fieldName,loadAll,ms,entities);
1905   loadGlobals(fid);
1906 }
1907 catch(INTERP_KERNEL::Exception& e)
1908 {
1909     throw e;
1910 }
1911
1912 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::BuildNewInstanceFromContent(MEDFileAnyTypeField1TSWithoutSDA *c)
1913 {
1914   if(!c)
1915     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS::BuildNewInstanceFromContent : empty content in input : unable to build a new instance !");
1916   if(dynamic_cast<const MEDFileField1TSWithoutSDA *>(c))
1917     {
1918       MCAuto<MEDFileField1TS> ret(MEDFileField1TS::New());
1919       ret->_content=c; c->incrRef();
1920       return ret.retn();
1921     }
1922   if(dynamic_cast<const MEDFileInt32Field1TSWithoutSDA *>(c))
1923     {
1924       MCAuto<MEDFileInt32Field1TS> ret(MEDFileInt32Field1TS::New());
1925       ret->_content=c; c->incrRef();
1926       return ret.retn();
1927     }
1928   if(dynamic_cast<const MEDFileInt64Field1TSWithoutSDA *>(c))
1929     {
1930       MCAuto<MEDFileInt64Field1TS> ret(MEDFileInt64Field1TS::New());
1931       ret->_content=c; c->incrRef();
1932       return ret.retn();
1933     }
1934   if(dynamic_cast<const MEDFileFloatField1TSWithoutSDA *>(c))
1935     {
1936       MCAuto<MEDFileFloatField1TS> ret(MEDFileFloatField1TS::New());
1937       ret->_content=c; c->incrRef();
1938       return ret.retn();
1939     }
1940   throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS::BuildNewInstanceFromContent : internal error ! a content of type different from FLOAT64 FLOAT32 and INT32 has been built but not intercepted !");
1941 }
1942
1943 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::BuildNewInstanceFromContent(MEDFileAnyTypeField1TSWithoutSDA *c, med_idt fid)
1944 {
1945   MEDFileAnyTypeField1TS *ret(BuildNewInstanceFromContent(c));
1946   ret->setFileName(FileNameFromFID(fid));
1947   return ret;
1948 }
1949
1950 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::New(const std::string& fileName, bool loadAll)
1951 {
1952   MEDFileUtilities::AutoFid fid(OpenMEDFileForRead(fileName));
1953   return New(fid,loadAll);
1954 }
1955
1956 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::New(med_idt fid, bool loadAll)
1957 {
1958   MCAuto<MEDFileAnyTypeField1TSWithoutSDA> c(BuildContentFrom(fid,loadAll,0,0));
1959   MCAuto<MEDFileAnyTypeField1TS> ret(BuildNewInstanceFromContent(c,fid));
1960   ret->loadGlobals(fid);
1961   return ret.retn();
1962 }
1963
1964 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::New(const std::string& fileName, const std::string& fieldName, bool loadAll)
1965 {
1966   MEDFileUtilities::AutoFid fid(OpenMEDFileForRead(fileName));
1967   return New(fid,fieldName,loadAll);
1968 }
1969
1970 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::New(med_idt fid, const std::string& fieldName, bool loadAll)
1971 {
1972   MCAuto<MEDFileAnyTypeField1TSWithoutSDA> c(BuildContentFrom(fid,fieldName,loadAll,0,0));
1973   MCAuto<MEDFileAnyTypeField1TS> ret(BuildNewInstanceFromContent(c,fid));
1974   ret->loadGlobals(fid);
1975   return ret.retn();
1976 }
1977
1978 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::New(const std::string& fileName, const std::string& fieldName, int iteration, int order, bool loadAll)
1979 {
1980   MEDFileUtilities::AutoFid fid(OpenMEDFileForRead(fileName));
1981   return New(fid,fieldName,iteration,order,loadAll);
1982 }
1983
1984 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::New(med_idt fid, const std::string& fieldName, int iteration, int order, bool loadAll)
1985 {
1986   MCAuto<MEDFileAnyTypeField1TSWithoutSDA> c(BuildContentFrom(fid,fieldName,iteration,order,loadAll,0,0));
1987   MCAuto<MEDFileAnyTypeField1TS> ret(BuildNewInstanceFromContent(c,fid));
1988   ret->loadGlobals(fid);
1989   return ret.retn();
1990 }
1991
1992 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::NewAdv(const std::string& fileName, const std::string& fieldName, int iteration, int order, bool loadAll, const MEDFileEntities *entities)
1993 {
1994   MEDFileUtilities::AutoFid fid(OpenMEDFileForRead(fileName));
1995   return NewAdv(fid,fieldName,iteration,order,loadAll,entities);
1996 }
1997
1998 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::NewAdv(med_idt fid, const std::string& fieldName, int iteration, int order, bool loadAll, const MEDFileEntities *entities)
1999 {
2000   MCAuto<MEDFileAnyTypeField1TSWithoutSDA> c(BuildContentFrom(fid,fieldName,iteration,order,loadAll,0,entities));
2001   MCAuto<MEDFileAnyTypeField1TS> ret(BuildNewInstanceFromContent(c,fid));
2002   ret->loadGlobals(fid);
2003   return ret.retn();
2004 }
2005
2006 MEDFileAnyTypeField1TSWithoutSDA *MEDFileAnyTypeField1TS::BuildContentFrom(med_idt fid, const std::string& fieldName, int iteration, int order, bool loadAll, const MEDFileMeshes *ms, const MEDFileEntities *entities)
2007 {
2008   med_field_type typcha;
2009   std::vector<std::string> infos;
2010   std::string dtunit,meshName;
2011   int iii(-1);
2012   int nbOfStep2(LocateField(fid,fieldName,iii,typcha,infos,dtunit,meshName));
2013   MCAuto<MEDFileAnyTypeField1TSWithoutSDA> ret;
2014   switch(typcha)
2015   {
2016     case MED_FLOAT64:
2017       {
2018         ret=MEDFileField1TSWithoutSDA::New(fieldName,meshName,-1,iteration,order,std::vector<std::string>());
2019         break;
2020       }
2021     case MED_INT32:
2022       {
2023         ret=MEDFileInt32Field1TSWithoutSDA::New(fieldName,meshName,-1,iteration,order,std::vector<std::string>());
2024         break;
2025       }
2026     case MED_INT64:
2027       {
2028         ret=MEDFileInt64Field1TSWithoutSDA::New(fieldName,meshName,-1,iteration,order,std::vector<std::string>());
2029         break;
2030       }
2031     case MED_FLOAT32:
2032       {
2033         ret=MEDFileFloatField1TSWithoutSDA::New(fieldName,meshName,-1,iteration,order,std::vector<std::string>());
2034         break;
2035       }
2036     case MED_INT:
2037       {
2038         if(sizeof(med_int)==sizeof(int))
2039           {
2040             ret=MEDFileInt32Field1TSWithoutSDA::New(fieldName,meshName,-1,iteration,order,std::vector<std::string>());
2041             break;
2042           }
2043       }
2044     default:
2045       {
2046         std::ostringstream oss; oss << "MEDFileAnyTypeField1TS::BuildContentFrom(fid,fieldName,iteration,order) : file \'" << FileNameFromFID(fid) << "\' contains field with name \'" << fieldName << "\' but the type of field is not in [MED_FLOAT64, MED_INT32, MED_FLOAT32, MED_INT64] !";
2047         throw INTERP_KERNEL::Exception(oss.str());
2048       }
2049   }
2050   ret->setDtUnit(dtunit.c_str());
2051   ret->getOrCreateAndGetArray()->setInfoAndChangeNbOfCompo(infos);
2052   //
2053   bool found=false;
2054   std::vector< std::pair<int,int> > dtits(nbOfStep2);
2055   for(int i=0;i<nbOfStep2 && !found;i++)
2056     {
2057       med_int numdt,numit;
2058       med_float dt;
2059       MEDFILESAFECALLERRD0(MEDfieldComputingStepInfo,(fid,fieldName.c_str(),i+1,&numdt,&numit,&dt));
2060       if(numdt==iteration && numit==order)
2061         {
2062           found=true;
2063           ret->_csit=i+1;
2064         }
2065       else
2066         dtits[i]=std::pair<int,int>(numdt,numit);
2067     }
2068   if(!found)
2069     {
2070       std::ostringstream oss; oss << "No such iteration (" << iteration << "," << order << ") in existing field '" << fieldName << "' in file '" << FileNameFromFID(fid) << "' ! Available iterations are : ";
2071       for(std::vector< std::pair<int,int> >::const_iterator iter=dtits.begin();iter!=dtits.end();iter++)
2072         oss << "(" << (*iter).first << "," << (*iter).second << "), ";
2073       throw INTERP_KERNEL::Exception(oss.str());
2074     }
2075   if(loadAll)
2076     ret->loadStructureAndBigArraysRecursively(fid,*((const MEDFileAnyTypeField1TSWithoutSDA*)ret),ms,entities);
2077   else
2078     ret->loadOnlyStructureOfDataRecursively(fid,*((const MEDFileAnyTypeField1TSWithoutSDA*)ret),ms,entities);
2079   return ret.retn();
2080 }
2081
2082 MEDFileAnyTypeField1TS::MEDFileAnyTypeField1TS(med_idt fid, const std::string& fieldName, int iteration, int order, bool loadAll, const MEDFileMeshes *ms, const MEDFileEntities *entities)
2083 try:MEDFileFieldGlobsReal(fid)
2084 {
2085   _content=BuildContentFrom(fid,fieldName,iteration,order,loadAll,ms,entities);
2086   loadGlobals(fid);
2087 }
2088 catch(INTERP_KERNEL::Exception& e)
2089 {
2090     throw e;
2091 }
2092
2093 /*!
2094  * This constructor is a shallow copy constructor. If \a shallowCopyOfContent is true the content of \a other is shallow copied.
2095  * If \a shallowCopyOfContent is false, \a other is taken to be the content of \a this.
2096  *
2097  * \warning this is a shallow copy constructor
2098  */
2099 MEDFileAnyTypeField1TS::MEDFileAnyTypeField1TS(const MEDFileAnyTypeField1TSWithoutSDA& other, bool shallowCopyOfContent)
2100 {
2101   if(!shallowCopyOfContent)
2102     {
2103       const MEDFileAnyTypeField1TSWithoutSDA *otherPtr(&other);
2104       otherPtr->incrRef();
2105       _content=const_cast<MEDFileAnyTypeField1TSWithoutSDA *>(otherPtr);
2106     }
2107   else
2108     {
2109       _content=other.shallowCpy();
2110     }
2111 }
2112
2113 int MEDFileAnyTypeField1TS::LocateField2(med_idt fid, int fieldIdCFormat, bool checkFieldId, std::string& fieldName, med_field_type& typcha, std::vector<std::string>& infos, std::string& dtunitOut, std::string& meshName)
2114 {
2115   if(checkFieldId)
2116     {
2117       med_int nbFields=MEDnField(fid);
2118       if(fieldIdCFormat>=nbFields)
2119         {
2120           std::ostringstream oss; oss << "MEDFileAnyTypeField1TS::LocateField2(fileName) : in file \'" << FileNameFromFID(fid) << "\' number of fields is " << nbFields << " ! Trying to request for id " << fieldIdCFormat << " !";
2121           throw INTERP_KERNEL::Exception(oss.str());
2122         }
2123     }
2124   med_int ncomp(MEDfieldnComponent(fid,fieldIdCFormat+1));
2125   INTERP_KERNEL::AutoPtr<char> comp(MEDLoaderBase::buildEmptyString(ncomp*MED_SNAME_SIZE));
2126   INTERP_KERNEL::AutoPtr<char> unit(MEDLoaderBase::buildEmptyString(ncomp*MED_SNAME_SIZE));
2127   INTERP_KERNEL::AutoPtr<char> dtunit(MEDLoaderBase::buildEmptyString(MED_LNAME_SIZE));
2128   INTERP_KERNEL::AutoPtr<char> nomcha(MEDLoaderBase::buildEmptyString(MED_NAME_SIZE));
2129   INTERP_KERNEL::AutoPtr<char> nomMaa(MEDLoaderBase::buildEmptyString(MED_NAME_SIZE));
2130   med_bool localMesh;
2131   med_int nbOfStep;
2132   MEDFILESAFECALLERRD0(MEDfieldInfo,(fid,fieldIdCFormat+1,nomcha,nomMaa,&localMesh,&typcha,comp,unit,dtunit,&nbOfStep));
2133   fieldName=MEDLoaderBase::buildStringFromFortran(nomcha,MED_NAME_SIZE);
2134   dtunitOut=MEDLoaderBase::buildStringFromFortran(dtunit,MED_LNAME_SIZE);
2135   meshName=MEDLoaderBase::buildStringFromFortran(nomMaa,MED_NAME_SIZE);
2136   infos.clear(); infos.resize(ncomp);
2137   for(int j=0;j<ncomp;j++)
2138     infos[j]=MEDLoaderBase::buildUnionUnit((char *)comp+j*MED_SNAME_SIZE,MED_SNAME_SIZE,(char *)unit+j*MED_SNAME_SIZE,MED_SNAME_SIZE);
2139   return FromMedInt<int>(nbOfStep);
2140 }
2141
2142 /*!
2143  * This method throws an INTERP_KERNEL::Exception if \a fieldName field is not in file pointed by \a fid and with name \a fileName.
2144  *
2145  * \return in case of success the number of time steps available for the field with name \a fieldName.
2146  */
2147 int MEDFileAnyTypeField1TS::LocateField(med_idt fid, const std::string& fieldName, int& posCFormat, med_field_type& typcha, std::vector<std::string>& infos, std::string& dtunitOut, std::string& meshName)
2148 {
2149   med_int nbFields=MEDnField(fid);
2150   bool found=false;
2151   std::vector<std::string> fns(nbFields);
2152   int nbOfStep2(-1);
2153   for(int i=0;i<nbFields && !found;i++)
2154     {
2155       std::string tmp,tmp2;
2156       nbOfStep2=LocateField2(fid,i,false,tmp,typcha,infos,dtunitOut,tmp2);
2157       fns[i]=tmp;
2158       found=(tmp==fieldName);
2159       if(found)
2160         {
2161           posCFormat=i;
2162           meshName=tmp2;
2163         }
2164     }
2165   if(!found)
2166     {
2167       std::ostringstream oss; oss << "No such field '" << fieldName << "' in file '" << FileNameFromFID(fid) << "' ! Available fields are : ";
2168       for(std::vector<std::string>::const_iterator it=fns.begin();it!=fns.end();it++)
2169         oss << "\"" << *it << "\" ";
2170       throw INTERP_KERNEL::Exception(oss.str());
2171     }
2172   return nbOfStep2;
2173 }
2174
2175 /*!
2176  * This method as MEDFileField1TSW::setLocNameOnLeaf, is dedicated for advanced user that a want a very fine control on their data structure
2177  * without overhead. This method can be called only regarding information returned by MEDFileField1TSWithoutSDA::getFieldSplitedByType or MEDFileField1TSWithoutSDA::getFieldSplitedByType2.
2178  * This method changes the attribute (here it's profile name) of the leaf datastructure (MEDFileFieldPerMeshPerTypePerDisc instance).
2179  * It is the responsibility of the caller to invoke MEDFileFieldGlobs::appendProfile or MEDFileFieldGlobs::getProfile
2180  * to keep a valid instance.
2181  * If \b this do not have any leaf that correspond to the request of the input parameter (\b mName, \b typ, \b locId) an INTERP_KERNEL::Exception will be thrown.
2182  * If \b newPflName profile name does not already exist the profile with old name will be renamed with name \b newPflName.
2183  * If \b newPflName already exists and that \b forceRenameOnGlob is false (the default) an INTERP_KERNEL::Exception will be thrown to avoid big confusion. In this case the called should rename before the profile name with name \b newPflName.
2184  *
2185  * \param [in] mName specifies the underlying mesh name. This value can be pointer 0 for users that do not deal with fields on multi mesh.
2186  * \param [in] typ is for the geometric cell type (or INTERP_KERNEL::NORM_ERROR for node field) entry to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set.
2187  * \param [in] locId is the localization id to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set. It corresponds to the position of
2188  *             \c pfls[std::distance(types.begin(),std::find(types.begin(),typ)] vector in MEDFileField1TSWithoutSDA::getFieldSplitedByType. For non gausspoints field users, the value is 0.
2189  * \param [in] newLocName is the new localization name.
2190  * \param [in] forceRenameOnGlob specifies the behaviour in case of profile \b newPflName already exists. If true, the renaming is done without check. It can lead to major bug.
2191  *             If false, an exception will be thrown to force user to change previously the name of the profile with name \b newPflName
2192  */
2193 void MEDFileAnyTypeField1TS::setProfileNameOnLeaf(const std::string& mName, INTERP_KERNEL::NormalizedCellType typ, int locId, const std::string& newPflName, bool forceRenameOnGlob)
2194 {
2195   MEDFileFieldPerMeshPerTypePerDisc *disc=getLeafGivenMeshAndTypeAndLocId(mName,typ,locId);
2196   std::string oldPflName=disc->getProfile();
2197   std::vector<std::string> vv=getPflsReallyUsedMulti();
2198   std::size_t nbOfOcc=std::count(vv.begin(),vv.end(),oldPflName);
2199   if(forceRenameOnGlob || (!existsPfl(newPflName) && nbOfOcc==1))
2200     {
2201       disc->setProfile(newPflName);
2202       DataArrayIdType *pfl=getProfile(oldPflName.c_str());
2203       pfl->setName(newPflName);
2204     }
2205   else
2206     {
2207       std::ostringstream oss; oss << "MEDFileField1TS::setProfileNameOnLeaf : Profile \"" << newPflName << "\" already exists or referenced more than one !";
2208       throw INTERP_KERNEL::Exception(oss.str());
2209     }
2210 }
2211
2212 /*!
2213  * This method as MEDFileField1TSW::setProfileNameOnLeaf, is dedicated for advanced user that a want a very fine control on their data structure
2214  * without overhead. This method can be called only regarding information returned by MEDFileField1TSWithoutSDA::getFieldSplitedByType or MEDFileField1TSWithoutSDA::getFieldSplitedByType2.
2215  * This method changes the attribute (here it's localization name) of the leaf datastructure (MEDFileFieldPerMeshPerTypePerDisc instance).
2216  * It is the responsibility of the caller to invoke MEDFileFieldGlobs::appendProfile or MEDFileFieldGlobs::getProfile
2217  * to keep a valid instance.
2218  * If \b this do not have any leaf that correspond to the request of the input parameter (\b mName, \b typ, \b locId) an INTERP_KERNEL::Exception will be thrown.
2219  * This method is an extension of MEDFileField1TSWithoutSDA::setProfileNameOnLeafExt method because it performs a modification of global info.
2220  * If \b newLocName profile name does not already exist the localization with old name will be renamed with name \b newLocName.
2221  * If \b newLocName already exists an INTERP_KERNEL::Exception will be thrown to avoid big confusion. In this case the called should rename before the profile name with name \b newLocName.
2222  *
2223  * \param [in] mName specifies the underlying mesh name. This value can be pointer 0 for users that do not deal with fields on multi mesh.
2224  * \param [in] typ is for the geometric cell type (or INTERP_KERNEL::NORM_ERROR for node field) entry to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set.
2225  * \param [in] locId is the localization id to find the right MEDFileFieldPerMeshPerTypePerDisc instance to set. It corresponds to the position of
2226  *             \c pfls[std::distance(types.begin(),std::find(types.begin(),typ)] vector in MEDFileField1TSWithoutSDA::getFieldSplitedByType. For non gausspoints field users, the value is 0.
2227  * \param [in] newLocName is the new localization name.
2228  * \param [in] forceRenameOnGlob specifies the behaviour in case of profile \b newLocName already exists. If true, the renaming is done without check. It can lead to major bug.
2229  *             If false, an exception will be thrown to force user to change previously the name of the profile with name \b newLocName
2230  */
2231 void MEDFileAnyTypeField1TS::setLocNameOnLeaf(const std::string& mName, INTERP_KERNEL::NormalizedCellType typ, int locId, const std::string& newLocName, bool forceRenameOnGlob)
2232 {
2233   MEDFileFieldPerMeshPerTypePerDisc *disc=getLeafGivenMeshAndTypeAndLocId(mName,typ,locId);
2234   std::string oldLocName=disc->getLocalization();
2235   std::vector<std::string> vv=getLocsReallyUsedMulti();
2236   std::size_t nbOfOcc=std::count(vv.begin(),vv.end(),oldLocName);
2237   if(forceRenameOnGlob || (!existsLoc(newLocName) && nbOfOcc==1))
2238     {
2239       disc->setLocalization(newLocName);
2240       MEDFileFieldLoc& loc=getLocalization(oldLocName.c_str());
2241       loc.setName(newLocName);
2242     }
2243   else
2244     {
2245       std::ostringstream oss; oss << "MEDFileField1TS::setLocNameOnLeaf : Localization \"" << newLocName << "\" already exists or referenced more than one !";
2246       throw INTERP_KERNEL::Exception(oss.str());
2247     }
2248 }
2249
2250 MEDFileAnyTypeField1TSWithoutSDA *MEDFileAnyTypeField1TS::contentNotNullBase()
2251 {
2252   MEDFileAnyTypeField1TSWithoutSDA *ret=_content;
2253   if(!ret)
2254     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS : content is expected to be not null !");
2255   return ret;
2256 }
2257
2258 const MEDFileAnyTypeField1TSWithoutSDA *MEDFileAnyTypeField1TS::contentNotNullBase() const
2259 {
2260   const MEDFileAnyTypeField1TSWithoutSDA *ret=_content;
2261   if(!ret)
2262     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS : const content is expected to be not null !");
2263   return ret;
2264 }
2265
2266 /*!
2267  * This method alloc the arrays and load potentially huge arrays contained in this field.
2268  * This method should be called when a MEDFileAnyTypeField1TS::New constructor has been with false as the last parameter.
2269  * This method can be also called to refresh or reinit values from a file.
2270  *
2271  * \throw If the fileName is not set or points to a non readable MED file.
2272  * \sa MEDFileAnyTypeField1TS::loadArraysIfNecessary
2273  */
2274 void MEDFileAnyTypeField1TS::loadArrays()
2275 {
2276   if(getFileName().empty())
2277     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS::loadArrays : the structure does not come from a file !");
2278   MEDFileUtilities::AutoFid fid(OpenMEDFileForRead(getFileName()));
2279   contentNotNullBase()->loadBigArraysRecursively(fid,*contentNotNullBase());
2280 }
2281
2282 /*!
2283  * This method behaves as MEDFileAnyTypeField1TS::loadArrays does, the first call, if \a this was built using a file without loading big arrays.
2284  * But once data loaded once, this method does nothing. Contrary to MEDFileAnyTypeField1TS::loadArrays and MEDFileAnyTypeField1TS::unloadArrays
2285  * this method does not throw if \a this does not come from file read.
2286  *
2287  * \sa MEDFileAnyTypeField1TS::loadArrays, MEDFileAnyTypeField1TS::unloadArrays
2288  */
2289 void MEDFileAnyTypeField1TS::loadArraysIfNecessary()
2290 {
2291   if(!getFileName().empty())
2292     {
2293       MEDFileUtilities::AutoFid fid(OpenMEDFileForRead(getFileName()));
2294       contentNotNullBase()->loadBigArraysRecursivelyIfNecessary(fid,*contentNotNullBase());
2295     }
2296 }
2297
2298 /*!
2299  * This method releases potentially big data arrays and so returns to the same heap memory than status loaded with 'loadAll' parameter set to false.
2300  * \b WARNING, this method does release arrays even if \a this does not come from a load of a MED file.
2301  * So this method can lead to a loss of data. If you want to unload arrays safely call MEDFileAnyTypeField1TS::unloadArraysWithoutDataLoss instead.
2302  *
2303  * \sa MEDFileAnyTypeField1TS::loadArrays, MEDFileAnyTypeField1TS::loadArraysIfNecessary, MEDFileAnyTypeField1TS::unloadArraysWithoutDataLoss
2304  */
2305 void MEDFileAnyTypeField1TS::unloadArrays()
2306 {
2307   contentNotNullBase()->unloadArrays();
2308 }
2309
2310 /*!
2311  * This method potentially releases big data arrays if \a this is coming from a file. If \a this has been built from scratch this method will have no effect.
2312  * This method is the symmetrical method of MEDFileAnyTypeField1TS::loadArraysIfNecessary.
2313  * This method is useful to reduce \b safely amount of heap memory necessary for \a this by using MED file as database.
2314  *
2315  * \sa MEDFileAnyTypeField1TS::loadArraysIfNecessary
2316  */
2317 void MEDFileAnyTypeField1TS::unloadArraysWithoutDataLoss()
2318 {
2319   if(!getFileName().empty())
2320     contentNotNullBase()->unloadArrays();
2321 }
2322
2323 void MEDFileAnyTypeField1TS::writeLL(med_idt fid) const
2324 {
2325   std::size_t nbComp(getNumberOfComponents());
2326   INTERP_KERNEL::AutoPtr<char> comp(MEDLoaderBase::buildEmptyString(nbComp*MED_SNAME_SIZE));
2327   INTERP_KERNEL::AutoPtr<char> unit(MEDLoaderBase::buildEmptyString(nbComp*MED_SNAME_SIZE));
2328   for(std::size_t i=0;i<nbComp;i++)
2329     {
2330       std::string info=getInfo()[i];
2331       std::string c,u;
2332       MEDLoaderBase::splitIntoNameAndUnit(info,c,u);
2333       MEDLoaderBase::safeStrCpy2(c.c_str(),MED_SNAME_SIZE,comp+i*MED_SNAME_SIZE,_too_long_str);
2334       MEDLoaderBase::safeStrCpy2(u.c_str(),MED_SNAME_SIZE,unit+i*MED_SNAME_SIZE,_too_long_str);
2335     }
2336   if(getName().empty())
2337     throw INTERP_KERNEL::Exception("MEDFileField1TS::write : MED file does not accept field with empty name !");
2338   MEDFILESAFECALLERWR0(MEDfieldCr,(fid,getName().c_str(),getMEDFileFieldType(),ToMedInt(nbComp),comp,unit,getDtUnit().c_str(),getMeshName().c_str()));
2339   writeGlobals(fid,*this);
2340   contentNotNullBase()->writeLL(fid,*this,*contentNotNullBase());
2341 }
2342
2343 std::size_t MEDFileAnyTypeField1TS::getHeapMemorySizeWithoutChildren() const
2344 {
2345   return MEDFileFieldGlobsReal::getHeapMemorySizeWithoutChildren();
2346 }
2347
2348 std::vector<const BigMemoryObject *> MEDFileAnyTypeField1TS::getDirectChildrenWithNull() const
2349 {
2350   std::vector<const BigMemoryObject *> ret(MEDFileFieldGlobsReal::getDirectChildrenWithNull());
2351   ret.push_back((const MEDFileAnyTypeField1TSWithoutSDA *)_content);
2352   return ret;
2353 }
2354
2355 /*!
2356  * Returns a string describing \a this field. This string is outputted
2357  * by \c print Python command.
2358  */
2359 std::string MEDFileAnyTypeField1TS::simpleRepr() const
2360 {
2361   std::ostringstream oss;
2362   contentNotNullBase()->simpleRepr(0,oss,-1);
2363   simpleReprGlobs(oss);
2364   return oss.str();
2365 }
2366
2367 /*!
2368  * This method returns all profiles whose name is non empty used.
2369  * \b WARNING If profile is used several times it will be reported \b only \b once.
2370  * To get non empty name profiles as time as they appear in \b this call MEDFileField1TS::getPflsReallyUsedMulti instead.
2371  */
2372 std::vector<std::string> MEDFileAnyTypeField1TS::getPflsReallyUsed() const
2373 {
2374   return contentNotNullBase()->getPflsReallyUsed2();
2375 }
2376
2377 /*!
2378  * This method returns all localizations whose name is non empty used.
2379  * \b WARNING If localization is used several times it will be reported \b only \b once.
2380  */
2381 std::vector<std::string> MEDFileAnyTypeField1TS::getLocsReallyUsed() const
2382 {
2383   return contentNotNullBase()->getLocsReallyUsed2();
2384 }
2385
2386 /*!
2387  * This method returns all profiles whose name is non empty used.
2388  * \b WARNING contrary to MEDFileField1TS::getPflsReallyUsed, if profile is used several times it will be reported as time as it appears.
2389  */
2390 std::vector<std::string> MEDFileAnyTypeField1TS::getPflsReallyUsedMulti() const
2391 {
2392   return contentNotNullBase()->getPflsReallyUsedMulti2();
2393 }
2394
2395 /*!
2396  * This method returns all localizations whose name is non empty used.
2397  * \b WARNING contrary to MEDFileField1TS::getLocsReallyUsed if localization is used several times it will be reported as time as it appears.
2398  */
2399 std::vector<std::string> MEDFileAnyTypeField1TS::getLocsReallyUsedMulti() const
2400 {
2401   return contentNotNullBase()->getLocsReallyUsedMulti2();
2402 }
2403
2404 void MEDFileAnyTypeField1TS::changePflsRefsNamesGen(const std::vector< std::pair<std::vector<std::string>, std::string > >& mapOfModif)
2405 {
2406   contentNotNullBase()->changePflsRefsNamesGen2(mapOfModif);
2407 }
2408
2409 void MEDFileAnyTypeField1TS::changeLocsRefsNamesGen(const std::vector< std::pair<std::vector<std::string>, std::string > >& mapOfModif)
2410 {
2411   contentNotNullBase()->changeLocsRefsNamesGen2(mapOfModif);
2412 }
2413
2414 int MEDFileAnyTypeField1TS::getDimension() const
2415 {
2416   return contentNotNullBase()->getDimension();
2417 }
2418
2419 int MEDFileAnyTypeField1TS::getIteration() const
2420 {
2421   return contentNotNullBase()->getIteration();
2422 }
2423
2424 int MEDFileAnyTypeField1TS::getOrder() const
2425 {
2426   return contentNotNullBase()->getOrder();
2427 }
2428
2429 double MEDFileAnyTypeField1TS::getTime(int& iteration, int& order) const
2430 {
2431   return contentNotNullBase()->getTime(iteration,order);
2432 }
2433
2434 void MEDFileAnyTypeField1TS::setTime(int iteration, int order, double val)
2435 {
2436   contentNotNullBase()->setTime(iteration,order,val);
2437 }
2438
2439 std::string MEDFileAnyTypeField1TS::getName() const
2440 {
2441   return contentNotNullBase()->getName();
2442 }
2443
2444 void MEDFileAnyTypeField1TS::setName(const std::string& name)
2445 {
2446   contentNotNullBase()->setName(name);
2447 }
2448
2449 void MEDFileAnyTypeField1TS::simpleRepr(int bkOffset, std::ostream& oss, int f1tsId) const
2450 {
2451   contentNotNullBase()->simpleRepr(bkOffset,oss,f1tsId);
2452 }
2453
2454 std::string MEDFileAnyTypeField1TS::getDtUnit() const
2455 {
2456   return contentNotNullBase()->getDtUnit();
2457 }
2458
2459 void MEDFileAnyTypeField1TS::setDtUnit(const std::string& dtUnit)
2460 {
2461   contentNotNullBase()->setDtUnit(dtUnit);
2462 }
2463
2464 std::string MEDFileAnyTypeField1TS::getMeshName() const
2465 {
2466   return contentNotNullBase()->getMeshName();
2467 }
2468
2469 void MEDFileAnyTypeField1TS::setMeshName(const std::string& newMeshName)
2470 {
2471   contentNotNullBase()->setMeshName(newMeshName);
2472 }
2473
2474 bool MEDFileAnyTypeField1TS::changeMeshNames(const std::vector< std::pair<std::string,std::string> >& modifTab)
2475 {
2476   return contentNotNullBase()->changeMeshNames(modifTab);
2477 }
2478
2479 int MEDFileAnyTypeField1TS::getMeshIteration() const
2480 {
2481   return contentNotNullBase()->getMeshIteration();
2482 }
2483
2484 int MEDFileAnyTypeField1TS::getMeshOrder() const
2485 {
2486   return contentNotNullBase()->getMeshOrder();
2487 }
2488
2489 std::size_t MEDFileAnyTypeField1TS::getNumberOfComponents() const
2490 {
2491   return contentNotNullBase()->getNumberOfComponents();
2492 }
2493
2494 bool MEDFileAnyTypeField1TS::isDealingTS(int iteration, int order) const
2495 {
2496   return contentNotNullBase()->isDealingTS(iteration,order);
2497 }
2498
2499 std::pair<int,int> MEDFileAnyTypeField1TS::getDtIt() const
2500 {
2501   return contentNotNullBase()->getDtIt();
2502 }
2503
2504 void MEDFileAnyTypeField1TS::fillIteration(std::pair<int,int>& p) const
2505 {
2506   contentNotNullBase()->fillIteration(p);
2507 }
2508
2509 void MEDFileAnyTypeField1TS::fillTypesOfFieldAvailable(std::vector<TypeOfField>& types) const
2510 {
2511   contentNotNullBase()->fillTypesOfFieldAvailable(types);
2512 }
2513
2514 void MEDFileAnyTypeField1TS::setInfo(const std::vector<std::string>& infos)
2515 {
2516   contentNotNullBase()->setInfo(infos);
2517 }
2518
2519 const std::vector<std::string>& MEDFileAnyTypeField1TS::getInfo() const
2520 {
2521   return contentNotNullBase()->getInfo();
2522 }
2523 std::vector<std::string>& MEDFileAnyTypeField1TS::getInfo()
2524 {
2525   return contentNotNullBase()->getInfo();
2526 }
2527
2528 bool MEDFileAnyTypeField1TS::presenceOfMultiDiscPerGeoType() const
2529 {
2530   return contentNotNullBase()->presenceOfMultiDiscPerGeoType();
2531 }
2532
2533 MEDFileFieldPerMeshPerTypePerDisc *MEDFileAnyTypeField1TS::getLeafGivenMeshAndTypeAndLocId(const std::string& mName, INTERP_KERNEL::NormalizedCellType typ, int locId)
2534 {
2535   return contentNotNullBase()->getLeafGivenMeshAndTypeAndLocId(mName,typ,locId);
2536 }
2537
2538 const MEDFileFieldPerMeshPerTypePerDisc *MEDFileAnyTypeField1TS::getLeafGivenMeshAndTypeAndLocId(const std::string& mName, INTERP_KERNEL::NormalizedCellType typ, int locId) const
2539 {
2540   return contentNotNullBase()->getLeafGivenMeshAndTypeAndLocId(mName,typ,locId);
2541 }
2542
2543 int MEDFileAnyTypeField1TS::getNonEmptyLevels(const std::string& mname, std::vector<int>& levs) const
2544 {
2545   return contentNotNullBase()->getNonEmptyLevels(mname,levs);
2546 }
2547
2548 void MEDFileAnyTypeField1TS::convertMedBallIntoClassic()
2549 {
2550   return contentNotNullBase()->convertMedBallIntoClassic();
2551 }
2552
2553 void MEDFileAnyTypeField1TS::makeReduction(INTERP_KERNEL::NormalizedCellType ct, TypeOfField tof, const DataArrayIdType *pfl)
2554 {
2555   return contentNotNullBase()->makeReduction(ct,tof,pfl);
2556 }
2557
2558 std::vector<TypeOfField> MEDFileAnyTypeField1TS::getTypesOfFieldAvailable() const
2559 {
2560   return contentNotNullBase()->getTypesOfFieldAvailable();
2561 }
2562
2563 std::vector< std::vector<std::pair<mcIdType,mcIdType> > > MEDFileAnyTypeField1TS::getFieldSplitedByType(const std::string& mname, std::vector<INTERP_KERNEL::NormalizedCellType>& types, std::vector< std::vector<TypeOfField> >& typesF,
2564                                                                                               std::vector< std::vector<std::string> >& pfls, std::vector< std::vector<std::string> >& locs) const
2565 {
2566   return contentNotNullBase()->getFieldSplitedByType(mname,types,typesF,pfls,locs);
2567 }
2568
2569 /*!
2570  * This method returns as MEDFileAnyTypeField1TS new instances as number of components in \a this.
2571  * The returned instances are deep copy of \a this except that for globals that are shared with those contained in \a this.
2572  * ** WARNING ** do no forget to rename the output instances to avoid to write n-times in the same MED file field !
2573  */
2574 std::vector< MCAuto< MEDFileAnyTypeField1TS > > MEDFileAnyTypeField1TS::splitComponents() const
2575 {
2576   const MEDFileAnyTypeField1TSWithoutSDA *content(_content);
2577   if(!content)
2578     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS::splitComponents : no content in this ! Unable to split components !");
2579   std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > contentsSplit=content->splitComponents();
2580   std::size_t sz(contentsSplit.size());
2581   std::vector< MCAuto< MEDFileAnyTypeField1TS > > ret(sz);
2582   for(std::size_t i=0;i<sz;i++)
2583     {
2584       ret[i]=shallowCpy();
2585       ret[i]->_content=contentsSplit[i];
2586     }
2587   return ret;
2588 }
2589
2590 /*!
2591  * This method returns as MEDFileAnyTypeField1TS new instances as number of spatial discretizations in \a this.
2592  * The returned instances are shallowed copied of \a this except that for globals that are shared with those contained in \a this.
2593  */
2594 std::vector< MCAuto< MEDFileAnyTypeField1TS > > MEDFileAnyTypeField1TS::splitDiscretizations() const
2595 {
2596   const MEDFileAnyTypeField1TSWithoutSDA *content(_content);
2597   if(!content)
2598     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS::splitDiscretizations : no content in this ! Unable to split discretization !");
2599   std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > contentsSplit(content->splitDiscretizations());
2600   std::size_t sz(contentsSplit.size());
2601   std::vector< MCAuto< MEDFileAnyTypeField1TS > > ret(sz);
2602   for(std::size_t i=0;i<sz;i++)
2603     {
2604       ret[i]=shallowCpy();
2605       ret[i]->_content=contentsSplit[i];
2606     }
2607   return ret;
2608 }
2609
2610 /*!
2611  * This method returns as MEDFileAnyTypeField1TS new instances as number of maximal number of discretization in \a this.
2612  * The returned instances are shallowed copied of \a this except that for globals that are shared with those contained in \a this.
2613  */
2614 std::vector< MCAuto< MEDFileAnyTypeField1TS > > MEDFileAnyTypeField1TS::splitMultiDiscrPerGeoTypes() const
2615 {
2616   const MEDFileAnyTypeField1TSWithoutSDA *content(_content);
2617   if(!content)
2618     throw INTERP_KERNEL::Exception("MEDFileAnyTypeField1TS::splitMultiDiscrPerGeoTypes : no content in this ! Unable to split discretization !");
2619   std::vector< MCAuto<MEDFileAnyTypeField1TSWithoutSDA> > contentsSplit(content->splitMultiDiscrPerGeoTypes());
2620   std::size_t sz(contentsSplit.size());
2621   std::vector< MCAuto< MEDFileAnyTypeField1TS > > ret(sz);
2622   for(std::size_t i=0;i<sz;i++)
2623     {
2624       ret[i]=shallowCpy();
2625       ret[i]->_content=contentsSplit[i];
2626     }
2627   return ret;
2628 }
2629
2630 MEDFileAnyTypeField1TS *MEDFileAnyTypeField1TS::deepCopy() const
2631 {
2632   MCAuto<MEDFileAnyTypeField1TS> ret=shallowCpy();
2633   if((const MEDFileAnyTypeField1TSWithoutSDA *)_content)
2634     ret->_content=_content->deepCopy();
2635   ret->deepCpyGlobs(*this);
2636   return ret.retn();
2637 }
2638
2639 mcIdType MEDFileAnyTypeField1TS::copyTinyInfoFrom(const MEDCouplingFieldDouble *field, const DataArray *arr)
2640 {
2641   MCAuto<MEDCouplingFieldTemplate> ft(MEDCouplingFieldTemplate::New(*field));
2642   return copyTinyInfoFrom(field->timeDiscrSafe(),ft,arr);
2643 }
2644
2645 mcIdType MEDFileAnyTypeField1TS::copyTinyInfoFrom(const TimeHolder *th, const MEDCouplingFieldTemplate *field, const DataArray *arr)
2646 {
2647   return contentNotNullBase()->copyTinyInfoFrom(th,field,arr);
2648 }
2649
2650 //= MEDFileField1TS
2651
2652 /*!
2653  * This method performs a copy with datatype modification ( float64->int32 ) of \a this. The globals information are copied
2654  * following the given input policy.
2655  *
2656  * \param [in] isDeepCpyGlobs - a boolean that indicates the behaviour concerning globals (profiles and localizations)
2657  *                            By default (true) the globals are deeply copied.
2658  * \return MEDFileInt32Field1TS * - a new object that is the result of the conversion of \a this to int32 field.
2659  */
2660 MEDFileInt32Field1TS *MEDFileField1TS::convertToInt(bool isDeepCpyGlobs) const
2661 {
2662   MCAuto<MEDFileInt32Field1TS> ret;
2663   const MEDFileAnyTypeField1TSWithoutSDA *content(_content);
2664   if(content)
2665     {
2666       const MEDFileField1TSWithoutSDA *contc=dynamic_cast<const MEDFileField1TSWithoutSDA *>(content);
2667       if(!contc)
2668         throw INTERP_KERNEL::Exception("MEDFileField1TS::convertToInt : the content inside this is not FLOAT64 ! This is incoherent !");
2669       MCAuto<MEDFileInt32Field1TSWithoutSDA> newc(contc->convertToInt());
2670       ret=static_cast<MEDFileInt32Field1TS *>(MEDFileAnyTypeField1TS::BuildNewInstanceFromContent((MEDFileInt32Field1TSWithoutSDA *)newc));
2671     }
2672   else
2673     ret=MEDFileInt32Field1TS::New();
2674   if(isDeepCpyGlobs)
2675     ret->deepCpyGlobs(*this);
2676   else
2677     ret->shallowCpyGlobs(*this);
2678   return ret.retn();
2679 }
2680
2681 MEDFileField1TS::MEDFileField1TS(med_idt fid, bool loadAll, const MEDFileMeshes *ms)
2682 try:MEDFileTemplateField1TS<double>(fid,loadAll,ms)
2683 {
2684 }
2685 catch(INTERP_KERNEL::Exception& e)
2686 { throw e; }
2687
2688 MEDFileField1TS::MEDFileField1TS(med_idt fid, const std::string& fieldName, bool loadAll, const MEDFileMeshes *ms)
2689 try:MEDFileTemplateField1TS<double>(fid,fieldName,loadAll,ms)
2690 {
2691 }
2692 catch(INTERP_KERNEL::Exception& e)
2693 { throw e; }
2694
2695 MEDFileField1TS::MEDFileField1TS(med_idt fid, const std::string& fieldName, int iteration, int order, bool loadAll, const MEDFileMeshes *ms)
2696 try:MEDFileTemplateField1TS<double>(fid,fieldName,iteration,order,loadAll,ms)
2697 {
2698 }
2699 catch(INTERP_KERNEL::Exception& e)
2700 { throw e; }
2701
2702 /*!
2703  * This constructor is a shallow copy constructor. If \a shallowCopyOfContent is true the content of \a other is shallow copied.
2704  * If \a shallowCopyOfContent is false, \a other is taken to be the content of \a this.
2705  *
2706  * \warning this is a shallow copy constructor
2707  */
2708 MEDFileField1TS::MEDFileField1TS(const MEDFileField1TSWithoutSDA& other, bool shallowCopyOfContent)
2709 try:MEDFileTemplateField1TS<double>(other,shallowCopyOfContent)
2710 {
2711 }
2712 catch(INTERP_KERNEL::Exception& e)
2713 { throw e; }
2714
2715 MEDFileField1TS *MEDFileField1TS::shallowCpy() const
2716 {
2717   return new MEDFileField1TS(*this);
2718 }
2719
2720 std::vector< std::vector<DataArrayDouble *> > MEDFileField1TS::getFieldSplitedByType2(const std::string& mname, std::vector<INTERP_KERNEL::NormalizedCellType>& types, std::vector< std::vector<TypeOfField> >& typesF,
2721                                                                                       std::vector< std::vector<std::string> >& pfls, std::vector< std::vector<std::string> >& locs) const
2722 {
2723   return contentNotNull()->getFieldSplitedByType2(mname,types,typesF,pfls,locs);
2724 }
2725
2726 //= MEDFileInt32Field1TS
2727
2728 MCAuto<MEDCouplingFieldDouble> MEDFileInt32Field1TS::ConvertFieldIntToFieldDouble(const MEDCouplingFieldInt32 *f)
2729 {
2730   if(!f)
2731     throw INTERP_KERNEL::Exception("MEDFileInt32Field1TS::ConvertFieldIntToFieldDouble : null input field !");
2732   int t1,t2;
2733   double t0(f->getTime(t1,t2));
2734   std::string tu(f->getTimeUnit());
2735   MCAuto<MEDCouplingFieldTemplate> ft(MEDCouplingFieldTemplate::New(*f));
2736   MCAuto<MEDCouplingFieldDouble> ret(MEDCouplingFieldDouble::New(*ft));
2737   ret->setTime(t0,t1,t2); ret->setTimeUnit(tu);
2738   return ret;
2739 }
2740
2741 //= MEDFileInt64Field1TS
2742
2743 MCAuto<MEDCouplingFieldDouble> MEDFileInt64Field1TS::ConvertFieldIntToFieldDouble(const MEDCouplingFieldInt64 *f)
2744 {
2745   if(!f)
2746     throw INTERP_KERNEL::Exception("MEDFileInt64Field1TS::ConvertFieldIntToFieldDouble : null input field !");
2747   int t1,t2;
2748   double t0(f->getTime(t1,t2));
2749   std::string tu(f->getTimeUnit());
2750   MCAuto<MEDCouplingFieldTemplate> ft(MEDCouplingFieldTemplate::New(*f));
2751   MCAuto<MEDCouplingFieldDouble> ret(MEDCouplingFieldDouble::New(*ft));
2752   ret->setTime(t0,t1,t2); ret->setTimeUnit(tu);
2753   return ret;
2754 }
2755