Salome HOME
Synchronize adm files
[modules/med.git] / src / MEDLoader / MEDFileMeshLL.cxx
1 // Copyright (C) 2007-2014  CEA/DEN, EDF R&D
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License, or (at your option) any later version.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19 // Author : Anthony Geay (CEA/DEN)
20
21 #include "MEDFileMeshLL.hxx"
22 #include "MEDFileMesh.hxx"
23 #include "MEDLoaderBase.hxx"
24 #include "MEDFileMeshReadSelector.hxx"
25
26 #include "MEDCouplingUMesh.hxx"
27
28 #include "InterpKernelAutoPtr.hxx"
29 #include "CellModel.hxx"
30
31 #include <set>
32
33 extern med_geometry_type typmai[MED_N_CELL_FIXED_GEO];
34 extern INTERP_KERNEL::NormalizedCellType typmai2[MED_N_CELL_FIXED_GEO];
35 extern med_geometry_type typmainoeud[1];
36
37 using namespace ParaMEDMEM;
38
39 MEDFileMeshL2::MEDFileMeshL2():_name(MED_NAME_SIZE),_description(MED_COMMENT_SIZE),_univ_name(MED_LNAME_SIZE),_dt_unit(MED_LNAME_SIZE)
40 {
41 }
42
43 std::size_t MEDFileMeshL2::getHeapMemorySizeWithoutChildren() const
44 {
45   return 0;
46 }
47
48 std::vector<const BigMemoryObject *> MEDFileMeshL2::getDirectChildrenWithNull() const
49 {
50   return std::vector<const BigMemoryObject *>();
51 }
52
53 int MEDFileMeshL2::GetMeshIdFromName(med_idt fid, const std::string& mname, ParaMEDMEM::MEDCouplingMeshType& meshType, int& dt, int& it, std::string& dtunit1)
54 {
55   med_mesh_type type_maillage;
56   char maillage_description[MED_COMMENT_SIZE+1];
57   char dtunit[MED_LNAME_SIZE+1];
58   med_int spaceDim,dim;
59   char nommaa[MED_NAME_SIZE+1];
60   med_int n=MEDnMesh(fid);
61   bool found=false;
62   int ret=-1;
63   med_sorting_type stype;
64   std::vector<std::string> ms;
65   int nstep;
66   med_axis_type axistype;
67   for(int i=0;i<n && !found;i++)
68     {
69       int naxis=MEDmeshnAxis(fid,i+1);
70       INTERP_KERNEL::AutoPtr<char> axisname=MEDLoaderBase::buildEmptyString(naxis*MED_SNAME_SIZE);
71       INTERP_KERNEL::AutoPtr<char> axisunit=MEDLoaderBase::buildEmptyString(naxis*MED_SNAME_SIZE);
72       MEDmeshInfo(fid,i+1,nommaa,&spaceDim,&dim,&type_maillage,maillage_description,dtunit,&stype,&nstep,&axistype,axisname,axisunit);
73       dtunit1=MEDLoaderBase::buildStringFromFortran(dtunit,sizeof(dtunit));
74       std::string cur=MEDLoaderBase::buildStringFromFortran(nommaa,sizeof(nommaa));
75       ms.push_back(cur);
76       if(cur==mname)
77         {
78           found=true;
79           ret=i+1;
80         }
81     }
82   if(!found)
83     {
84       std::ostringstream oss;
85       oss << "No such meshname (" << mname <<  ") in file ! Must be in : ";
86       std::copy(ms.begin(),ms.end(),std::ostream_iterator<std::string>(oss,", "));
87       throw INTERP_KERNEL::Exception(oss.str().c_str());
88     }
89   switch(type_maillage)
90   {
91     case MED_UNSTRUCTURED_MESH:
92       meshType=UNSTRUCTURED;
93       break;
94     case MED_STRUCTURED_MESH:
95       {
96         med_grid_type gt;
97         MEDmeshGridTypeRd(fid,mname.c_str(),&gt);
98         switch(gt)
99         {
100           case MED_CARTESIAN_GRID:
101             meshType=CARTESIAN;
102             break;
103           case MED_CURVILINEAR_GRID:
104             meshType=CURVE_LINEAR;
105             break;
106           default:
107             throw INTERP_KERNEL::Exception("MEDFileUMeshL2::getMeshIdFromName : unrecognized structured mesh type ! Supported are :\n - cartesian\n - curve linear\n");
108         }
109         break;
110       }
111     default:
112       throw INTERP_KERNEL::Exception("MEDFileUMeshL2::getMeshIdFromName : unrecognized mesh type !");
113   }
114   med_int numdt,numit;
115   med_float dtt;
116   MEDmeshComputationStepInfo(fid,mname.c_str(),1,&numdt,&numit,&dtt);
117   dt=numdt; it=numit;
118   return ret;
119 }
120
121 double MEDFileMeshL2::CheckMeshTimeStep(med_idt fid, const std::string& mName, int nstep, int dt, int it)
122 {
123   bool found=false;
124   med_int numdt,numit;
125   med_float dtt;
126   std::vector< std::pair<int,int> > p(nstep);
127   for(int i=0;i<nstep;i++)
128     {
129       MEDmeshComputationStepInfo(fid,mName.c_str(),i+1,&numdt,&numit,&dtt);
130       p[i]=std::make_pair<int,int>(numdt,numit);
131       found=(numdt==dt) && (numit==numit);
132     }
133   if(!found)
134     {
135       std::ostringstream oss; oss << "No such iteration=" << dt << ",order=" << it << " numbers found for mesh '" << mName << "' ! ";
136       oss << "Possibilities are : ";
137       for(int i=0;i<nstep;i++)
138         oss << "(" << p[i].first << "," << p[i].second << "), ";
139       throw INTERP_KERNEL::Exception(oss.str().c_str());
140     }
141   return dtt;
142 }
143
144 std::vector<std::string> MEDFileMeshL2::getAxisInfoOnMesh(med_idt fid, int mId, const std::string& mName, ParaMEDMEM::MEDCouplingMeshType& meshType, int& nstep, int& Mdim)
145 {
146   med_mesh_type type_maillage;
147   med_int spaceDim;
148   med_sorting_type stype;
149   med_axis_type axistype;
150   int naxis=MEDmeshnAxis(fid,mId);
151   INTERP_KERNEL::AutoPtr<char> nameTmp=MEDLoaderBase::buildEmptyString(MED_NAME_SIZE);
152   INTERP_KERNEL::AutoPtr<char> axisname=MEDLoaderBase::buildEmptyString(naxis*MED_SNAME_SIZE);
153   INTERP_KERNEL::AutoPtr<char> axisunit=MEDLoaderBase::buildEmptyString(naxis*MED_SNAME_SIZE);
154   INTERP_KERNEL::AutoPtr<char> univTmp=MEDLoaderBase::buildEmptyString(MED_LNAME_SIZE);
155   if(MEDmeshInfo(fid,mId,nameTmp,&spaceDim,&Mdim,&type_maillage,_description.getPointer(),_dt_unit.getPointer(),
156       &stype,&nstep,&axistype,axisname,axisunit)!=0)
157     throw INTERP_KERNEL::Exception("A problem has been detected when trying to get info on mesh !");
158   MEDmeshUniversalNameRd(fid,nameTmp,_univ_name.getPointer());
159   switch(type_maillage)
160   {
161     case MED_UNSTRUCTURED_MESH:
162       meshType=UNSTRUCTURED;
163       break;
164     case MED_STRUCTURED_MESH:
165       {
166         med_grid_type gt;
167         MEDmeshGridTypeRd(fid,mName.c_str(),&gt);
168         switch(gt)
169         {
170           case MED_CARTESIAN_GRID:
171             meshType=CARTESIAN;
172             break;
173           case MED_CURVILINEAR_GRID:
174             meshType=CURVE_LINEAR;
175             break;
176           default:
177             throw INTERP_KERNEL::Exception("MEDFileUMeshL2::getAxisInfoOnMesh : unrecognized structured mesh type ! Supported are :\n - cartesian\n - curve linear\n");
178         }
179         break;
180       }
181     default:
182       throw INTERP_KERNEL::Exception("MEDFileUMeshL2::getMeshIdFromName : unrecognized mesh type !");
183   }
184   //
185   std::vector<std::string> infosOnComp(naxis);
186   for(int i=0;i<naxis;i++)
187     {
188       std::string info=MEDLoaderBase::buildUnionUnit(((char *)axisname)+i*MED_SNAME_SIZE,MED_SNAME_SIZE,((char *)axisunit)+i*MED_SNAME_SIZE,MED_SNAME_SIZE);
189       infosOnComp[i]=info;
190     }
191   return infosOnComp;
192 }
193
194 void MEDFileMeshL2::ReadFamiliesAndGrps(med_idt fid, const std::string& meshName, std::map<std::string,int>& fams, std::map<std::string, std::vector<std::string> >& grps, MEDFileMeshReadSelector *mrs)
195 {
196   if(mrs && !(mrs->isCellFamilyFieldReading() || mrs->isNodeFamilyFieldReading()))
197     return ;
198   char nomfam[MED_NAME_SIZE+1];
199   med_int numfam;
200   int nfam=MEDnFamily(fid,meshName.c_str());
201   for(int i=0;i<nfam;i++)
202     {
203       int ngro=MEDnFamilyGroup(fid,meshName.c_str(),i+1);
204       med_int natt=MEDnFamily23Attribute(fid,meshName.c_str(),i+1);
205       INTERP_KERNEL::AutoPtr<med_int> attide=new med_int[natt];
206       INTERP_KERNEL::AutoPtr<med_int> attval=new med_int[natt];
207       INTERP_KERNEL::AutoPtr<char> attdes=new char[MED_COMMENT_SIZE*natt+1];
208       INTERP_KERNEL::AutoPtr<char> gro=new char[MED_LNAME_SIZE*ngro+1];
209       MEDfamily23Info(fid,meshName.c_str(),i+1,nomfam,attide,attval,attdes,&numfam,gro);
210       std::string famName=MEDLoaderBase::buildStringFromFortran(nomfam,MED_NAME_SIZE);
211       fams[famName]=numfam;
212       for(int j=0;j<ngro;j++)
213         {
214           std::string groupname=MEDLoaderBase::buildStringFromFortran(gro+j*MED_LNAME_SIZE,MED_LNAME_SIZE);
215           grps[groupname].push_back(famName);
216         }
217     }
218 }
219
220 void MEDFileMeshL2::WriteFamiliesAndGrps(med_idt fid, const std::string& mname, const std::map<std::string,int>& fams, const std::map<std::string, std::vector<std::string> >& grps, int tooLongStrPol)
221 {
222   for(std::map<std::string,int>::const_iterator it=fams.begin();it!=fams.end();it++)
223     {
224       std::vector<std::string> grpsOfFam;
225       for(std::map<std::string, std::vector<std::string> >::const_iterator it1=grps.begin();it1!=grps.end();it1++)
226         {
227           if(std::find((*it1).second.begin(),(*it1).second.end(),(*it).first)!=(*it1).second.end())
228             grpsOfFam.push_back((*it1).first);
229         }
230       int ngro=grpsOfFam.size();
231       INTERP_KERNEL::AutoPtr<char> groName=MEDLoaderBase::buildEmptyString(MED_LNAME_SIZE*ngro);
232       int i=0;
233       for(std::vector<std::string>::const_iterator it2=grpsOfFam.begin();it2!=grpsOfFam.end();it2++,i++)
234         MEDLoaderBase::safeStrCpy2((*it2).c_str(),MED_LNAME_SIZE-1,groName+i*MED_LNAME_SIZE,tooLongStrPol);
235       INTERP_KERNEL::AutoPtr<char> famName=MEDLoaderBase::buildEmptyString(MED_NAME_SIZE);
236       MEDLoaderBase::safeStrCpy((*it).first.c_str(),MED_NAME_SIZE,famName,tooLongStrPol);
237       int ret=MEDfamilyCr(fid,mname.c_str(),famName,(*it).second,ngro,groName);
238       ret++;
239     }
240 }
241
242 MEDFileUMeshL2::MEDFileUMeshL2()
243 {
244 }
245
246 void MEDFileUMeshL2::loadAll(med_idt fid, int mId, const std::string& mName, int dt, int it, MEDFileMeshReadSelector *mrs)
247 {
248   _name.set(mName.c_str());
249   int nstep;
250   int Mdim;
251   ParaMEDMEM::MEDCouplingMeshType meshType;
252   std::vector<std::string> infosOnComp=getAxisInfoOnMesh(fid,mId,mName.c_str(),meshType,nstep,Mdim);
253   if(nstep==0)
254     return ;
255   if(meshType!=UNSTRUCTURED)
256     throw INTERP_KERNEL::Exception("Invalid mesh type ! You are expected an unstructured one whereas in file it is not an unstructured !");
257   _time=CheckMeshTimeStep(fid,mName,nstep,dt,it);
258   _iteration=dt;
259   _order=it;
260   loadConnectivity(fid,Mdim,mName,dt,it,mrs);//to improve check (dt,it) coherency
261   loadCoords(fid,mId,infosOnComp,mName,dt,it);
262 }
263
264 void MEDFileUMeshL2::loadConnectivity(med_idt fid, int mdim, const std::string& mName, int dt, int it, MEDFileMeshReadSelector *mrs)
265 {
266   _per_type_mesh.resize(1);
267   _per_type_mesh[0].clear();
268   for(int j=0;j<MED_N_CELL_FIXED_GEO;j++)
269     {
270       MEDFileUMeshPerType *tmp=MEDFileUMeshPerType::New(fid,mName.c_str(),dt,it,mdim,typmai[j],typmai2[j],mrs);
271       if(tmp)
272         _per_type_mesh[0].push_back(tmp);
273     }
274   sortTypes();
275 }
276
277 void MEDFileUMeshL2::loadCoords(med_idt fid, int mId, const std::vector<std::string>& infosOnComp, const std::string& mName, int dt, int it)
278 {
279   int spaceDim=infosOnComp.size();
280   med_bool changement,transformation;
281   int nCoords=MEDmeshnEntity(fid,mName.c_str(),dt,it,MED_NODE,MED_NONE,MED_COORDINATE,MED_NO_CMODE,&changement,&transformation);
282   _coords=DataArrayDouble::New();
283   _coords->alloc(nCoords,spaceDim);
284   double *coordsPtr=_coords->getPointer();
285   MEDmeshNodeCoordinateRd(fid,mName.c_str(),dt,it,MED_FULL_INTERLACE,coordsPtr);
286   if(MEDmeshnEntity(fid,mName.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,MED_FAMILY_NUMBER,MED_NODAL,&changement,&transformation)>0)
287     {
288       _fam_coords=DataArrayInt::New();
289       _fam_coords->alloc(nCoords,1);
290       MEDmeshEntityFamilyNumberRd(fid,mName.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,_fam_coords->getPointer());
291     }
292   else
293     _fam_coords=0;
294   if(MEDmeshnEntity(fid,mName.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,MED_NUMBER,MED_NODAL,&changement,&transformation)>0)
295     {
296       _num_coords=DataArrayInt::New();
297       _num_coords->alloc(nCoords,1);
298       MEDmeshEntityNumberRd(fid,mName.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,_num_coords->getPointer());
299     }
300   else
301     _num_coords=0;
302   if(MEDmeshnEntity(fid,mName.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,MED_NAME,MED_NODAL,&changement,&transformation)>0)
303     {
304       _name_coords=DataArrayAsciiChar::New();
305       _name_coords->alloc(nCoords+1,MED_SNAME_SIZE);//not a bug to avoid the memory corruption due to last \0 at the end
306       MEDmeshEntityNameRd(fid,mName.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,_name_coords->getPointer());
307       _name_coords->reAlloc(nCoords);//not a bug to avoid the memory corruption due to last \0 at the end
308     }
309   else
310     _name_coords=0;
311   for(int i=0;i<spaceDim;i++)
312     _coords->setInfoOnComponent(i,infosOnComp[i]);
313 }
314
315 void MEDFileUMeshL2::sortTypes()
316 {
317   std::set<int> mdims;
318   std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> > tmp(_per_type_mesh[0]);
319   _per_type_mesh.clear();
320   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> >::const_iterator it=tmp.begin();it!=tmp.end();it++)
321     mdims.insert((*it)->getDim());
322   if(mdims.empty())
323     return;
324   int mdim=*mdims.rbegin();
325   _per_type_mesh.resize(mdim+1);
326   for(int dim=mdim+1;dim!=0;dim--)
327     {
328       std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> >& elt=_per_type_mesh[mdim+1-dim];
329       for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> >::const_iterator it=tmp.begin();it!=tmp.end();it++)
330         if((*it)->getDim()==dim-1)
331           elt.push_back(*it);
332     }
333   // suppression of contiguous empty levels at the end of _per_type_mesh.
334   int nbOfUselessLev=0;
335   bool isFirst=true;
336   for(std::vector< std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> > >::reverse_iterator it2=_per_type_mesh.rbegin();it2!=_per_type_mesh.rend();it2++)
337     {
338       if((*it2).empty() && isFirst)
339         {
340           nbOfUselessLev++;
341         }
342       else
343         isFirst=false;
344     }
345   _per_type_mesh.resize(_per_type_mesh.size()-nbOfUselessLev);
346 }
347
348 void MEDFileUMeshL2::WriteCoords(med_idt fid, const std::string& mname, int dt, int it, double time, const DataArrayDouble *coords, const DataArrayInt *famCoords, const DataArrayInt *numCoords, const DataArrayAsciiChar *nameCoords)
349 {
350   if(!coords)
351     return ;
352   MEDmeshNodeCoordinateWr(fid,mname.c_str(),dt,it,time,MED_FULL_INTERLACE,coords->getNumberOfTuples(),coords->getConstPointer());
353   if(famCoords)
354     MEDmeshEntityFamilyNumberWr(fid,mname.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,famCoords->getNumberOfTuples(),famCoords->getConstPointer());
355   if(numCoords)
356     MEDmeshEntityNumberWr(fid,mname.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,numCoords->getNumberOfTuples(),numCoords->getConstPointer());
357   if(nameCoords)
358     {
359       if(nameCoords->getNumberOfComponents()!=MED_SNAME_SIZE)
360         {
361           std::ostringstream oss; oss << " MEDFileUMeshL2::WriteCoords : expected a name field on nodes with number of components set to " << MED_SNAME_SIZE;
362           oss << " ! The array has " << nameCoords->getNumberOfComponents() << " components !";
363           throw INTERP_KERNEL::Exception(oss.str().c_str());
364         }
365       MEDmeshEntityNameWr(fid,mname.c_str(),dt,it,MED_NODE,MED_NO_GEOTYPE,nameCoords->getNumberOfTuples(),nameCoords->getConstPointer());
366     }
367 }
368
369 bool MEDFileUMeshL2::isFamDefinedOnLev(int levId) const
370 {
371   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> >::const_iterator it=_per_type_mesh[levId].begin();it!=_per_type_mesh[levId].end();it++)
372     if((*it)->getFam()==0)
373       return false;
374   return true;
375 }
376
377 bool MEDFileUMeshL2::isNumDefinedOnLev(int levId) const
378 {
379   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> >::const_iterator it=_per_type_mesh[levId].begin();it!=_per_type_mesh[levId].end();it++)
380     if((*it)->getNum()==0)
381       return false;
382   return true;
383 }
384
385 bool MEDFileUMeshL2::isNamesDefinedOnLev(int levId) const
386 {
387   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> >::const_iterator it=_per_type_mesh[levId].begin();it!=_per_type_mesh[levId].end();it++)
388     if((*it)->getNames()==0)
389       return false;
390   return true;
391 }
392
393 MEDFileCMeshL2::MEDFileCMeshL2()
394 {
395 }
396
397 void MEDFileCMeshL2::loadAll(med_idt fid, int mId, const std::string& mName, int dt, int it)
398 {
399   _name.set(mName.c_str());
400   int nstep;
401   int Mdim;
402   ParaMEDMEM::MEDCouplingMeshType meshType;
403   std::vector<std::string> infosOnComp=getAxisInfoOnMesh(fid,mId,mName.c_str(),meshType,nstep,Mdim);
404   if(meshType!=CARTESIAN)
405     throw INTERP_KERNEL::Exception("Invalid mesh type ! You are expected a structured one whereas in file it is not a structured !");
406   _time=CheckMeshTimeStep(fid,mName,nstep,dt,it);
407   _iteration=dt;
408   _order=it;
409   //
410   med_grid_type gridtype;
411   MEDmeshGridTypeRd(fid,mName.c_str(),&gridtype);
412   if(gridtype!=MED_CARTESIAN_GRID)
413     throw INTERP_KERNEL::Exception("Invalid structured mesh ! Expected cartesian mesh type !");
414   _cmesh=MEDCouplingCMesh::New();
415   for(int i=0;i<Mdim;i++)
416     {
417       med_data_type dataTypeReq=GetDataTypeCorrespondingToSpaceId(i);
418       med_bool chgt=MED_FALSE,trsf=MED_FALSE;
419       int nbOfElt=MEDmeshnEntity(fid,mName.c_str(),dt,it,MED_NODE,MED_NONE,dataTypeReq,MED_NO_CMODE,&chgt,&trsf);
420       MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> da=DataArrayDouble::New();
421       da->alloc(nbOfElt,1);
422       da->setInfoOnComponent(0,infosOnComp[i]);
423       MEDmeshGridIndexCoordinateRd(fid,mName.c_str(),dt,it,i+1,da->getPointer());
424       _cmesh->setCoordsAt(i,da);
425     }
426 }
427
428 med_data_type MEDFileCMeshL2::GetDataTypeCorrespondingToSpaceId(int id)
429 {
430   switch(id)
431   {
432     case 0:
433       return MED_COORDINATE_AXIS1;
434     case 1:
435       return MED_COORDINATE_AXIS2;
436     case 2:
437       return MED_COORDINATE_AXIS3;
438     default:
439       throw INTERP_KERNEL::Exception("Invalid meshdim detected in Cartesian Grid !");
440   }
441 }
442
443 MEDFileCLMeshL2::MEDFileCLMeshL2()
444 {
445 }
446
447 void MEDFileCLMeshL2::loadAll(med_idt fid, int mId, const std::string& mName, int dt, int it)
448 {
449   _name.set(mName.c_str());
450   int nstep;
451   int Mdim;
452   ParaMEDMEM::MEDCouplingMeshType meshType;
453   std::vector<std::string> infosOnComp=getAxisInfoOnMesh(fid,mId,mName,meshType,nstep,Mdim);
454   if(meshType!=CURVE_LINEAR)
455     throw INTERP_KERNEL::Exception("Invalid mesh type ! You are expected a structured one whereas in file it is not a structured !");
456   _time=CheckMeshTimeStep(fid,mName,nstep,dt,it);
457   _iteration=dt;
458   _order=it;
459   //
460   _clmesh=MEDCouplingCurveLinearMesh::New();
461   INTERP_KERNEL::AutoPtr<int> stGrid=new int[Mdim];
462   MEDmeshGridStructRd(fid,mName.c_str(),dt,it,stGrid);
463   _clmesh->setNodeGridStructure(stGrid,((int *)stGrid)+Mdim);
464   med_bool chgt=MED_FALSE,trsf=MED_FALSE;
465   int nbNodes=MEDmeshnEntity(fid,mName.c_str(),dt,it,MED_NODE,MED_NONE,MED_COORDINATE,MED_NO_CMODE,&chgt,&trsf);
466   MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> da=DataArrayDouble::New();
467   da->alloc(nbNodes,infosOnComp.size());
468   da->setInfoOnComponents(infosOnComp);
469   MEDmeshNodeCoordinateRd(fid,mName.c_str(),dt,it,MED_FULL_INTERLACE,da->getPointer());
470   _clmesh->setCoords(da);
471 }
472
473 MEDFileUMeshPermCompute::MEDFileUMeshPermCompute(const MEDFileUMeshSplitL1* st):_st(st),_mpt_time(0),_num_time(0)
474 {
475 }
476
477 /*!
478  * Warning it returns an instance to deallocate !!!!
479  */
480 MEDFileUMeshPermCompute::operator MEDCouplingUMesh *() const
481 {
482   _st->_num->updateTime();
483   if((MEDCouplingUMesh *)_m==0)
484     {
485       updateTime();
486       _m=static_cast<MEDCouplingUMesh *>(_st->_m_by_types.getUmesh()->deepCpy());
487       _m->renumberCells(_st->_num->getConstPointer(),true);
488       return _m.retn();
489     }
490   else
491     {
492       if(_mpt_time==_st->_m_by_types.getTimeOfThis() && _num_time==_st->_num->getTimeOfThis())
493         return _m.retn();
494       else
495         {
496           updateTime();
497           _m=static_cast<MEDCouplingUMesh *>(_st->_m_by_types.getUmesh()->deepCpy());
498           _m->renumberCells(_st->_num->getConstPointer(),true);
499           return _m.retn();
500         }
501     }
502 }
503
504 void MEDFileUMeshPermCompute::operator=(MEDCouplingUMesh *m)
505 {
506   _m=m;
507 }
508
509 void MEDFileUMeshPermCompute::updateTime() const
510 {
511   _mpt_time=_st->_m_by_types.getTimeOfThis();
512   _num_time=_st->_num->getTimeOfThis();
513 }
514
515 std::vector<const BigMemoryObject *> MEDFileUMeshPermCompute::getDirectChildrenWithNull() const
516 {
517   std::vector<const BigMemoryObject *> ret;
518   ret.push_back((const MEDCouplingUMesh *)_m);
519   return ret;
520 }
521
522 std::size_t MEDFileUMeshPermCompute::getHeapMemorySizeWithoutChildren() const
523 {
524   return sizeof(MEDFileUMeshPermCompute);
525 }
526
527 MEDFileUMeshSplitL1::MEDFileUMeshSplitL1(const MEDFileUMeshSplitL1& other):RefCountObject(other),_m_by_types(other._m_by_types),_fam(other._fam),_num(other._num),_names(other._names),_rev_num(other._rev_num),_m(this)
528 {
529 }
530
531 MEDFileUMeshSplitL1::MEDFileUMeshSplitL1(const MEDFileUMeshL2& l2, const std::string& mName, int id):_m(this)
532 {
533   const std::vector< MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshPerType> >& v=l2.getLev(id);
534   if(v.empty())
535     return;
536   int sz=v.size();
537   std::vector<const MEDCoupling1GTUMesh *> ms(sz);
538   std::vector<const DataArrayInt *> fams(sz),nums(sz);
539   std::vector<const DataArrayChar *> names(sz); 
540   for(int i=0;i<sz;i++)
541     {
542       MEDCoupling1GTUMesh *elt(v[i]->getMesh());
543       MEDCouplingAutoRefCountObjectPtr<DataArrayDouble> tmp2=l2.getCoords();
544       elt->setCoords(tmp2);
545       ms[i]=elt;
546     }
547   _m_by_types.assignParts(ms);
548   if(l2.isFamDefinedOnLev(id))
549     {
550       for(int i=0;i<sz;i++)
551         fams[i]=v[i]->getFam();
552       if(sz!=1)
553         _fam=DataArrayInt::Aggregate(fams);
554       else
555         {
556           fams[0]->incrRef();
557           _fam=const_cast<DataArrayInt *>(fams[0]);
558         }
559     }
560   if(l2.isNumDefinedOnLev(id))
561     {
562       for(int i=0;i<sz;i++)
563         nums[i]=v[i]->getNum();
564       if(sz!=1)
565         _num=DataArrayInt::Aggregate(nums);
566       else
567         {
568           nums[0]->incrRef();
569           _num=const_cast<DataArrayInt *>(nums[0]);
570         }
571       computeRevNum();
572     }
573   if(l2.isNamesDefinedOnLev(id))
574     {
575       for(int i=0;i<sz;i++)
576         names[i]=v[i]->getNames();
577       _names=dynamic_cast<DataArrayAsciiChar *>(DataArrayChar::Aggregate(names));
578     }
579 }
580
581 MEDFileUMeshSplitL1::MEDFileUMeshSplitL1(MEDCoupling1GTUMesh *m):_m(this)
582 {
583   std::vector< const MEDCoupling1GTUMesh * > v(1);
584   v[0]=m;
585   assignParts(v);
586 }
587
588 MEDFileUMeshSplitL1::MEDFileUMeshSplitL1(MEDCouplingUMesh *m):_m(this)
589 {
590   assignMesh(m,true);
591 }
592
593 MEDFileUMeshSplitL1::MEDFileUMeshSplitL1(MEDCouplingUMesh *m, bool newOrOld):_m(this)
594 {
595   assignMesh(m,newOrOld);
596 }
597
598 void MEDFileUMeshSplitL1::setName(const std::string& name)
599 {
600   _m_by_types.setName(name);
601 }
602
603 std::size_t MEDFileUMeshSplitL1::getHeapMemorySizeWithoutChildren() const
604 {
605   return 0;
606 }
607
608 std::vector<const BigMemoryObject *> MEDFileUMeshSplitL1::getDirectChildrenWithNull() const
609 {
610   std::vector<const BigMemoryObject *> ret;
611   ret.push_back(&_m_by_types);
612   ret.push_back(&_m);
613   ret.push_back((const DataArrayInt*)_fam);
614   ret.push_back((const DataArrayInt*)_num);
615   ret.push_back((const DataArrayInt*)_rev_num);
616   ret.push_back((const DataArrayAsciiChar*)_names);
617   return ret;
618 }
619
620 MEDFileUMeshSplitL1 *MEDFileUMeshSplitL1::deepCpy(DataArrayDouble *coords) const
621 {
622   MEDCouplingAutoRefCountObjectPtr<MEDFileUMeshSplitL1> ret=new MEDFileUMeshSplitL1(*this);
623   ret->_m_by_types=_m_by_types.deepCpy(coords);
624   if((const DataArrayInt *)_fam)
625     ret->_fam=_fam->deepCpy();
626   if((const DataArrayInt *)_num)
627     ret->_num=_num->deepCpy();
628   if((const DataArrayInt *)_rev_num)
629     ret->_rev_num=_rev_num->deepCpy();
630   if((const DataArrayAsciiChar *)_names)
631     ret->_names=_names->deepCpy();
632   return ret.retn();
633 }
634
635 bool MEDFileUMeshSplitL1::isEqual(const MEDFileUMeshSplitL1 *other, double eps, std::string& what) const
636 {
637   if(!_m_by_types.isEqual(other->_m_by_types,eps,what))
638     return false;
639   const DataArrayInt *d1=_fam;
640   const DataArrayInt *d2=other->_fam;
641   if((d1==0 && d2!=0) || (d1!=0 && d2==0))
642     {
643       what="Presence of family arr in one sublevel and not in other!";
644       return false;
645     }
646   if(d1)
647     if(!d1->isEqual(*d2))
648       {
649         what="family arr at a sublevel are not deeply equal !";
650         return false;
651       }
652   d1=_num;
653   d2=other->_num;
654   if((d1==0 && d2!=0) || (d1!=0 && d2==0))
655     {
656       what="Presence of cell numbering arr in one sublevel and not in other!";
657       return false;
658     }
659   if(d1)
660     if(!d1->isEqual(*d2))
661       {
662         what="Numbering cell arr at a sublevel are not deeply equal !";
663         return false;
664       }
665   const DataArrayAsciiChar *e1=_names;
666   const DataArrayAsciiChar *e2=other->_names;
667   if((e1==0 && e2!=0) || (e1!=0 && e2==0))
668     {
669       what="Presence of cell names arr in one sublevel and not in other!";
670       return false;
671     }
672   if(e1)
673     if(!e1->isEqual(*e2))
674       {
675         what="Name cell arr at a sublevel are not deeply equal !";
676         return false;
677       }
678   return true;
679 }
680
681 void MEDFileUMeshSplitL1::synchronizeTinyInfo(const MEDFileMesh& master) const
682 {
683   _m_by_types.synchronizeTinyInfo(master);
684 }
685
686 void MEDFileUMeshSplitL1::clearNonDiscrAttributes() const
687 {
688   _m_by_types.clearNonDiscrAttributes();
689 }
690
691 void MEDFileUMeshSplitL1::ClearNonDiscrAttributes(const MEDCouplingMesh *tmp)
692 {
693   if(!tmp)
694     return ;
695   (const_cast<MEDCouplingMesh *>(tmp))->setName("");
696   (const_cast<MEDCouplingMesh *>(tmp))->setDescription("");
697   (const_cast<MEDCouplingMesh *>(tmp))->setTime(0.,-1,-1);
698   (const_cast<MEDCouplingMesh *>(tmp))->setTimeUnit("");
699 }
700
701 void MEDFileUMeshSplitL1::setCoords(DataArrayDouble *coords)
702 {
703   _m_by_types.setCoords(coords);
704 }
705
706 void MEDFileUMeshSplitL1::assignMesh(MEDCouplingUMesh *m, bool newOrOld)
707 {
708   if(newOrOld)
709     {
710       m->incrRef();
711       _m=m;
712       _m_by_types.assignUMesh(dynamic_cast<MEDCouplingUMesh *>(m->deepCpy()));
713       MEDCouplingAutoRefCountObjectPtr<DataArrayInt> da=_m_by_types.getUmesh()->getRenumArrForConsecutiveCellTypesSpec(typmai2,typmai2+MED_N_CELL_FIXED_GEO);
714       if(!da->isIdentity())
715         {
716           _num=da->invertArrayO2N2N2O(m->getNumberOfCells());
717           _m.updateTime();
718           computeRevNum();
719           _m_by_types.getUmesh()->renumberCells(da->getConstPointer(),false);
720         }
721     }
722   else
723     {
724       if(!m->checkConsecutiveCellTypesAndOrder(typmai2,typmai2+MED_N_CELL_FIXED_GEO))
725         throw INTERP_KERNEL::Exception("MEDFileUMeshSplitL1::assignMesh : the mode of mesh setting expects to follow the MED file numbering convention ! it is not the case !");
726       m->incrRef();
727       _m_by_types.assignUMesh(m);
728     }
729   assignCommonPart();
730 }
731
732 void MEDFileUMeshSplitL1::forceComputationOfParts() const
733 {
734   _m_by_types.forceComputationOfPartsFromUMesh();
735 }
736
737 void MEDFileUMeshSplitL1::assignParts(const std::vector< const MEDCoupling1GTUMesh * >& mParts)
738 {
739   _m_by_types.assignParts(mParts);
740   assignCommonPart();
741 }
742
743 void MEDFileUMeshSplitL1::assignCommonPart()
744 {
745   _fam=DataArrayInt::New();
746   _fam->alloc(_m_by_types.getSize(),1);
747   _fam->fillWithValue(0);
748 }
749
750 bool MEDFileUMeshSplitL1::empty() const
751 {
752   return _m_by_types.empty();
753 }
754
755 bool MEDFileUMeshSplitL1::presenceOfOneFams(const std::vector<int>& ids) const
756 {
757   const DataArrayInt *fam=_fam;
758   if(!fam)
759     return false;
760   return fam->presenceOfValue(ids);
761 }
762
763 int MEDFileUMeshSplitL1::getMeshDimension() const
764 {
765   return _m_by_types.getMeshDimension();
766 }
767
768 void MEDFileUMeshSplitL1::simpleRepr(std::ostream& oss) const
769 {
770   std::vector<int> code=_m_by_types.getDistributionOfTypes();
771   int nbOfTypes=code.size()/3;
772   for(int i=0;i<nbOfTypes;i++)
773     {
774       INTERP_KERNEL::NormalizedCellType typ=(INTERP_KERNEL::NormalizedCellType) code[3*i];
775       oss << "    - Number of cells with type " << INTERP_KERNEL::CellModel::GetCellModel(typ).getRepr() << " : " << code[3*i+1] << std::endl;
776     }
777 }
778
779 int MEDFileUMeshSplitL1::getSize() const
780 {
781   return _m_by_types.getSize();
782 }
783
784 MEDCouplingUMesh *MEDFileUMeshSplitL1::getFamilyPart(const int *idsBg, const int *idsEnd, bool renum) const
785 {
786   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> eltsToKeep=_fam->getIdsEqualList(idsBg,idsEnd);
787   MEDCouplingUMesh *m=(MEDCouplingUMesh *)_m_by_types.getUmesh()->buildPartOfMySelf(eltsToKeep->getConstPointer(),eltsToKeep->getConstPointer()+eltsToKeep->getNumberOfTuples(),true);
788   if(renum)
789     return renumIfNeeded(m,eltsToKeep->getConstPointer());
790   return m;
791 }
792
793 DataArrayInt *MEDFileUMeshSplitL1::getFamilyPartArr(const int *idsBg, const int *idsEnd, bool renum) const
794 {
795   MEDCouplingAutoRefCountObjectPtr<DataArrayInt> da=_fam->getIdsEqualList(idsBg,idsEnd);
796   if(renum)
797     return renumIfNeededArr(da);
798   return da.retn();
799 }
800
801 std::vector<INTERP_KERNEL::NormalizedCellType> MEDFileUMeshSplitL1::getGeoTypes() const
802 {
803   return _m_by_types.getGeoTypes();
804 }
805
806 MEDCouplingUMesh *MEDFileUMeshSplitL1::getWholeMesh(bool renum) const
807 {
808   MEDCouplingAutoRefCountObjectPtr<MEDCouplingUMesh> tmp;
809   if(renum && ((const DataArrayInt *)_num))
810     tmp=_m;
811   else
812     { tmp=_m_by_types.getUmesh(); if(tmp) tmp->incrRef(); }
813   return tmp.retn();
814 }
815
816 DataArrayInt *MEDFileUMeshSplitL1::extractFamilyFieldOnGeoType(INTERP_KERNEL::NormalizedCellType gt) const
817 {
818   const DataArrayInt *fam(_fam);
819   if(!fam)
820     return 0;
821   int start(0),stop(0);
822   _m_by_types.getStartStopOfGeoTypeWithoutComputation(gt,start,stop);
823   return fam->selectByTupleId2(start,stop,1);
824 }
825
826 DataArrayInt *MEDFileUMeshSplitL1::extractNumberFieldOnGeoType(INTERP_KERNEL::NormalizedCellType gt) const
827 {
828   const DataArrayInt *num(_num);
829   if(!num)
830     return 0;
831   int start(0),stop(0);
832   _m_by_types.getStartStopOfGeoTypeWithoutComputation(gt,start,stop);
833   return num->selectByTupleId2(start,stop,1);
834 }
835
836 DataArrayInt *MEDFileUMeshSplitL1::getOrCreateAndGetFamilyField()
837 {
838   if((DataArrayInt *)_fam)
839     return _fam;
840   int nbOfTuples=_m_by_types.getSize();
841   _fam=DataArrayInt::New(); _fam->alloc(nbOfTuples,1); _fam->fillWithZero();
842   return _fam;
843 }
844
845 const DataArrayInt *MEDFileUMeshSplitL1::getFamilyField() const
846 {
847   return _fam;
848 }
849
850 const DataArrayInt *MEDFileUMeshSplitL1::getNumberField() const
851 {
852   return _num;
853 }
854
855 const DataArrayInt *MEDFileUMeshSplitL1::getRevNumberField() const
856 {
857   return _rev_num;
858 }
859
860 const DataArrayAsciiChar *MEDFileUMeshSplitL1::getNameField() const
861 {
862   return _names;
863 }
864
865 void MEDFileUMeshSplitL1::eraseFamilyField()
866 {
867   _fam->fillWithZero();
868 }
869
870 /*!
871  * This method ignores _m and _m_by_types.
872  */
873 void MEDFileUMeshSplitL1::setGroupsFromScratch(const std::vector<const MEDCouplingUMesh *>& ms, std::map<std::string,int>& familyIds,
874                                                std::map<std::string, std::vector<std::string> >& groups)
875 {
876   std::vector< DataArrayInt * > corr;
877   _m=MEDCouplingUMesh::FuseUMeshesOnSameCoords(ms,0,corr);
878   std::vector< MEDCouplingAutoRefCountObjectPtr<DataArrayInt> > corrMSafe(corr.begin(),corr.end());
879   std::vector< std::vector<int> > fidsOfGroups;
880   std::vector< const DataArrayInt * > corr2(corr.begin(),corr.end());
881   _fam=DataArrayInt::MakePartition(corr2,((MEDCouplingUMesh *)_m)->getNumberOfCells(),fidsOfGroups);
882   int nbOfCells=((MEDCouplingUMesh *)_m)->getNumberOfCells();
883   std::map<int,std::string> newfams;
884   std::map<int,int> famIdTrad;
885   TraduceFamilyNumber(fidsOfGroups,familyIds,famIdTrad,newfams);
886   int *w=_fam->getPointer();
887   for(int i=0;i<nbOfCells;i++,w++)
888     *w=famIdTrad[*w];
889 }
890
891 void MEDFileUMeshSplitL1::write(med_idt fid, const std::string& mName, int mdim) const
892 {
893   std::vector<MEDCoupling1GTUMesh *> ms(_m_by_types.getParts());
894   int start=0;
895   for(std::vector<MEDCoupling1GTUMesh *>::const_iterator it=ms.begin();it!=ms.end();it++)
896     {
897       int nbCells=(*it)->getNumberOfCells();
898       int end=start+nbCells;
899       MEDCouplingAutoRefCountObjectPtr<DataArrayInt> fam,num;
900       MEDCouplingAutoRefCountObjectPtr<DataArrayAsciiChar> names;
901       if((const DataArrayInt *)_fam)
902         fam=_fam->substr(start,end);
903       if((const DataArrayInt *)_num)
904         num=_num->substr(start,end);
905       if((const DataArrayAsciiChar *)_names)
906         names=static_cast<DataArrayAsciiChar *>(_names->substr(start,end));
907       MEDFileUMeshPerType::Write(fid,mName,mdim,(*it),fam,num,names);
908       start=end;
909     }
910 }
911
912 void MEDFileUMeshSplitL1::renumberNodesInConn(const int *newNodeNumbersO2N)
913 {
914   MEDCouplingUMesh *m(_m_by_types.getUmesh());
915   if(!m)
916     return;
917   m->renumberNodesInConn(newNodeNumbersO2N);
918 }
919
920 void MEDFileUMeshSplitL1::changeFamilyIdArr(int oldId, int newId)
921 {
922   DataArrayInt *arr=_fam;
923   if(arr)
924     arr->changeValue(oldId,newId);
925 }
926
927 void MEDFileUMeshSplitL1::setFamilyArr(DataArrayInt *famArr)
928 {
929   if(!famArr)
930     {
931       _fam=0;
932       return ;
933     }
934   int sz(_m_by_types.getSize());
935   famArr->checkNbOfTuplesAndComp(sz,1,"MEDFileUMeshSplitL1::setFamilyArr : Problem in size of Family arr ! ");
936   famArr->incrRef();
937   _fam=famArr;
938 }
939
940 void MEDFileUMeshSplitL1::setRenumArr(DataArrayInt *renumArr)
941 {
942   if(!renumArr)
943     {
944       _num=0;
945       _rev_num=0;
946       return ;
947     }
948   int sz(_m_by_types.getSize());
949   renumArr->checkNbOfTuplesAndComp(sz,1,"MEDFileUMeshSplitL1::setRenumArr : Problem in size of numbering arr ! ");
950   renumArr->incrRef();
951   _num=renumArr;
952   computeRevNum();
953 }
954
955 void MEDFileUMeshSplitL1::setNameArr(DataArrayAsciiChar *nameArr)
956 {
957   if(!nameArr)
958     {
959       _names=0;
960       return ;
961     }
962   int sz(_m_by_types.getSize());
963   nameArr->checkNbOfTuplesAndComp(sz,MED_SNAME_SIZE,"MEDFileUMeshSplitL1::setNameArr : Problem in size of name arr ! ");
964   nameArr->incrRef();
965   _names=nameArr;
966 }
967
968 MEDCouplingUMesh *MEDFileUMeshSplitL1::Renumber2(const DataArrayInt *renum, MEDCouplingUMesh *m, const int *cellIds)
969 {
970   if(renum==0)
971     return m;
972   if(cellIds==0)
973     m->renumberCells(renum->getConstPointer(),true);
974   else
975     {
976       MEDCouplingAutoRefCountObjectPtr<DataArrayInt> locnum=renum->selectByTupleId(cellIds,cellIds+m->getNumberOfCells());
977       m->renumberCells(locnum->getConstPointer(),true);
978     }
979   return m;
980 }
981
982 MEDCouplingUMesh *MEDFileUMeshSplitL1::renumIfNeeded(MEDCouplingUMesh *m, const int *cellIds) const
983 {
984   return Renumber2(_num,m,cellIds);
985 }
986
987 DataArrayInt *MEDFileUMeshSplitL1::Renumber(const DataArrayInt *renum, const DataArrayInt *da)
988 {
989   if((const DataArrayInt *)renum==0)
990     {
991       da->incrRef();
992       return const_cast<DataArrayInt *>(da);
993     }
994   return renum->selectByTupleId(da->getConstPointer(),da->getConstPointer()+da->getNumberOfTuples());
995 }
996
997 DataArrayInt *MEDFileUMeshSplitL1::renumIfNeededArr(const DataArrayInt *da) const
998 {
999   return Renumber(_num,da);
1000 }
1001
1002 std::vector<int> MEDFileUMeshSplitL1::GetNewFamiliesNumber(int nb, const std::map<std::string,int>& families)
1003 {
1004   int id=-1;
1005   for(std::map<std::string,int>::const_iterator it=families.begin();it!=families.end();it++)
1006     id=std::max(id,(*it).second);
1007   if(id==-1)
1008     id=0;
1009   std::vector<int> ret(nb);
1010   for(int i=1;i<=nb;i++)
1011     ret[i]=id+i;
1012   return ret;
1013 }
1014
1015 void MEDFileUMeshSplitL1::TraduceFamilyNumber(const std::vector< std::vector<int> >& fidsGrps, std::map<std::string,int>& familyIds,
1016                                               std::map<int,int>& famIdTrad, std::map<int,std::string>& newfams)
1017 {
1018   std::set<int> allfids;
1019   //tony
1020 }
1021
1022 void MEDFileUMeshSplitL1::computeRevNum() const
1023 {
1024   int pos;
1025   int maxValue=_num->getMaxValue(pos);
1026   _rev_num=_num->invertArrayN2O2O2N(maxValue+1);
1027 }
1028
1029 //=
1030
1031 MEDFileUMeshAggregateCompute::MEDFileUMeshAggregateCompute():_mp_time(0),_m_time(0)
1032 {
1033 }
1034
1035 void MEDFileUMeshAggregateCompute::setName(const std::string& name)
1036 {
1037   if(_m_time>=_mp_time)
1038     {
1039       MEDCouplingUMesh *um(_m);
1040       if(um)
1041         um->setName(name);
1042     }
1043   if(_mp_time>=_m_time)
1044     {
1045       for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1046         {
1047           MEDCoupling1GTUMesh *tmp(*it);
1048           if(tmp)
1049             tmp->setName(name);
1050         }
1051     }
1052 }
1053
1054 void MEDFileUMeshAggregateCompute::assignParts(const std::vector< const MEDCoupling1GTUMesh * >& mParts)
1055 {
1056   std::size_t sz(mParts.size());
1057   std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> > ret(sz);
1058   for(std::size_t i=0;i<sz;i++)
1059     {
1060       const MEDCoupling1GTUMesh *elt(mParts[i]);
1061       if(!elt)
1062         throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::assignParts : presence of null pointer !");
1063       ret[i]=const_cast<MEDCoupling1GTUMesh *>(elt); elt->incrRef();
1064     }
1065   _m_parts=ret;
1066   _mp_time=std::max(_mp_time,_m_time)+1;
1067   _m=0;
1068 }
1069
1070 void MEDFileUMeshAggregateCompute::assignUMesh(MEDCouplingUMesh *m)
1071 {
1072   _m=m;
1073   _m_parts.clear();
1074   _m_time=std::max(_mp_time,_m_time)+1;
1075 }
1076
1077 MEDCouplingUMesh *MEDFileUMeshAggregateCompute::getUmesh() const
1078 {
1079   if(_mp_time<=_m_time)
1080     return _m;
1081   std::vector< const MEDCoupling1GTUMesh *> mp(_m_parts.size());
1082   std::copy(_m_parts.begin(),_m_parts.end(),mp.begin());
1083   _m=MEDCoupling1GTUMesh::AggregateOnSameCoordsToUMesh(mp);
1084   _m_parts.clear();//to avoid memory peak !
1085   _m_time=_mp_time+1;//+1 is important ! That is to say that only _m is OK not _m_parts because cleared !
1086   return _m;
1087 }
1088
1089 std::vector<INTERP_KERNEL::NormalizedCellType> MEDFileUMeshAggregateCompute::getGeoTypes() const
1090 {
1091   if(_mp_time>=_m_time)
1092     {
1093       std::size_t sz(_m_parts.size());
1094       std::vector<INTERP_KERNEL::NormalizedCellType> ret(sz);
1095       for(std::size_t i=0;i<sz;i++)
1096         ret[i]=_m_parts[i]->getCellModelEnum();
1097       return ret;
1098     }
1099   else
1100     return _m->getAllGeoTypesSorted();
1101 }
1102
1103 std::vector<MEDCoupling1GTUMesh *> MEDFileUMeshAggregateCompute::getPartsWithoutComputation() const
1104 {
1105   if(_mp_time<_m_time)
1106     throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getPartsWithoutComputation : the parts require a computation !");
1107   //
1108   std::vector<MEDCoupling1GTUMesh *> ret(_m_parts.size());
1109   std::size_t i(0);
1110   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_m_parts.begin();it!=_m_parts.end();it++,i++)
1111     {
1112       const MEDCoupling1GTUMesh *elt(*it);
1113       ret[i]=const_cast<MEDCoupling1GTUMesh *>(elt);
1114     }
1115   return ret;
1116 }
1117
1118 std::vector<MEDCoupling1GTUMesh *> MEDFileUMeshAggregateCompute::getParts() const
1119 {
1120   if(_mp_time<_m_time)
1121     forceComputationOfPartsFromUMesh();
1122   return getPartsWithoutComputation();
1123 }
1124
1125 MEDCoupling1GTUMesh *MEDFileUMeshAggregateCompute::getPartWithoutComputation(INTERP_KERNEL::NormalizedCellType gt) const
1126 {
1127   std::vector<MEDCoupling1GTUMesh *> v(getPartsWithoutComputation());
1128   std::size_t sz(v.size());
1129   for(std::size_t i=0;i<sz;i++)
1130     {
1131       if(v[i])
1132         if(v[i]->getCellModelEnum()==gt)
1133           return v[i];
1134     }
1135   throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getPartWithoutComputation : the geometric type is not existing !");
1136 }
1137
1138 void MEDFileUMeshAggregateCompute::getStartStopOfGeoTypeWithoutComputation(INTERP_KERNEL::NormalizedCellType gt, int& start, int& stop) const
1139 {
1140   start=0; stop=0;
1141   std::vector<MEDCoupling1GTUMesh *> v(getPartsWithoutComputation());
1142   std::size_t sz(v.size());
1143   for(std::size_t i=0;i<sz;i++)
1144     {
1145       if(v[i])
1146         {
1147           if(v[i]->getCellModelEnum()==gt)
1148             {
1149               stop=start+v[i]->getNumberOfCells();
1150               return;
1151             }
1152           else
1153             start+=v[i]->getNumberOfCells();
1154         }
1155     }
1156   throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getStartStopOfGeoTypeWithoutComputation : the geometric type is not existing !");
1157 }
1158
1159 void MEDFileUMeshAggregateCompute::forceComputationOfPartsFromUMesh() const
1160 {
1161   const MEDCouplingUMesh *m(_m);
1162   if(!m)
1163     throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::forceComputationOfPartsFromUMesh : null UMesh !");
1164   std::vector<MEDCouplingUMesh *> ms(m->splitByType());
1165   std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCouplingUMesh> > msMSafe(ms.begin(),ms.end());
1166   std::size_t sz(msMSafe.size());
1167   _m_parts.resize(sz);
1168   for(std::size_t i=0;i<sz;i++)
1169     _m_parts[i]=MEDCoupling1GTUMesh::New(ms[i]);
1170   _mp_time=std::max(_mp_time,_m_time);
1171 }
1172
1173 std::size_t MEDFileUMeshAggregateCompute::getTimeOfThis() const
1174 {
1175   if(_mp_time>_m_time)
1176     return getTimeOfParts();
1177   if(_m_time>_mp_time)
1178     return getTimeOfUMesh();
1179   return std::max(getTimeOfParts(),getTimeOfUMesh());
1180 }
1181
1182 std::size_t MEDFileUMeshAggregateCompute::getTimeOfParts() const
1183 {
1184   std::size_t ret(0);
1185   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1186     {
1187       const MEDCoupling1GTUMesh *elt(*it);
1188       if(!elt)
1189         throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getTimeOfParts : null obj in parts !");
1190       ret=std::max(ret,elt->getTimeOfThis());
1191     }
1192   if(ret==0)
1193     throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getTimeOfParts : parts is empty !");
1194   return ret;
1195 }
1196
1197 std::size_t MEDFileUMeshAggregateCompute::getTimeOfUMesh() const
1198 {
1199   const MEDCouplingUMesh *m(_m);
1200   if(!m)
1201     throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getTimeOfUMesh : unmesh is null !");
1202   return m->getTimeOfThis();
1203 }
1204
1205 std::size_t MEDFileUMeshAggregateCompute::getHeapMemorySizeWithoutChildren() const
1206 {
1207   std::size_t ret(_m_parts.size()*sizeof(MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh>));
1208   return ret;
1209 }
1210
1211 std::vector<const BigMemoryObject *> MEDFileUMeshAggregateCompute::getDirectChildrenWithNull() const
1212 {
1213   std::vector<const BigMemoryObject *> ret;
1214   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1215     ret.push_back((const MEDCoupling1GTUMesh *)*it);
1216   ret.push_back((const MEDCouplingUMesh *)_m);
1217   return ret;
1218 }
1219
1220 MEDFileUMeshAggregateCompute MEDFileUMeshAggregateCompute::deepCpy(DataArrayDouble *coords) const
1221 {
1222   MEDFileUMeshAggregateCompute ret;
1223   ret._m_parts.resize(_m_parts.size());
1224   for(std::size_t i=0;i<_m_parts.size();i++)
1225     {
1226       const MEDCoupling1GTUMesh *elt(_m_parts[i]);
1227       if(elt)
1228         {
1229           ret._m_parts[i]=static_cast<ParaMEDMEM::MEDCoupling1GTUMesh*>(elt->deepCpy());
1230           ret._m_parts[i]->setCoords(coords);
1231         }
1232     }
1233   ret._mp_time=_mp_time; ret._m_time=_m_time;
1234   if((const MEDCouplingUMesh *)_m)
1235     {
1236       ret._m=static_cast<ParaMEDMEM::MEDCouplingUMesh*>(_m->deepCpy());
1237       ret._m->setCoords(coords);
1238     }
1239   return ret;
1240 }
1241
1242 bool MEDFileUMeshAggregateCompute::isEqual(const MEDFileUMeshAggregateCompute& other, double eps, std::string& what) const
1243 {
1244   const MEDCouplingUMesh *m1(getUmesh());
1245   const MEDCouplingUMesh *m2(other.getUmesh());
1246   if((m1==0 && m2!=0) || (m1!=0 && m2==0))
1247     {
1248       what="Presence of mesh in one sublevel and not in other!";
1249       return false;
1250     }
1251   if(m1)
1252     {
1253       std::string what2;
1254       if(!m1->isEqualIfNotWhy(m2,eps,what2))
1255         {
1256           what=std::string("meshes at a sublevel are not deeply equal (")+what2+std::string(")!");
1257           return false;
1258         }
1259     }
1260   return true;
1261 }
1262
1263 void MEDFileUMeshAggregateCompute::clearNonDiscrAttributes() const
1264 {
1265   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1266     MEDFileUMeshSplitL1::ClearNonDiscrAttributes(*it);
1267   MEDFileUMeshSplitL1::ClearNonDiscrAttributes(_m);
1268 }
1269
1270 void MEDFileUMeshAggregateCompute::synchronizeTinyInfo(const MEDFileMesh& master) const
1271 {
1272   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1273     {
1274       const MEDCoupling1GTUMesh *tmp(*it);
1275       if(tmp)
1276         {
1277           (const_cast<MEDCoupling1GTUMesh *>(tmp))->setName(master.getName().c_str());
1278           (const_cast<MEDCoupling1GTUMesh *>(tmp))->setDescription(master.getDescription().c_str());
1279           (const_cast<MEDCoupling1GTUMesh *>(tmp))->setTime(master.getTimeValue(),master.getIteration(),master.getOrder());
1280           (const_cast<MEDCoupling1GTUMesh *>(tmp))->setTimeUnit(master.getTimeUnit());
1281         }
1282     }
1283   const MEDCouplingUMesh *m(_m);
1284   if(m)
1285     {
1286       (const_cast<MEDCouplingUMesh *>(m))->setName(master.getName().c_str());
1287       (const_cast<MEDCouplingUMesh *>(m))->setDescription(master.getDescription().c_str());
1288       (const_cast<MEDCouplingUMesh *>(m))->setTime(master.getTimeValue(),master.getIteration(),master.getOrder());
1289       (const_cast<MEDCouplingUMesh *>(m))->setTimeUnit(master.getTimeUnit());
1290     }
1291 }
1292
1293 bool MEDFileUMeshAggregateCompute::empty() const
1294 {
1295   if(_mp_time<_m_time)
1296     return ((const MEDCouplingUMesh *)_m)==0;
1297   //else _mp_time>=_m_time)
1298   return _m_parts.empty();
1299 }
1300
1301 int MEDFileUMeshAggregateCompute::getMeshDimension() const
1302 {
1303   if(_mp_time<_m_time)
1304     {
1305       const MEDCouplingUMesh *m(_m);
1306       if(!m)
1307         throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getMeshDimension : no umesh in this !");
1308       return m->getMeshDimension();
1309     }
1310   else
1311     {
1312       if(_m_parts.empty())
1313         throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getMeshDimension : part mesh is empty !");
1314       const MEDCoupling1GTUMesh *m(_m_parts[0]);
1315       if(!m)
1316         throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getMeshDimension : part mesh contains null instance !");
1317       return m->getMeshDimension();
1318     }
1319 }
1320
1321 std::vector<int> MEDFileUMeshAggregateCompute::getDistributionOfTypes() const
1322 {
1323   if(_mp_time<_m_time)
1324     {
1325       const MEDCouplingUMesh *m(_m);
1326       if(!m)
1327         throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getDistributionOfTypes : no umesh in this !");
1328       return m->getDistributionOfTypes();
1329     }
1330   else
1331     {
1332       std::vector<int> ret;
1333       for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1334         {
1335           const MEDCoupling1GTUMesh *tmp(*it);
1336           if(!tmp)
1337             throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getDistributionOfTypes : part mesh contains null instance !");
1338           std::vector<int> ret0(tmp->getDistributionOfTypes());
1339           ret.insert(ret.end(),ret0.begin(),ret0.end());
1340         }
1341       return ret;
1342     }
1343 }
1344
1345 int MEDFileUMeshAggregateCompute::getSize() const
1346 {
1347   if(_mp_time<_m_time)
1348     {
1349       const MEDCouplingUMesh *m(_m);
1350       if(!m)
1351         throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getSize : no umesh in this !");
1352       return m->getNumberOfCells();
1353     }
1354   else
1355     {
1356       int ret=0;
1357       for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::const_iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1358         {
1359           const MEDCoupling1GTUMesh *m(*it);
1360           if(!m)
1361             throw INTERP_KERNEL::Exception("MEDFileUMeshAggregateCompute::getSize : part mesh contains null instance !");
1362           ret+=m->getNumberOfCells();
1363         }
1364       return ret;
1365     }
1366 }
1367
1368 void MEDFileUMeshAggregateCompute::setCoords(DataArrayDouble *coords)
1369 {
1370   for(std::vector< MEDCouplingAutoRefCountObjectPtr<MEDCoupling1GTUMesh> >::iterator it=_m_parts.begin();it!=_m_parts.end();it++)
1371     {
1372       MEDCoupling1GTUMesh *tmp(*it);
1373       if(tmp)
1374         (*it)->setCoords(coords);
1375     }
1376   MEDCouplingUMesh *m(_m);
1377   if(m)
1378     m->setCoords(coords);
1379 }