1 // Copyright (C) 2007-2020 CEA/DEN, EDF R&D
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.
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.
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
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
19 // Author : Anthony Geay (EDF R&D)
21 #include "MEDCouplingCurveLinearMesh.hxx"
22 #include "MEDCouplingPointSet.hxx"
23 #include "MEDCouplingMemArray.hxx"
24 #include "MEDCouplingFieldDouble.hxx"
26 #include "VolSurfUser.txx"
27 #include "PointLocatorAlgos.txx"
34 using namespace MEDCoupling;
36 MEDCouplingCurveLinearMesh::MEDCouplingCurveLinearMesh():_coords(0),_structure(0)
40 MEDCouplingCurveLinearMesh::MEDCouplingCurveLinearMesh(const MEDCouplingCurveLinearMesh& other, bool deepCpy):MEDCouplingStructuredMesh(other,deepCpy),_structure(other._structure)
44 if((const DataArrayDouble *)other._coords)
45 _coords=other._coords->deepCopy();
48 _coords=other._coords;
51 MEDCouplingCurveLinearMesh::~MEDCouplingCurveLinearMesh()
55 MEDCouplingCurveLinearMesh *MEDCouplingCurveLinearMesh::New()
57 return new MEDCouplingCurveLinearMesh;
60 MEDCouplingCurveLinearMesh *MEDCouplingCurveLinearMesh::New(const std::string& meshName)
62 MEDCouplingCurveLinearMesh *ret=new MEDCouplingCurveLinearMesh;
63 ret->setName(meshName);
67 MEDCouplingCurveLinearMesh *MEDCouplingCurveLinearMesh::deepCopy() const
72 MEDCouplingCurveLinearMesh *MEDCouplingCurveLinearMesh::clone(bool recDeepCpy) const
74 return new MEDCouplingCurveLinearMesh(*this,recDeepCpy);
77 void MEDCouplingCurveLinearMesh::updateTime() const
79 if((const DataArrayDouble *)_coords)
80 updateTimeWith(*_coords);
83 std::size_t MEDCouplingCurveLinearMesh::getHeapMemorySizeWithoutChildren() const
85 std::size_t ret(MEDCouplingStructuredMesh::getHeapMemorySizeWithoutChildren());
86 ret+=_structure.capacity()*sizeof(mcIdType);
90 std::vector<const BigMemoryObject *> MEDCouplingCurveLinearMesh::getDirectChildrenWithNull() const
92 std::vector<const BigMemoryObject *> ret;
93 ret.push_back((const DataArrayDouble *)_coords);
98 * This method copyies all tiny strings from other (name and components name).
99 * @throw if other and this have not same mesh type.
101 void MEDCouplingCurveLinearMesh::copyTinyStringsFrom(const MEDCouplingMesh *other)
103 const MEDCouplingCurveLinearMesh *otherC=dynamic_cast<const MEDCouplingCurveLinearMesh *>(other);
105 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::copyTinyStringsFrom : meshes have not same type !");
106 MEDCouplingStructuredMesh::copyTinyStringsFrom(other);
107 if((DataArrayDouble *)_coords && (const DataArrayDouble *)otherC->_coords)
108 _coords->copyStringInfoFrom(*otherC->_coords);
111 bool MEDCouplingCurveLinearMesh::isEqualIfNotWhy(const MEDCouplingMesh *other, double prec, std::string& reason) const
114 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::isEqualIfNotWhy : input other pointer is null !");
115 const MEDCouplingCurveLinearMesh *otherC=dynamic_cast<const MEDCouplingCurveLinearMesh *>(other);
118 reason="mesh given in input is not castable in MEDCouplingCurveLinearMesh !";
121 if(!MEDCouplingStructuredMesh::isEqualIfNotWhy(other,prec,reason))
123 std::ostringstream oss; oss.precision(15);
124 if(((const DataArrayDouble *)_coords && ((const DataArrayDouble *)otherC->_coords)==0) || (((const DataArrayDouble *)_coords)==0 && (const DataArrayDouble *)otherC->_coords))
126 oss << "Only one CurveLinearMesh between the two this and other has its coordinates defined !";
130 if((const DataArrayDouble *)_coords)
132 if(!_coords->isEqualIfNotWhy(*(otherC->_coords),prec,reason))
134 oss << "Coordinates DataArrayDouble of differ :";
135 reason.insert(0,oss.str());
138 if(_structure!=otherC->_structure)
139 { reason="CurveLinearMesh structures differ !"; return false; }
144 bool MEDCouplingCurveLinearMesh::isEqualWithoutConsideringStr(const MEDCouplingMesh *other, double prec) const
146 const MEDCouplingCurveLinearMesh *otherC=dynamic_cast<const MEDCouplingCurveLinearMesh *>(other);
149 if(((const DataArrayDouble *)_coords && ((const DataArrayDouble *)otherC->_coords)==0) || (((const DataArrayDouble *)_coords)==0 && (const DataArrayDouble *)otherC->_coords))
151 if((const DataArrayDouble *)_coords)
153 if(!_coords->isEqualWithoutConsideringStr(*(otherC->_coords),prec))
155 if(_structure!=otherC->_structure)
161 void MEDCouplingCurveLinearMesh::checkDeepEquivalWith(const MEDCouplingMesh *other, int cellCompPol, double prec,
162 DataArrayIdType *&cellCor, DataArrayIdType *&nodeCor) const
164 if(!isEqualWithoutConsideringStr(other,prec))
165 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::checkDeepEquivalWith : Meshes are not the same !");
169 * Nothing is done here (except to check that the other is a MEDCoupling::MEDCouplingCurveLinearMesh instance too).
170 * The user intend that the nodes are the same, so by construction of MEDCoupling::MEDCouplingCurveLinearMesh, \a this and \a other are the same !
172 void MEDCouplingCurveLinearMesh::checkDeepEquivalOnSameNodesWith(const MEDCouplingMesh *other, int cellCompPol, double prec,
173 DataArrayIdType *&cellCor) const
175 if(!isEqualWithoutConsideringStr(other,prec))
176 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::checkDeepEquivalOnSameNodesWith : Meshes are not the same !");
179 void MEDCouplingCurveLinearMesh::checkConsistencyLight() const
181 std::size_t sz=_structure.size(),i=0;
182 mcIdType nbOfNodes=1;
184 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::checkConsistencyLight : structure should have a lgth of size 1 at least !");
185 for(std::vector<mcIdType>::const_iterator it=_structure.begin();it!=_structure.end();it++,i++)
188 { std::ostringstream oss; oss << "MEDCouplingCurveLinearMesh::checkConsistencyLight : At pos #" << i << " of structure value is " << *it << "should be >= 1 !"; throw INTERP_KERNEL::Exception(oss.str().c_str()); }
191 if(!((const DataArrayDouble *)_coords))
192 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::checkConsistencyLight : the array is not set !");
193 if(!_coords->isAllocated())
194 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::checkConsistencyLight : the array is not allocated !");
195 if(_coords->getNumberOfComponents()<1)
196 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::checkConsistencyLight : the array should have >= 1 components !");
197 if(_coords->getNumberOfTuples()!=nbOfNodes)
199 std::ostringstream oss; oss << "MEDCouplingCurveLinearMesh::checkConsistencyLight : structure said that number of nodes should be equal to " << nbOfNodes << " but number of tuples in array is equal to " << _coords->getNumberOfTuples() << " !";
200 throw INTERP_KERNEL::Exception(oss.str().c_str());
204 void MEDCouplingCurveLinearMesh::checkConsistency(double eps) const
206 checkConsistencyLight();
209 mcIdType MEDCouplingCurveLinearMesh::getNumberOfCells() const
211 checkConsistencyLight();
212 return MEDCouplingStructuredMesh::getNumberOfCells();
215 mcIdType MEDCouplingCurveLinearMesh::getNumberOfNodes() const
217 checkConsistencyLight();
218 return MEDCouplingStructuredMesh::getNumberOfNodes();
221 void MEDCouplingCurveLinearMesh::getNodeGridStructure(mcIdType *res) const
223 std::copy(_structure.begin(),_structure.end(),res);
227 * MEDCouplingCurveLinearMesh has the property to define 2 space dimensions. One coming from its coordinates. The other coming from the node structure.
228 * Normally they should be equal ! This method returns the space dimension from coordinates. If the other one is requested call getSpaceDimensionOnNodeStruct.
230 * \sa MEDCouplingStructuredMesh::getSpaceDimensionOnNodeStruct
232 int MEDCouplingCurveLinearMesh::getSpaceDimension() const
234 if(!((const DataArrayDouble *)_coords))
235 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getSpaceDimension : no array set ! impossible to deduce a space dimension !");
236 return int(_coords->getNumberOfComponents());
239 void MEDCouplingCurveLinearMesh::getCoordinatesOfNode(mcIdType nodeId, std::vector<double>& coo) const
241 if(!((const DataArrayDouble *)_coords))
242 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getCoordinatesOfNode : Coordinates not set !");
243 std::size_t nbOfCompo=_coords->getNumberOfComponents();
244 if(nodeId>=0 && nodeId<_coords->getNumberOfTuples())
245 coo.insert(coo.end(),_coords->begin()+nodeId*nbOfCompo,_coords->begin()+(nodeId+1)*nbOfCompo);
247 { std::ostringstream oss; oss << "MEDCouplingCurveLinearMesh::getCoordinatesOfNode : nodeId has to be in [0," << _coords->getNumberOfTuples() << ") !"; throw INTERP_KERNEL::Exception(oss.str().c_str()); }
250 std::string MEDCouplingCurveLinearMesh::simpleRepr() const
252 std::ostringstream ret;
253 ret << "Curve linear mesh with name : \"" << getName() << "\"\n";
254 ret << "Description of mesh : \"" << getDescription() << "\"\n";
256 double tt=getTime(tmpp1,tmpp2);
257 ret << "Time attached to the mesh [unit] : " << tt << " [" << getTimeUnit() << "]\n";
258 ret << "Iteration : " << tmpp1 << " Order : " << tmpp2 << "\n";
259 ret << "The nodal structure of curve linear mesh is : [";
260 std::copy(_structure.begin(),_structure.end(),std::ostream_iterator<int>(ret,",")); ret << "]\n";
261 ret << "The coords array is this : ";
262 if((const DataArrayDouble *)_coords)
263 _coords->reprZipWithoutNameStream(ret);
265 ret << "no array specified !";
269 std::string MEDCouplingCurveLinearMesh::advancedRepr() const
274 const DataArrayDouble *MEDCouplingCurveLinearMesh::getDirectAccessOfCoordsArrIfInStructure() const
279 DataArrayDouble *MEDCouplingCurveLinearMesh::getCoords()
284 const DataArrayDouble *MEDCouplingCurveLinearMesh::getCoords() const
289 void MEDCouplingCurveLinearMesh::setCoords(const DataArrayDouble *coords)
291 if(coords!=(const DataArrayDouble *)_coords)
293 _coords=const_cast<DataArrayDouble *>(coords);
300 void MEDCouplingCurveLinearMesh::setNodeGridStructure(const mcIdType *gridStructBg, const mcIdType *gridStructEnd)
302 std::size_t sz=std::distance(gridStructBg,gridStructEnd);
305 _structure.resize(0);
306 _structure.insert(_structure.end(),gridStructBg,gridStructEnd);
310 std::ostringstream oss; oss << "MEDCouplingCurveLinearMesh::setNodeGridStructure : size of input nodal grid structure (" << sz << ") should be in 1, 2 or 3 !";
311 throw INTERP_KERNEL::Exception(oss.str().c_str());
315 std::vector<mcIdType> MEDCouplingCurveLinearMesh::getNodeGridStructure() const
320 MEDCouplingStructuredMesh *MEDCouplingCurveLinearMesh::buildStructuredSubPart(const std::vector< std::pair<mcIdType,mcIdType> >& cellPart) const
322 checkConsistencyLight();
323 int dim(getSpaceDimension());
324 std::vector<mcIdType> dims(getMeshDimension());
325 if(dim!=ToIdType(cellPart.size()))
327 std::ostringstream oss; oss << "MEDCouplingCurveLinearMesh::buildStructuredSubPart : the space dimension is " << dim << " and cell part size is " << cellPart.size() << " !";
328 throw INTERP_KERNEL::Exception(oss.str().c_str());
330 std::vector< std::pair<mcIdType,mcIdType> > nodePartFormat(cellPart);
331 for(std::vector< std::pair<mcIdType,mcIdType> >::iterator it=nodePartFormat.begin();it!=nodePartFormat.end();it++)
333 MCAuto<DataArrayIdType> tmp1(BuildExplicitIdsFrom(getNodeGridStructure(),nodePartFormat));
334 MCAuto<MEDCouplingCurveLinearMesh> ret(dynamic_cast<MEDCouplingCurveLinearMesh *>(deepCopy()));
335 const DataArrayDouble *coo(ret->getCoords());
338 MCAuto<DataArrayDouble> coo2(coo->selectByTupleIdSafe(tmp1->begin(),tmp1->end()));
339 ret->setCoords(coo2);
341 for(int i=0;i<dim;i++)
343 dims[i]=cellPart[i].second-cellPart[i].first+1;
345 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::buildStructuredSubPart : invalid input cellPart !");
347 ret->setNodeGridStructure(&dims[0],&dims[0]+dims.size());
351 void MEDCouplingCurveLinearMesh::getBoundingBox(double *bbox) const
353 if(!((const DataArrayDouble *)_coords))
354 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getBoundingBox : Coordinates not set !");
355 _coords->getMinMaxPerComponent(bbox);
358 MEDCouplingFieldDouble *MEDCouplingCurveLinearMesh::getMeasureField(bool isAbs) const
360 checkConsistencyLight();
361 int meshDim=getMeshDimension();
362 std::string name="MeasureOfMesh_"; name+=getName();
363 MCAuto<MEDCouplingFieldDouble> field=MEDCouplingFieldDouble::New(ON_CELLS,ONE_TIME);
364 field->setName(name); field->setMesh(const_cast<MEDCouplingCurveLinearMesh *>(this)); field->synchronizeTimeWithMesh();
368 { getMeasureFieldMeshDim3(isAbs,field); return field.retn(); }
370 { getMeasureFieldMeshDim2(isAbs,field); return field.retn(); }
372 { getMeasureFieldMeshDim1(isAbs,field); return field.retn(); }
374 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getMeasureField : mesh dimension must be in [1,2,3] !");
379 * \param [in,out] f field fed with good values.
380 * \sa MEDCouplingCurveLinearMesh::getMeasureField
382 void MEDCouplingCurveLinearMesh::getMeasureFieldMeshDim1(bool isAbs, MEDCouplingFieldDouble *field) const
384 mcIdType nbnodes=getNumberOfNodes();
385 int spaceDim=getSpaceDimension();
386 MCAuto<DataArrayDouble> arr=DataArrayDouble::New(); field->setArray(arr);
388 { arr->alloc(0,1); return; }
391 arr->alloc(nbnodes-1,1);
392 std::transform(_coords->begin()+1,_coords->end(),_coords->begin(),arr->getPointer(),std::minus<double>());
398 MCAuto<DataArrayDouble> tmp=DataArrayDouble::New(); tmp->alloc(nbnodes-1,spaceDim);
399 std::transform(_coords->begin()+spaceDim,_coords->end(),_coords->begin(),tmp->getPointer(),std::minus<double>());
400 MCAuto<DataArrayDouble> tmp2=tmp->magnitude(); field->setArray(tmp2);
405 * \param [in,out] f field fed with good values.
406 * \sa MEDCouplingCurveLinearMesh::getMeasureField
408 void MEDCouplingCurveLinearMesh::getMeasureFieldMeshDim2(bool isAbs, MEDCouplingFieldDouble *field) const
410 mcIdType nbcells=getNumberOfCells();
411 int spaceDim=getSpaceDimension();
412 if(spaceDim!=2 && spaceDim!=3)
413 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getMeasureFieldMeshDim2 : with meshDim 2 only space dimension 2 and 3 are possible !");
414 MCAuto<DataArrayDouble> arr=DataArrayDouble::New(); field->setArray(arr);
415 arr->alloc(nbcells,1);
416 double *pt=arr->getPointer();
417 const double *coords=_coords->begin();
418 mcIdType nX=_structure[0]-1;
420 for(mcIdType i=0;i<nbcells;i++,pt++)
422 mcIdType cy=i/nX,cx=i-cy*nX;
423 conn[0]=cy*(nX+1)+cx; conn[1]=(cy+1)*(nX+1)+cx; conn[2]=(cy+1)*(nX+1)+1+cx; conn[3]=cy*(nX+1)+cx+1;
424 *pt=INTERP_KERNEL::computeVolSurfOfCell2<mcIdType,INTERP_KERNEL::ALL_C_MODE>(INTERP_KERNEL::NORM_QUAD4,conn,4,coords,spaceDim);
431 * \param [in,out] f field fed with good values.
432 * \sa MEDCouplingCurveLinearMesh::getMeasureField
434 void MEDCouplingCurveLinearMesh::getMeasureFieldMeshDim3(bool isAbs, MEDCouplingFieldDouble *field) const
436 mcIdType nbcells=getNumberOfCells();
437 int spaceDim=getSpaceDimension();
439 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getMeasureFieldMeshDim3 : with meshDim 3 only space dimension 3 is possible !");
440 MCAuto<DataArrayDouble> arr=DataArrayDouble::New(); field->setArray(arr);
441 arr->alloc(nbcells,1);
442 double *pt=arr->getPointer();
443 const double *coords=_coords->begin();
444 mcIdType nX=_structure[0]-1,nY=(_structure[0]-1)*(_structure[1]-1);
445 mcIdType nY1=_structure[0]*_structure[1];
447 for(mcIdType i=0;i<nbcells;i++,pt++)
450 mcIdType cy=(i-cz*nY)/nX;
451 mcIdType cx=(i-cz*nY)-nX*cy;
452 conn[0]=cz*nY1+cy*(nX+1)+cx; conn[1]=cz*nY1+(cy+1)*(nX+1)+cx; conn[2]=cz*nY1+(cy+1)*(nX+1)+1+cx; conn[3]=cz*nY1+cy*(nX+1)+cx+1;
453 conn[4]=(cz+1)*nY1+cy*(nX+1)+cx; conn[5]=(cz+1)*nY1+(cy+1)*(nX+1)+cx; conn[6]=(cz+1)*nY1+(cy+1)*(nX+1)+1+cx; conn[7]=(cz+1)*nY1+cy*(nX+1)+cx+1;
454 *pt=INTERP_KERNEL::computeVolSurfOfCell2<mcIdType,INTERP_KERNEL::ALL_C_MODE>(INTERP_KERNEL::NORM_HEXA8,conn,8,coords,3);
461 * not implemented yet !
463 MEDCouplingFieldDouble *MEDCouplingCurveLinearMesh::getMeasureFieldOnNode(bool isAbs) const
465 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getMeasureFieldOnNode : not implemented yet !");
468 MEDCouplingFieldDouble *MEDCouplingCurveLinearMesh::buildOrthogonalField() const
470 if(getMeshDimension()!=2)
471 throw INTERP_KERNEL::Exception("Expected a cmesh with meshDim == 2 !");
472 MEDCouplingFieldDouble *ret=MEDCouplingFieldDouble::New(ON_CELLS,NO_TIME);
473 DataArrayDouble *array=DataArrayDouble::New();
474 mcIdType nbOfCells=getNumberOfCells();
475 array->alloc(nbOfCells,3);
476 double *vals=array->getPointer();
477 for(mcIdType i=0;i<nbOfCells;i++)
478 { vals[3*i]=0.; vals[3*i+1]=0.; vals[3*i+2]=1.; }
479 ret->setArray(array);
487 namespace MEDCoupling
489 template<const int SPACEDIMM>
493 static const int MY_SPACEDIM=SPACEDIMM;
494 static const int MY_MESHDIM=8;
495 typedef mcIdType MyConnType;
496 static const INTERP_KERNEL::NumberingPolicy My_numPol=INTERP_KERNEL::ALL_C_MODE;
498 // useless, but for windows compilation ...
499 const double* getCoordinatesPtr() const { return 0; }
500 const mcIdType* getConnectivityPtr() const { return 0; }
501 const mcIdType* getConnectivityIndexPtr() const { return 0; }
502 INTERP_KERNEL::NormalizedCellType getTypeOfElement(mcIdType) const { return (INTERP_KERNEL::NormalizedCellType)0; }
509 mcIdType MEDCouplingCurveLinearMesh::getCellContainingPoint(const double *pos, double eps) const
511 checkConsistencyLight();
512 int spaceDim=getSpaceDimension();
513 const double *coords=_coords->getConstPointer();
515 _coords->distanceToTuple(pos,pos+spaceDim,nodeId);
517 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getCellContainingPoint : internal problem 1 !");
519 mcIdType nbOfNodes=getNumberOfNodes();
521 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getCellContainingPoint : No cells in this !");
522 switch(getMeshDimension())
529 conn[0]=nodeId-1; conn[1]=nodeId;
530 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<1> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_SEG2,coords,conn,2,eps))
533 if(nodeId<nbOfNodes-1)
535 conn[0]=nodeId; conn[1]=nodeId+1;
536 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<1> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_SEG2,coords,conn,2,eps))
543 mcIdType ny=nodeId/_structure[0],nx=nodeId-ny*_structure[0];
546 conn[0]=nx-1+_structure[0]*(ny-1); conn[1]=nx-1+_structure[0]*ny; conn[2]=nx+_structure[0]*ny; conn[3]=nx+_structure[0]*(ny-1);
547 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<2> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_QUAD4,coords,conn,4,eps))
548 return nx-1+(ny-1)*_structure[0];
550 if(nx<_structure[0]-1 && ny>0)
552 conn[0]=nx+_structure[0]*(ny-1); conn[1]=nx+_structure[0]*ny; conn[2]=nx+1+_structure[0]*ny; conn[3]=nx+1+_structure[0]*(ny-1);
553 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<2> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_QUAD4,coords,conn,4,eps))
554 return nx+(ny-1)*_structure[0];
556 if(nx>0 && ny<_structure[1]-1)
558 conn[0]=nx-1+_structure[0]*ny; conn[1]=nx-1+_structure[0]*(ny+1); conn[2]=nx+_structure[0]*(ny+1); conn[3]=nx+_structure[0]*ny;
559 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<2> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_QUAD4,coords,conn,4,eps))
560 return nx-1+ny*_structure[0];
562 if(nx<_structure[0]-1 && ny<_structure[1]-1)
564 conn[0]=nx+_structure[0]*ny; conn[1]=nx+_structure[0]*(ny+1); conn[2]=nx+1+_structure[0]*(ny+1); conn[3]=nx+1+_structure[0]*ny;
565 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<2> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_QUAD4,coords,conn,4,eps))
566 return nx+ny*_structure[0];
573 mcIdType nY=_structure[0]*_structure[1];
574 mcIdType nz=nodeId/_structure[1]; mcIdType ny=(nodeId-nz*nY)/_structure[0]; mcIdType nx=(nodeId-nz*nY)-_structure[0]*ny;
575 if(nx>0 && ny>0 && nz>0)
577 conn[0]=nx-1+_structure[0]*(ny-1)+nY*(nz-1); conn[1]=nx-1+_structure[2]*ny+nY*(nz-1); conn[2]=nx+_structure[2]*ny+nY*(nz-1); conn[3]=nx+_structure[0]*(ny-1)+nY*(nz-1);
578 conn[4]=nx-1+_structure[0]*(ny-1)+nY*nz; conn[5]=nx-1+_structure[0]*ny+nY*nz; conn[6]=nx+_structure[0]*ny+nY*nz; conn[7]=nx+_structure[0]*(ny-1)+nY*nz;
579 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
580 return nx-1+(ny-1)*_structure[0]+(nz-1)*nY;
582 if(nx<_structure[0]-1 && ny>0 && nz>0)
584 conn[0]=nx+_structure[0]*(ny-1)+nY*(nz-1); conn[1]=nx+_structure[0]*ny+nY*(nz-1); conn[2]=nx+1+_structure[0]*ny+nY*(nz-1); conn[3]=nx+1+_structure[0]*(ny-1)+nY*(nz-1);
585 conn[4]=nx+_structure[0]*(ny-1)+nY*nz; conn[5]=nx+_structure[0]*ny+nY*nz; conn[6]=nx+1+_structure[0]*ny+nY*nz; conn[7]=nx+1+_structure[0]*(ny-1)+nY*nz;
586 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
587 return nx+(ny-1)*_structure[0]+(nz-1)*nY;
589 if(nx>0 && ny<_structure[1]-1 && nz>0)
591 conn[0]=nx-1+_structure[0]*ny+nY*(nz-1); conn[1]=nx-1+_structure[0]*(ny+1)+nY*(nz-1); conn[2]=nx+_structure[0]*(ny+1)+nY*(nz-1); conn[3]=nx+_structure[0]*ny+nY*(nz-1);
592 conn[4]=nx-1+_structure[0]*ny+nY*nz; conn[5]=nx-1+_structure[0]*(ny+1)+nY*nz; conn[6]=nx+_structure[0]*(ny+1)+nY*nz; conn[7]=nx+_structure[0]*ny+nY*nz;
593 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
594 return nx-1+ny*_structure[0]+(nz-1)*nY;
596 if(nx<_structure[0]-1 && ny<_structure[1]-1 && nz>0)
598 conn[0]=nx+_structure[0]*ny+nY*(nz-1); conn[1]=nx+_structure[0]*(ny+1)+nY*(nz-1); conn[2]=nx+1+_structure[0]*(ny+1)+nY*(nz-1); conn[3]=nx+1+_structure[0]*ny+nY*(nz-1);
599 conn[4]=nx+_structure[0]*ny+nY*nz; conn[5]=nx+_structure[0]*(ny+1)+nY*nz; conn[6]=nx+1+_structure[0]*(ny+1)+nY*nz; conn[7]=nx+1+_structure[0]*ny+nY*nz;
600 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
601 return nx+ny*_structure[0]+(nz-1)*nY;
603 if(nx>0 && ny>0 && nz<_structure[2]-1)
605 conn[0]=nx-1+_structure[0]*(ny-1)+nY*(nz-1); conn[1]=nx-1+_structure[2]*ny+nY*(nz-1); conn[2]=nx+_structure[2]*ny+nY*(nz-1); conn[3]=nx+_structure[0]*(ny-1)+nY*(nz-1);
606 conn[4]=nx-1+_structure[0]*(ny-1)+nY*nz; conn[5]=nx-1+_structure[0]*ny+nY*nz; conn[6]=nx+_structure[0]*ny+nY*nz; conn[7]=nx+_structure[0]*(ny-1)+nY*nz;
607 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
608 return nx-1+(ny-1)*_structure[0]+nz*nY;
610 if(nx<_structure[0]-1 && ny>0 && nz<_structure[2]-1)
612 conn[0]=nx+_structure[0]*(ny-1)+nY*(nz-1); conn[1]=nx+_structure[0]*ny+nY*(nz-1); conn[2]=nx+1+_structure[0]*ny+nY*(nz-1); conn[3]=nx+1+_structure[0]*(ny-1)+nY*(nz-1);
613 conn[4]=nx+_structure[0]*(ny-1)+nY*nz; conn[5]=nx+_structure[0]*ny+nY*nz; conn[6]=nx+1+_structure[0]*ny+nY*nz; conn[7]=nx+1+_structure[0]*(ny-1)+nY*nz;
614 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
615 return nx+(ny-1)*_structure[0]+nz*nY;
617 if(nx>0 && ny<_structure[1]-1 && nz<_structure[2]-1)
619 conn[0]=nx-1+_structure[0]*ny+nY*(nz-1); conn[1]=nx-1+_structure[0]*(ny+1)+nY*(nz-1); conn[2]=nx+_structure[0]*(ny+1)+nY*(nz-1); conn[3]=nx+_structure[0]*ny+nY*(nz-1);
620 conn[4]=nx-1+_structure[0]*ny+nY*nz; conn[5]=nx-1+_structure[0]*(ny+1)+nY*nz; conn[6]=nx+_structure[0]*(ny+1)+nY*nz; conn[7]=nx+_structure[0]*ny+nY*nz;
621 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
622 return nx-1+ny*_structure[0]+nz*nY;
624 if(nx<_structure[0]-1 && ny<_structure[1]-1 && nz<_structure[2]-1)
626 conn[0]=nx+_structure[0]*ny+nY*(nz-1); conn[1]=nx+_structure[0]*(ny+1)+nY*(nz-1); conn[2]=nx+1+_structure[0]*(ny+1)+nY*(nz-1); conn[3]=nx+1+_structure[0]*ny+nY*(nz-1);
627 conn[4]=nx+_structure[0]*ny+nY*nz; conn[5]=nx+_structure[0]*(ny+1)+nY*nz; conn[6]=nx+1+_structure[0]*(ny+1)+nY*nz; conn[7]=nx+1+_structure[0]*ny+nY*nz;
628 if(INTERP_KERNEL::PointLocatorAlgos<DummyClsMCL<3> >::isElementContainsPoint(pos,INTERP_KERNEL::NORM_HEXA8,coords,conn,8,eps))
629 return nx+ny*_structure[0]+nz*nY;
634 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getCellContainingPoint : mesh dimension managed are 1, 2 or 3 !");
638 void MEDCouplingCurveLinearMesh::getCellsContainingPoint(const double *pos, double eps, std::vector<mcIdType>& elts) const
640 mcIdType ret(getCellContainingPoint(pos,eps));
644 void MEDCouplingCurveLinearMesh::rotate(const double *center, const double *vector, double angle)
646 if(!((DataArrayDouble *)_coords))
647 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::rotate : no coordinates set !");
648 int spaceDim=getSpaceDimension();
649 mcIdType nbNodes(_coords->getNumberOfTuples());
650 double *coords=_coords->getPointer();
652 DataArrayDouble::Rotate3DAlg(center,vector,angle,nbNodes,coords,coords);
654 DataArrayDouble::Rotate2DAlg(center,angle,nbNodes,coords,coords);
656 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::rotate : invalid space dim for rotation must be 2 or 3");
657 _coords->declareAsNew();
661 void MEDCouplingCurveLinearMesh::translate(const double *vector)
664 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::translate : NULL input point !");
665 if(!((DataArrayDouble *)_coords))
666 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::translate : no coordinates set !");
667 double *coords=_coords->getPointer();
668 mcIdType nbNodes=getNumberOfNodes();
669 int dim=getSpaceDimension();
670 for(mcIdType i=0; i<nbNodes; i++)
671 for(int idim=0; idim<dim;idim++)
672 coords[i*dim+idim]+=vector[idim];
673 _coords->declareAsNew();
677 void MEDCouplingCurveLinearMesh::scale(const double *point, double factor)
680 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::scale : NULL input point !");
681 if(!((DataArrayDouble *)_coords))
682 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::scale : no coordinates set !");
683 double *coords=_coords->getPointer();
684 mcIdType nbNodes(_coords->getNumberOfTuples());
685 std::size_t dim(_coords->getNumberOfComponents());
686 for(mcIdType i=0;i<nbNodes;i++)
688 std::transform(coords+i*dim,coords+(i+1)*dim,point,coords+i*dim,std::minus<double>());
689 std::transform(coords+i*dim,coords+(i+1)*dim,coords+i*dim,std::bind2nd(std::multiplies<double>(),factor));
690 std::transform(coords+i*dim,coords+(i+1)*dim,point,coords+i*dim,std::plus<double>());
692 _coords->declareAsNew();
696 MEDCouplingMesh *MEDCouplingCurveLinearMesh::mergeMyselfWith(const MEDCouplingMesh *other) const
698 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::mergeMyselfWith : not available for CurveLinear Mesh !");
701 DataArrayDouble *MEDCouplingCurveLinearMesh::getCoordinatesAndOwner() const
703 DataArrayDouble *ret=const_cast<DataArrayDouble *>((const DataArrayDouble *)_coords);
709 DataArrayDouble *MEDCouplingCurveLinearMesh::computeCellCenterOfMass() const
711 checkConsistencyLight();
712 MCAuto<DataArrayDouble> ret=DataArrayDouble::New();
713 int spaceDim=getSpaceDimension();
714 int meshDim=getMeshDimension();
715 mcIdType nbOfCells=getNumberOfCells();
716 ret->alloc(nbOfCells,spaceDim);
717 ret->copyStringInfoFrom(*getCoords());
721 { getBarycenterAndOwnerMeshDim3(ret); return ret.retn(); }
723 { getBarycenterAndOwnerMeshDim2(ret); return ret.retn(); }
725 { getBarycenterAndOwnerMeshDim1(ret); return ret.retn(); }
727 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::computeCellCenterOfMass : mesh dimension must be in [1,2,3] !");
731 DataArrayDouble *MEDCouplingCurveLinearMesh::computeIsoBarycenterOfNodesPerCell() const
733 return MEDCouplingCurveLinearMesh::computeCellCenterOfMass();
737 * \param [in,out] bary Barycenter array fed with good values.
738 * \sa MEDCouplingCurveLinearMesh::computeCellCenterOfMass
740 void MEDCouplingCurveLinearMesh::getBarycenterAndOwnerMeshDim3(DataArrayDouble *bary) const
742 mcIdType nbOfCells=getNumberOfCells();
743 double *ptToFill=bary->getPointer();
744 const double *coor=_coords->getConstPointer();
745 if(getSpaceDimension()!=3)
746 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getBarycenterAndOwnerMeshDim3 : with meshDim 3 only space dimension 3 is possible !");
747 mcIdType nX=_structure[0]-1,nY=(_structure[0]-1)*(_structure[1]-1);
748 mcIdType nY1=_structure[0]*_structure[1];
750 for(mcIdType i=0;i<nbOfCells;i++)
753 mcIdType cy=(i-cz*nY)/nX;
754 mcIdType cx=(i-cz*nY)-nX*cy;
755 conn[0]=cz*nY1+cy*(nX+1)+cx+1; conn[1]=cz*nY1+cy*(nX+1)+cx; conn[2]=cz*nY1+(cy+1)*(nX+1)+cx; conn[3]=cz*nY1+(cy+1)*(nX+1)+1+cx;
756 conn[4]=(cz+1)*nY1+cy*(nX+1)+cx+1; conn[5]=(cz+1)*nY1+cy*(nX+1)+cx; conn[6]=(cz+1)*nY1+(cy+1)*(nX+1)+cx; conn[7]=(cz+1)*nY1+(cy+1)*(nX+1)+1+cx;
757 INTERP_KERNEL::computeBarycenter2<mcIdType,INTERP_KERNEL::ALL_C_MODE>(INTERP_KERNEL::NORM_HEXA8,conn,8,coor,3,ptToFill);
763 * \param [in,out] bary Barycenter array fed with good values.
764 * \sa MEDCouplingCurveLinearMesh::computeCellCenterOfMass
766 void MEDCouplingCurveLinearMesh::getBarycenterAndOwnerMeshDim2(DataArrayDouble *bary) const
768 mcIdType nbcells=getNumberOfCells();
769 int spaceDim=getSpaceDimension();
770 double *ptToFill=bary->getPointer();
771 const double *coor=_coords->getConstPointer();
772 if(spaceDim!=2 && spaceDim!=3)
773 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::getBarycenterAndOwnerMeshDim2 : with meshDim 2 only space dimension 2 and 3 are possible !");
774 mcIdType nX=_structure[0]-1;
776 for(mcIdType i=0;i<nbcells;i++)
778 mcIdType cy=i/nX,cx=i-cy*nX;
779 conn[0]=cy*(nX+1)+cx; conn[1]=(cy+1)*(nX+1)+cx; conn[2]=(cy+1)*(nX+1)+1+cx; conn[3]=cy*(nX+1)+cx+1;
780 INTERP_KERNEL::computeBarycenter2<mcIdType,INTERP_KERNEL::ALL_C_MODE>(INTERP_KERNEL::NORM_QUAD4,conn,4,coor,spaceDim,ptToFill);
786 * \param [in,out] bary Barycenter array fed with good values.
787 * \sa MEDCouplingCurveLinearMesh::computeCellCenterOfMass
789 void MEDCouplingCurveLinearMesh::getBarycenterAndOwnerMeshDim1(DataArrayDouble *bary) const
791 int spaceDim=getSpaceDimension();
792 std::transform(_coords->begin()+spaceDim,_coords->end(),_coords->begin(),bary->getPointer(),std::plus<double>());
793 std::transform(bary->begin(),bary->end(),bary->getPointer(),std::bind2nd(std::multiplies<double>(),0.5));
796 void MEDCouplingCurveLinearMesh::renumberCells(const mcIdType *old2NewBg, bool check)
798 throw INTERP_KERNEL::Exception("Functionality of renumbering cell not available for CurveLinear Mesh !");
801 void MEDCouplingCurveLinearMesh::getTinySerializationInformation(std::vector<double>& tinyInfoD, std::vector<mcIdType>& tinyInfo, std::vector<std::string>& littleStrings) const
804 double time=getTime(it,order);
807 littleStrings.clear();
808 littleStrings.push_back(getName());
809 littleStrings.push_back(getDescription());
810 littleStrings.push_back(getTimeUnit());
812 std::vector<std::string> littleStrings2;
813 if((const DataArrayDouble *)_coords)
814 _coords->getTinySerializationStrInformation(littleStrings2);
815 littleStrings.insert(littleStrings.end(),littleStrings2.begin(),littleStrings2.end());
817 tinyInfo.push_back(it);
818 tinyInfo.push_back(order);
819 tinyInfo.push_back(ToIdType(_structure.size()));
820 for(std::vector<mcIdType>::const_iterator itt=_structure.begin();itt!=_structure.end();itt++)
821 tinyInfo.push_back(*itt);
822 std::vector<mcIdType> tinyInfo2;
823 if((const DataArrayDouble *)_coords)
824 _coords->getTinySerializationIntInformation(tinyInfo2);
825 tinyInfo.insert(tinyInfo.end(),tinyInfo2.begin(),tinyInfo2.end());
827 tinyInfoD.push_back(time);
830 void MEDCouplingCurveLinearMesh::resizeForUnserialization(const std::vector<mcIdType>& tinyInfo, DataArrayIdType *a1, DataArrayDouble *a2, std::vector<std::string>& littleStrings) const
832 a1->alloc(tinyInfo[2],1);
833 std::vector<mcIdType> tinyInfo2(tinyInfo.begin()+3+tinyInfo[2],tinyInfo.end());
834 a2->resizeForUnserialization(tinyInfo2);
837 void MEDCouplingCurveLinearMesh::serialize(DataArrayIdType *&a1, DataArrayDouble *&a2) const
839 a1=DataArrayIdType::New();
840 a1->alloc(_structure.size(),1);
841 mcIdType *ptr=a1->getPointer();
842 for(std::vector<mcIdType>::const_iterator it=_structure.begin();it!=_structure.end();it++,ptr++)
845 if((const DataArrayDouble *)_coords)
846 if(_coords->isAllocated())
847 sz=_coords->getNbOfElems();
848 a2=DataArrayDouble::New();
850 if(sz!=0 && (const DataArrayDouble *)_coords)
851 std::copy(_coords->begin(),_coords->end(),a2->getPointer());
854 void MEDCouplingCurveLinearMesh::unserialization(const std::vector<double>& tinyInfoD, const std::vector<mcIdType>& tinyInfo, const DataArrayIdType *a1, DataArrayDouble *a2,
855 const std::vector<std::string>& littleStrings)
857 setName(littleStrings[0]);
858 setDescription(littleStrings[1]);
859 setTimeUnit(littleStrings[2]);
860 setTime(tinyInfoD[0],FromIdType<int>(tinyInfo[0]),FromIdType<int>(tinyInfo[1]));
861 mcIdType sz=tinyInfo[2];
862 _structure.resize(sz);
863 for(mcIdType i=0;i<sz;i++)
864 _structure[i]=tinyInfo[3+i];
865 if(ToIdType(tinyInfo.size())>sz+3)
867 _coords=DataArrayDouble::New();
868 std::vector<mcIdType> tinyInfo2(tinyInfo.begin()+3+sz,tinyInfo.end());
869 _coords->resizeForUnserialization(tinyInfo2);
870 std::copy(a2->begin(),a2->end(),_coords->getPointer());
871 std::vector<std::string> littleStrings2(littleStrings.begin()+3,littleStrings.end());
872 _coords->finishUnserialization(tinyInfo2,littleStrings2);
876 void MEDCouplingCurveLinearMesh::writeVTKLL(std::ostream& ofs, const std::string& cellData, const std::string& pointData, DataArrayByte *byteData) const
878 std::ostringstream extent;
879 std::size_t meshDim=_structure.size();
880 if(meshDim==0 || meshDim>3)
881 throw INTERP_KERNEL::Exception("MEDCouplingCurveLinearMesh::writeVTKLL : meshDim invalid ! must be in [1,2,3] !");
882 for(std::size_t i=0;i<3;i++)
883 { mcIdType val=i<meshDim?_structure[i]-1:0; extent << "0 " << val << " "; }
884 ofs << " <" << getVTKDataSetType() << " WholeExtent=\"" << extent.str() << "\">\n";
885 ofs << " <Piece Extent=\"" << extent.str() << "\">\n";
886 ofs << " <PointData>\n" << pointData << std::endl;
887 ofs << " </PointData>\n";
888 ofs << " <CellData>\n" << cellData << std::endl;
889 ofs << " </CellData>\n";
890 ofs << " <Points>\n";
891 if(getSpaceDimension()==3)
892 _coords->writeVTK(ofs,8,"Points",byteData);
895 MCAuto<DataArrayDouble> coo=_coords->changeNbOfComponents(3,0.);
896 coo->writeVTK(ofs,8,"Points",byteData);
898 ofs << " </Points>\n";
899 ofs << " </Piece>\n";
900 ofs << " </" << getVTKDataSetType() << ">\n";
903 void MEDCouplingCurveLinearMesh::reprQuickOverview(std::ostream& stream) const
905 stream << "MEDCouplingCurveLinearMesh C++ instance at " << this << ". Name : \"" << getName() << "\".";
906 stream << " Nodal structure : [";
907 std::size_t s_size=_structure.size();
908 for(std::size_t i=0;i<s_size;i++)
910 char tmp=(char)((int)('X')+i);
911 stream << " " << tmp << "=" << _structure[i];
916 const DataArrayDouble *coo(_coords);
918 { stream << std::endl << "No coordinates set !"; return ; }
919 if(!coo->isAllocated())
920 { stream << std::endl << "Coordinates set but not allocated !"; return ; }
921 std::size_t nbOfCompo(coo->getNumberOfComponents());
922 std::size_t nbOfCompoExp(-1);
925 nbOfCompoExp=getSpaceDimension();
927 catch(INTERP_KERNEL::Exception&)
930 if(nbOfCompo!=nbOfCompoExp)
931 { stream << std::endl << "Coordinates set and allocated but mismatch number of components !"; return ; }
932 stream << std::endl << "Coordinates ( number of tuples = " << coo->getNumberOfTuples() << " ) : ";
933 coo->reprQuickOverviewData(stream,200);
936 std::string MEDCouplingCurveLinearMesh::getVTKFileExtension() const
938 return std::string("vts");
941 std::string MEDCouplingCurveLinearMesh::getVTKDataSetType() const
943 return std::string("StructuredGrid");