Salome HOME
9511658fee03d513d63144ad092e44cc4f714642
[tools/medcoupling.git] / src / INTERP_KERNEL / Geometric2D / InterpKernelGeo2DEdgeArcCircle.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 "InterpKernelGeo2DEdgeArcCircle.hxx"
22 #include "InterpKernelGeo2DEdgeLin.hxx"
23 #include "InterpKernelException.hxx"
24 #include "InterpKernelGeo2DNode.hxx"
25 #include "NormalizedUnstructuredMesh.hxx"
26
27 #include <sstream>
28 #include <algorithm>
29
30 using namespace INTERP_KERNEL;
31
32 ArcCArcCIntersector::ArcCArcCIntersector(const EdgeArcCircle& e1, const EdgeArcCircle& e2):SameTypeEdgeIntersector(e1,e2),_dist(0.)
33 {
34 }
35
36 bool ArcCArcCIntersector::haveTheySameDirection() const
37 {
38   return (getE1().getAngle()>0. &&  getE2().getAngle()>0.) || (getE1().getAngle()<0. &&  getE2().getAngle()<0.);
39 }
40
41 bool ArcCArcCIntersector::areColinears() const
42 {
43   double radiusL,radiusB;
44   double centerL[2],centerB[2];
45   double tmp,cst;
46   return internalAreColinears(getE1(),getE2(),tmp,cst,radiusL,centerL,radiusB,centerB);
47 }
48
49 /*!
50  * Precondition 'start' and 'end' are on the same curve than this.
51  */
52 void ArcCArcCIntersector::getPlacements(Node *start, Node *end, TypeOfLocInEdge& whereStart, TypeOfLocInEdge& whereEnd, MergePoints& commonNode) const
53 {
54   bool obvious1,obvious2;
55   obviousCaseForCurvAbscisse(start,whereStart,commonNode,obvious1);
56   obviousCaseForCurvAbscisse(end,whereEnd,commonNode,obvious2);
57   if(obvious1 && obvious2)
58     return ;
59   double angleInRadStart=getAngle(start);
60   double angleInRadEnd=getAngle(end);
61   if(obvious1 || obvious2)
62     {
63       if(obvious1)
64         {
65           if(EdgeArcCircle::IsIn2Pi(getE1().getAngle0(),getE1().getAngle(),angleInRadEnd))
66             whereEnd=INSIDE;
67           else
68             whereEnd=OUT_AFTER;
69           return ;
70         }
71       else
72         {
73           if(EdgeArcCircle::IsIn2Pi(getE1().getAngle0(),getE1().getAngle(),angleInRadStart))
74             whereStart=INSIDE;
75           else
76             whereStart=OUT_BEFORE;
77           return ;
78         }
79     }
80   if(EdgeArcCircle::IsIn2Pi(getE1().getAngle0(),getE1().getAngle(),angleInRadStart))
81     {
82       whereStart=INSIDE;
83       if(EdgeArcCircle::IsIn2Pi(getE1().getAngle0(),getE1().getAngle(),angleInRadEnd))
84         whereEnd=INSIDE;
85       else
86         whereEnd=OUT_AFTER;
87     }
88   else
89     {//we are out in start.
90       if(EdgeArcCircle::IsIn2Pi(getE1().getAngle0(),getE1().getAngle(),angleInRadEnd))
91         {
92           whereStart=OUT_BEFORE;
93           whereEnd=INSIDE;
94         }
95       else
96         {
97           if(EdgeArcCircle::IsIn2Pi(getE2().getAngle0(),getE2().getAngle(),getE1().getAngle0()))
98             {//_e2 contains stictly _e1
99               whereStart=OUT_BEFORE;
100               whereEnd=OUT_AFTER;
101             }
102           else
103             {//_e2 is outside from _e1
104               whereStart=OUT_BEFORE;
105               whereEnd=OUT_BEFORE;
106             }
107         }
108     }
109 }
110
111 /*!
112  * Return angle between ]-Pi;Pi[
113  */
114 double ArcCArcCIntersector::getAngle(Node *node) const
115 {
116   return EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(((*node)[0]-getE1().getCenter()[0])/getE1().getRadius(),((*node)[1]-getE1().getCenter()[1])/getE1().getRadius());
117 }
118
119 bool ArcCArcCIntersector::internalAreColinears(const EdgeArcCircle& a1, const EdgeArcCircle& a2, double& distBetweenCenters, double& cst,
120                                                double& radiusL, double centerL[2], double& radiusB, double centerB[2])
121 {
122   double angle0L,angleL;
123   double lgth1=fabs(a1.getAngle()*a1.getRadius());
124   double lgth2=fabs(a2.getAngle()*a2.getRadius());
125   if(lgth1<lgth2)
126     {//a1 is the little one ('L') and a2 the big one ('B')
127       a1.getCenter(centerL); radiusL=a1.getRadius(); angle0L=a1.getAngle0(); angleL=a1.getAngle();
128       a2.getCenter(centerB); radiusB=a2.getRadius();
129     }
130   else
131     {
132       a2.getCenter(centerL); radiusL=a2.getRadius(); angle0L=a2.getAngle0(); angleL=a2.getAngle();
133       a1.getCenter(centerB); radiusB=a1.getRadius();
134     }
135   // dividing from the begining by radiusB^2 to keep precision
136   distBetweenCenters=Node::distanceBtw2PtSq(centerL,centerB);
137   cst=distBetweenCenters/(radiusB*radiusB);
138   cst+=radiusL*radiusL/(radiusB*radiusB);
139   return Node::areDoubleEqualsWP(cst,1.,2.);
140 }
141
142 bool ArcCArcCIntersector::areArcsOverlapped(const EdgeArcCircle& a1, const EdgeArcCircle& a2)
143 {
144   double radiusL,radiusB;
145   double centerL[2],centerB[2];
146   double tmp(0.),cst(0.);
147   if(!internalAreColinears(a1,a2,tmp,cst,radiusL,centerL,radiusB,centerB))
148     return false;
149   //
150   double angle0L,angleL;
151   Bounds *merge=a1.getBounds().nearlyAmIIntersectingWith(a2.getBounds());
152   merge->getInterceptedArc(centerL,radiusL,angle0L,angleL);
153   delete merge;
154   //
155   tmp=sqrt(tmp);
156   if(Node::areDoubleEqualsWP(tmp,0.,1/(10*std::max(radiusL,radiusB))))
157     return Node::areDoubleEquals(radiusL,radiusB);
158   double phi=EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect((centerL[0]-centerB[0])/tmp,(centerL[1]-centerB[1])/tmp);
159   double cst2=2*radiusL*tmp/(radiusB*radiusB);
160   double cmpContainer[4];
161   int sizeOfCmpContainer=2;
162   cmpContainer[0]=cst+cst2*cos(phi-angle0L);
163   cmpContainer[1]=cst+cst2*cos(phi-angle0L+angleL);
164   double a=EdgeArcCircle::NormalizeAngle(phi-angle0L);
165   if(EdgeArcCircle::IsIn2Pi(angle0L,angleL,a))
166     cmpContainer[sizeOfCmpContainer++]=cst+cst2;
167   a=EdgeArcCircle::NormalizeAngle(phi-angle0L+M_PI);
168   if(EdgeArcCircle::IsIn2Pi(angle0L,angleL,a))
169     cmpContainer[sizeOfCmpContainer++]=cst-cst2;
170   a=*std::max_element(cmpContainer,cmpContainer+sizeOfCmpContainer);
171   return Node::areDoubleEqualsWP(a,1.,2.);
172 }
173
174 void ArcCArcCIntersector::areOverlappedOrOnlyColinears(const Bounds *whereToFind, bool& obviousNoIntersection, bool& areOverlapped)
175 {
176   _dist=Node::distanceBtw2Pt(getE1().getCenter(),getE2().getCenter());
177   double radius1=getE1().getRadius(); double radius2=getE2().getRadius();
178   if(_dist>radius1+radius2+QUADRATIC_PLANAR::_precision || _dist+std::min(radius1,radius2)+QUADRATIC_PLANAR::_precision<std::max(radius1,radius2))
179     {
180       obviousNoIntersection=true;
181       areOverlapped=false;
182       return ;
183     }
184   if(areArcsOverlapped(getE1(),getE2()))//(Node::areDoubleEquals(_dist,0.) && Node::areDoubleEquals(radius1,radius2))
185     {
186       obviousNoIntersection=false;
187       areOverlapped=true;
188     }
189   else
190     {
191       obviousNoIntersection=false;
192       areOverlapped=false;
193     }
194 }
195
196 std::list< IntersectElement > ArcCArcCIntersector::getIntersectionsCharacteristicVal() const
197 {
198   std::list< IntersectElement > ret;
199   const double *center1=getE1().getCenter();
200   const double *center2=getE2().getCenter();
201   double radius1=getE1().getRadius(); double radius2=getE2().getRadius();
202   double d1_1=(_dist*_dist-radius2*radius2+radius1*radius1)/(2.*_dist);
203   double u[2];//u is normalized vector from center1 to center2.
204   u[0]=(center2[0]-center1[0])/_dist; u[1]=(center2[1]-center1[1])/_dist;
205   double d1_1y=EdgeArcCircle::SafeSqrt(radius1*radius1-d1_1*d1_1);
206   double angleE1=EdgeArcCircle::NormalizeAngle(getE1().getAngle0()+getE1().getAngle());
207   double angleE2=EdgeArcCircle::NormalizeAngle(getE2().getAngle0()+getE2().getAngle());
208   if(!Node::areDoubleEquals(d1_1y,0))
209     {
210       //2 intersections
211       double v1[2],v2[2];
212       v1[0]=u[0]*d1_1-u[1]*d1_1y; v1[1]=u[1]*d1_1+u[0]*d1_1y;
213       v2[0]=u[0]*d1_1+u[1]*d1_1y; v2[1]=u[1]*d1_1-u[0]*d1_1y;
214       Node *node1=new Node(center1[0]+v1[0],center1[1]+v1[1]); node1->declareOn();
215       Node *node2=new Node(center1[0]+v2[0],center1[1]+v2[1]); node2->declareOn();
216       double angle1_1=EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(v1[0]/radius1,v1[1]/radius1);
217       double angle2_1=EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(v2[0]/radius1,v2[1]/radius1);
218       double v3[2],v4[2];
219       v3[0]=center1[0]-center2[0]+v1[0]; v3[1]=center1[1]-center2[1]+v1[1];
220       v4[0]=center1[0]-center2[0]+v2[0]; v4[1]=center1[1]-center2[1]+v2[1];
221       double angle1_2=EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(v3[0]/radius2,v3[1]/radius2);
222       double angle2_2=EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(v4[0]/radius2,v4[1]/radius2);
223       //
224       bool e1_1S=Node::areDoubleEqualsWP(angle1_1,getE1().getAngle0(),radius1);
225       bool e1_1E=Node::areDoubleEqualsWP(angle1_1,angleE1,radius1);
226       bool e1_2S=Node::areDoubleEqualsWP(angle1_2,getE2().getAngle0(),radius1);
227       bool e1_2E=Node::areDoubleEqualsWP(angle1_2,angleE2,radius1);
228       //
229       bool e2_1S=Node::areDoubleEqualsWP(angle2_1,getE1().getAngle0(),radius2);
230       bool e2_1E=Node::areDoubleEqualsWP(angle2_1,angleE1,radius2);
231       bool e2_2S=Node::areDoubleEqualsWP(angle2_2,getE2().getAngle0(),radius2);
232       bool e2_2E=Node::areDoubleEqualsWP(angle2_2,angleE2,radius2);
233       ret.push_back(IntersectElement(angle1_1,angle1_2,e1_1S,e1_1E,e1_2S,e1_2E,node1,_e1,_e2,keepOrder()));
234       ret.push_back(IntersectElement(angle2_1,angle2_2,e2_1S,e2_1E,e2_2S,e2_2E,node2,_e1,_e2,keepOrder()));
235     }
236   else
237     {
238       //tangent intersection
239       double v1[2],v2[2];
240       v1[0]=d1_1*u[0]; v1[1]=d1_1*u[1];
241       v2[0]=center1[0]-center2[0]+v1[0]; v2[1]=center1[1]-center2[1]+v1[1];
242       double angle0_1=EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(v1[0]/radius1,v1[1]/radius1);
243       double angle0_2=EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(v2[0]/radius2,v2[1]/radius2);
244       bool e0_1S=Node::areDoubleEqualsWP(angle0_1,getE1().getAngle0(),radius1);
245       bool e0_1E=Node::areDoubleEqualsWP(angle0_1,angleE1,radius1);
246       bool e0_2S=Node::areDoubleEqualsWP(angle0_2,getE2().getAngle0(),radius2);
247       bool e0_2E=Node::areDoubleEqualsWP(angle0_2,angleE2,radius2);
248       Node *node=new Node(center1[0]+d1_1*u[0],center1[1]+d1_1*u[1]); node->declareOnTangent();
249       ret.push_back(IntersectElement(angle0_1,angle0_2,e0_1S,e0_1E,e0_2S,e0_2E,node,_e1,_e2,keepOrder()));
250     }
251   return ret;
252 }
253 /*double angle0_2;
254   double signDeltaAngle2;
255   double d1_2;
256   if(u[1]<0.)
257   angle0_1=-angle0_1;
258   if(d1_1>=0.)
259   {
260   if(_dist>radius1)
261   {
262   angle0_2=angle0_1+M_PI;
263   signDeltaAngle2=-1.;
264   }
265   else
266   {
267   angle0_2=angle0_1;
268   signDeltaAngle2=1.;
269   }
270   }
271   else
272   {
273   angle0_1+=M_PI;
274   angle0_2=angle0_1;
275   signDeltaAngle2=1.;
276   }
277   angle0_1=NormalizeAngle(angle0_1);
278   angle0_2=NormalizeAngle(angle0_2);
279   double angleE1=NormalizeAngle(getE1().getAngle0()+getE1().getAngle());
280   double angleE2=NormalizeAngle(getE2().getAngle0()+getE2().getAngle());
281   if(!(Node::areDoubleEquals(d1_1,radius1) || Node::areDoubleEquals(d1_1,-radius1)) )
282   {
283   //2 intersections   
284   double deltaAngle1=EdgeArcCircle::SafeAcos(fabs(d1_1)/radius1); //owns to 0;Pi/2 by construction
285   double deltaAngle2=EdgeArcCircle::SafeAcos(fabs(d1_2)/radius2); //owns to 0;Pi/2 by construction
286   double angle1_1=NormalizeAngle(angle0_1+deltaAngle1);// Intersection 1 seen for _e1
287   double angle2_1=NormalizeAngle(angle0_1-deltaAngle1);// Intersection 2 seen for _e1
288   double angle1_2=NormalizeAngle(angle0_2+signDeltaAngle2*deltaAngle2);// Intersection 1 seen for _e2
289   double angle2_2=NormalizeAngle(angle0_2-signDeltaAngle2*deltaAngle2);// Intersection 2 seen for _e2
290   //
291   bool e1_1S=Node::areDoubleEqualsWP(angle1_1,getE1().getAngle0(),radius1);
292   bool e1_1E=Node::areDoubleEqualsWP(angle1_1,angleE1,radius1);
293   bool e1_2S=Node::areDoubleEqualsWP(angle1_2,getE2().getAngle0(),radius1);
294   bool e1_2E=Node::areDoubleEqualsWP(angle1_2,angleE2,radius1);
295   //
296   bool e2_1S=Node::areDoubleEqualsWP(angle2_1,getE1().getAngle0(),radius2);
297   bool e2_1E=Node::areDoubleEqualsWP(angle2_1,angleE1,radius2);
298   bool e2_2S=Node::areDoubleEqualsWP(angle2_2,getE2().getAngle0(),radius2);
299   bool e2_2E=Node::areDoubleEqualsWP(angle2_2,angleE2,radius2);
300   Node *node1=new Node(center1[0]+radius1*cos(angle1_1),center1[0]+radius1*sin(angle1_1)); node1->declareOn();
301   Node *node2=new Node(center1[0]+radius1*cos(angle2_1),center1[0]+radius1*sin(angle2_1)); node2->declareOn();
302   ret.push_back(IntersectElement(angle1_1,angle1_2,e1_1S,e1_1E,e1_2S,e1_2E,node1,_e1,_e2,keepOrder()));
303   ret.push_back(IntersectElement(angle2_1,angle2_2,e2_1S,e2_1E,e2_2S,e2_2E,node2,_e1,_e2,keepOrder()));
304   }
305   else
306   //tangent intersection
307   {
308   bool e0_1S=Node::areDoubleEqualsWP(angle0_1,getE1().getAngle0(),radius1);
309   bool e0_1E=Node::areDoubleEqualsWP(angle0_1,angleE1,radius1);
310   bool e0_2S=Node::areDoubleEqualsWP(angle0_2,getE2().getAngle0(),radius2);
311   bool e0_2E=Node::areDoubleEqualsWP(angle0_2,angleE2,radius2);
312   Node *node=new Node(center1[0]+radius1*cos(angle0_1),center1[0]+radius1*sin(angle0_1)); node->declareOnTangent();
313   ret.push_back(IntersectElement(angle0_1,angle0_2,e0_1S,e0_1E,e0_2S,e0_2E,node,_e1,_e2,keepOrder()));
314   }
315   return ret;*/
316
317 ArcCSegIntersector::ArcCSegIntersector(const EdgeArcCircle& e1, const EdgeLin& e2, bool reverse):CrossTypeEdgeIntersector(e1,e2,reverse)
318 {
319 }
320
321 void ArcCSegIntersector::areOverlappedOrOnlyColinears(const Bounds *whereToFind, bool& obviousNoIntersection, bool& areOverlapped)
322 {
323   areOverlapped=false;//No overlapping by construction
324   const double *center=getE1().getCenter();
325   _dx=(*(_e2.getEndNode()))[0]-(*(_e2.getStartNode()))[0];
326   _dy=(*(_e2.getEndNode()))[1]-(*(_e2.getStartNode()))[1];
327   _drSq=_dx*_dx+_dy*_dy;
328   _cross=
329     ((*(_e2.getStartNode()))[0]-center[0])*((*(_e2.getEndNode()))[1]-center[1])-
330     ((*(_e2.getStartNode()))[1]-center[1])*((*(_e2.getEndNode()))[0]-center[0]);
331   _determinant=getE1().getRadius()*getE1().getRadius()/_drSq-_cross*_cross/(_drSq*_drSq);
332   if(_determinant>-2*QUADRATIC_PLANAR::_precision)//QUADRATIC_PLANAR::_precision*QUADRATIC_PLANAR::_precision*_drSq*_drSq/(2.*_dx*_dx))
333     obviousNoIntersection=false;
334   else
335     obviousNoIntersection=true;   
336 }
337
338 /*!
339  * By construction, no chance that an arc of circle and line to be colinear.
340  */
341 bool ArcCSegIntersector::areColinears() const
342 {
343   return false;
344 }
345
346 void ArcCSegIntersector::getPlacements(Node *start, Node *end, TypeOfLocInEdge& whereStart, TypeOfLocInEdge& whereEnd, MergePoints& commonNode) const
347 {
348   throw Exception("Internal error. Should never been called : no overlapping possible between arc of circle and a segment.");
349 }
350
351 std::list< IntersectElement > ArcCSegIntersector::getIntersectionsCharacteristicVal() const
352 {
353   std::list< IntersectElement > ret;
354   const double *center=getE1().getCenter();
355   if(!(fabs(_determinant)<(2.*QUADRATIC_PLANAR::_precision)))//QUADRATIC_PLANAR::_precision*QUADRATIC_PLANAR::_precision*_drSq*_drSq/(2.*_dx*_dx))
356     {
357       double determinant=EdgeArcCircle::SafeSqrt(_determinant);
358       double x1=(_cross*_dy/_drSq+Node::sign(_dy)*_dx*determinant)+center[0];
359       double y1=(-_cross*_dx/_drSq+fabs(_dy)*determinant)+center[1];
360       Node *intersect1=new Node(x1,y1); intersect1->declareOn();
361       bool i1_1S=_e1.getStartNode()->isEqual(*intersect1);
362       bool i1_1E=_e1.getEndNode()->isEqual(*intersect1);
363       bool i1_2S=_e2.getStartNode()->isEqual(*intersect1);
364       bool i1_2E=_e2.getEndNode()->isEqual(*intersect1);
365       ret.push_back(IntersectElement(getE1().getCharactValue(*intersect1),getE2().getCharactValue(*intersect1),i1_1S,i1_1E,i1_2S,i1_2E,intersect1,_e1,_e2,keepOrder()));
366       //
367       double x2=(_cross*_dy/_drSq-Node::sign(_dy)*_dx*determinant)+center[0];
368       double y2=(-_cross*_dx/_drSq-fabs(_dy)*determinant)+center[1];
369       Node *intersect2=new Node(x2,y2); intersect2->declareOn();
370       bool i2_1S=_e1.getStartNode()->isEqual(*intersect2);
371       bool i2_1E=_e1.getEndNode()->isEqual(*intersect2);
372       bool i2_2S=_e2.getStartNode()->isEqual(*intersect2);
373       bool i2_2E=_e2.getEndNode()->isEqual(*intersect2);
374       ret.push_back(IntersectElement(getE1().getCharactValue(*intersect2),getE2().getCharactValue(*intersect2),i2_1S,i2_1E,i2_2S,i2_2E,intersect2,_e1,_e2,keepOrder()));
375     }
376   else//tangent intersection
377     {
378       double x=(_cross*_dy)/_drSq+center[0];
379       double y=(-_cross*_dx)/_drSq+center[1];
380       Node *intersect3=new Node(x,y); intersect3->declareOnTangent();
381       bool i_1S=_e1.getStartNode()->isEqual(*intersect3);
382       bool i_1E=_e1.getEndNode()->isEqual(*intersect3);
383       bool i_2S=_e2.getStartNode()->isEqual(*intersect3);
384       bool i_2E=_e2.getEndNode()->isEqual(*intersect3);
385       ret.push_back(IntersectElement(_e1.getCharactValue(*intersect3),_e2.getCharactValue(*intersect3),i_1S,i_1E,i_2S,i_2E,intersect3,_e1,_e2,keepOrder()));
386     }
387   return ret;
388 }
389
390 EdgeArcCircle::EdgeArcCircle(std::istream& lineInXfig)
391 {
392   const unsigned NB_OF_SKIP_FIELDS=15;
393   std::string tmpS;
394   for(unsigned i=0;i<NB_OF_SKIP_FIELDS;i++)
395     lineInXfig >> tmpS;
396   _start=new Node(lineInXfig);
397   Node *middle=new Node(lineInXfig);
398   _end=new Node(lineInXfig);
399   GetArcOfCirclePassingThru(*_start,*middle,*_end,_center,_radius,_angle,_angle0);
400   middle->decrRef();
401   updateBounds();
402 }
403
404 EdgeArcCircle::EdgeArcCircle(Node *start, Node *middle, Node *end, bool direction):Edge(start,end, direction)
405 {
406   GetArcOfCirclePassingThru(*_start,*middle,*_end,_center,_radius,_angle,_angle0);
407   updateBounds();
408 }
409
410 EdgeArcCircle::EdgeArcCircle(double sX, double sY, double mX, double mY, double eX, double eY):Edge(sX,sY,eX,eY)
411 {
412   double middle[2]; middle[0]=mX; middle[1]=mY;
413   GetArcOfCirclePassingThru(*_start,middle,*_end,_center,_radius,_angle,_angle0);
414   updateBounds();
415 }
416
417 /*!
418  * @param angle0 in ]-Pi;Pi[
419  * @param deltaAngle in ]-2.*Pi;2.*Pi[
420  */
421 EdgeArcCircle::EdgeArcCircle(Node *start, Node *end, const double *center, double radius, double angle0, double deltaAngle, bool direction):Edge(start,end,direction),_angle(deltaAngle),
422                                                                                                                                             _angle0(angle0),_radius(radius)
423 {
424   _center[0]=center[0];
425   _center[1]=center[1];
426   updateBounds();
427 }
428
429 void EdgeArcCircle::changeMiddle(Node *newMiddle)
430 {
431   GetArcOfCirclePassingThru(*_start,*newMiddle,*_end,_center,_radius,_angle,_angle0);
432   updateBounds();
433 }
434
435 Edge *EdgeArcCircle::buildEdgeLyingOnMe(Node *start, Node *end, bool direction) const
436 {
437   double sx=((*start)[0]-_center[0])/_radius;
438   double sy=((*start)[1]-_center[1])/_radius;
439   double ex=((*end)[0]-_center[0])/_radius;
440   double ey=((*end)[1]-_center[1])/_radius;
441   double angle0=GetAbsoluteAngleOfNormalizedVect(direction?sx:ex,direction?sy:ey);
442   double deltaAngle=GetAbsoluteAngleOfNormalizedVect(sx*ex+sy*ey,sx*ey-sy*ex);
443   if(deltaAngle>0. && _angle<0.)
444     deltaAngle-=2.*M_PI;
445   else if(deltaAngle<0. && _angle>0.)
446     deltaAngle+=2.*M_PI;
447   deltaAngle=direction?deltaAngle:-deltaAngle;
448   return new EdgeArcCircle(start,end,_center,_radius,angle0,deltaAngle,direction);
449 }
450
451 void EdgeArcCircle::applySimilarity(double xBary, double yBary, double dimChar)
452 {
453   Edge::applySimilarity(xBary,yBary,dimChar);
454   _radius/=dimChar;
455   _center[0]=(_center[0]-xBary)/dimChar;
456   _center[1]=(_center[1]-yBary)/dimChar;
457 }
458
459 void EdgeArcCircle::unApplySimilarity(double xBary, double yBary, double dimChar)
460 {
461   Edge::unApplySimilarity(xBary,yBary,dimChar);
462   _radius*=dimChar;
463   _center[0]=_center[0]*dimChar+xBary;
464   _center[1]=_center[1]*dimChar+yBary;
465 }
466
467 /*!
468  * 'eps' is expected to be > 0.
469  * 'conn' is of size 3. conn[0] is start id, conn[1] is end id and conn[2] is middle id.
470  * 'offset' is typically the number of nodes already existing in global 2D curve mesh. Additionnal coords 'addCoo' ids will be put after the already existing.
471  */
472 void EdgeArcCircle::tesselate(const int *conn, int offset, double eps, std::vector<int>& newConn, std::vector<double>& addCoo) const
473 {
474   newConn.push_back(INTERP_KERNEL::NORM_POLYL);
475   int nbOfSubDiv=(int)(fabs(_angle)/eps);
476   if(nbOfSubDiv<=2)
477     {
478       newConn.push_back(conn[0]); newConn.push_back(conn[2]); newConn.push_back(conn[1]);
479       return ;
480     }
481   double signOfAngle=_angle>0.?1.:-1.;
482   int offset2=offset+((int)addCoo.size())/2;
483   newConn.push_back(conn[0]);
484   for(int i=1;i<nbOfSubDiv;i++,offset2++)
485     {
486       double angle=_angle0+i*eps*signOfAngle;
487       newConn.push_back(offset2);
488       addCoo.push_back(_center[0]+_radius*cos(angle)); addCoo.push_back(_center[1]+_radius*sin(angle));
489     }
490   newConn.push_back(conn[1]);
491 }
492
493 EdgeArcCircle *EdgeArcCircle::BuildFromNodes(Node *start, Node *middle, Node *end)
494 {
495   EdgeLin *e1,*e2;
496   e1=new EdgeLin(start,middle);
497   e2=new EdgeLin(middle,end);
498   SegSegIntersector inters(*e1,*e2);
499   bool colinearity=inters.areColinears();
500   delete e1; delete e2;
501   if(colinearity)
502     {
503       start->decrRef(); middle->decrRef(); end->decrRef();
504       return 0;
505     }
506   else
507     {
508       EdgeArcCircle *ret=new EdgeArcCircle(start,middle,end);
509       start->decrRef(); middle->decrRef(); end->decrRef();
510       return ret;
511     }
512 }
513
514 /*!
515  * Given an \b NON normalized vector 'vect', returns its norm 'normVect' and its
516  * angle in ]-Pi,Pi] relative to Ox axe.
517  */
518 double EdgeArcCircle::GetAbsoluteAngle(const double *vect, double& normVect)
519 {
520   normVect=Node::norm(vect);
521   return GetAbsoluteAngleOfNormalizedVect(vect[0]/normVect,vect[1]/normVect);
522 }
523
524 /*!
525  * Given a \b normalized vector defined by (ux,uy) returns its angle in ]-Pi;Pi].
526  * So before using this method ux*ux+uy*uy should as much as possible close to 1.
527  * This methods is quite time consuming in order to keep as much as possible precision.
528  * It is NOT ALWAYS possible to do that only in one call of acos. Sometimes call to asin is necessary
529  * due to imperfection of acos near 0. and Pi (cos x ~ 1-x*x/2.)
530  */
531 double EdgeArcCircle::GetAbsoluteAngleOfNormalizedVect(double ux, double uy)
532 {
533   //When arc is lower than 0.707 Using Asin 
534   if(fabs(ux)<0.707)
535     {
536       double ret=SafeAcos(ux);
537       if(uy>0.)
538         return ret;
539       ret=-ret;
540       return ret;
541     }
542   else
543     {
544       double ret=SafeAsin(uy);
545       if(ux>0.)
546         return ret;
547       if(ret>0.)
548         return M_PI-ret;
549       else
550         return -M_PI-ret;
551     }
552 }
553
554 void EdgeArcCircle::GetArcOfCirclePassingThru(const double *start, const double *middle, const double *end, 
555                                               double *center, double& radius, double& angleInRad, double& angleInRad0)
556 {
557   double delta=(middle[0]-start[0])*(end[1]-middle[1])-(end[0]-middle[0])*(middle[1]-start[1]);
558   double b1=(middle[1]*middle[1]+middle[0]*middle[0]-start[0]*start[0]-start[1]*start[1])/2;
559   double b2=(end[1]*end[1]+end[0]*end[0]-middle[0]*middle[0]-middle[1]*middle[1])/2;
560   center[0]=((end[1]-middle[1])*b1+(start[1]-middle[1])*b2)/delta;
561   center[1]=((middle[0]-end[0])*b1+(middle[0]-start[0])*b2)/delta;
562   radius=SafeSqrt((start[0]-center[0])*(start[0]-center[0])+(start[1]-center[1])*(start[1]-center[1]));
563   angleInRad0=GetAbsoluteAngleOfNormalizedVect((start[0]-center[0])/radius,(start[1]-center[1])/radius);
564   double angleInRadM=GetAbsoluteAngleOfNormalizedVect((middle[0]-center[0])/radius,(middle[1]-center[1])/radius);
565   angleInRad=GetAbsoluteAngleOfNormalizedVect(((start[0]-center[0])*(end[0]-center[0])+(start[1]-center[1])*(end[1]-center[1]))/(radius*radius),
566                                               ((start[0]-center[0])*(end[1]-center[1])-(start[1]-center[1])*(end[0]-center[0]))/(radius*radius));
567   if(IsAngleNotIn(angleInRad0,angleInRad,angleInRadM))
568     angleInRad=angleInRad<0?2*M_PI+angleInRad:angleInRad-2*M_PI;
569 }
570
571 void EdgeArcCircle::dumpInXfigFile(std::ostream& stream, bool direction, int resolution, const Bounds& box) const
572 {
573   stream << "5 1 0 1 ";
574   fillXfigStreamForLoc(stream);
575   stream << " 7 50 -1 -1 0.000 0 ";
576   if( (direction && (-_angle)>=0) || (!direction && (-_angle)<0))
577     stream << '0';//'0'
578   else
579     stream << '1';//'1'
580   stream << " 1 0 ";
581   stream << box.fitXForXFigD(_center[0],resolution) << " " << box.fitYForXFigD(_center[1],resolution) << " ";
582   direction?_start->dumpInXfigFile(stream,resolution,box):_end->dumpInXfigFile(stream,resolution,box);
583   Node *middle=buildRepresentantOfMySelf();
584   middle->dumpInXfigFile(stream,resolution,box);
585   middle->decrRef();
586   direction?_end->dumpInXfigFile(stream,resolution,box):_start->dumpInXfigFile(stream,resolution,box);
587   stream << std::endl << "1 1 2.00 120.00 180.00" << std::endl;
588 }
589
590 void EdgeArcCircle::update(Node *m)
591 {
592   GetArcOfCirclePassingThru(*_start,*m,*_end,_center,_radius,_angle,_angle0);
593   updateBounds();
594 }
595
596 /*!
597  * This methods computes :
598  * \f[
599  * \int_{Current Edge} -ydx
600  * \f]
601  */
602 double EdgeArcCircle::getAreaOfZone() const
603 {
604   return -_radius*_radius*(sin(_angle)-_angle)/2.+((*_start)[0]-(*_end)[0])*((*_start)[1]+(*_end)[1])/2.;
605 }
606
607 double EdgeArcCircle::getCurveLength() const
608 {
609   return fabs(_angle*_radius);
610 }
611
612 void EdgeArcCircle::getBarycenter(double *bary) const
613 {
614   bary[0]=_center[0]+_radius*cos(_angle0+_angle/2.);
615   bary[1]=_center[1]+_radius*sin(_angle0+_angle/2.);
616 }
617
618 /*!
619  * \f[
620  * bary[0]=\int_{Current Edge} -yxdx
621  * \f]
622  * \f[
623  * bary[1]=\int_{Current Edge} -\frac{y^{2}}{2}dx
624  * \f]
625  * To compute these 2 expressions in this class we have :
626  * \f[
627  * x=x_{0}+Radius \cdot cos(\theta)
628  * \f]
629  * \f[
630  * y=y_{0}+Radius \cdot sin(\theta)
631  * \f]
632  * \f[
633  * dx=-Radius \cdot sin(\theta) \cdot d\theta
634  * \f]
635  */
636 void EdgeArcCircle::getBarycenterOfZone(double *bary) const
637 {
638   double x0=_center[0];
639   double y0=_center[1];
640   double angle1=_angle0+_angle;
641   double tmp1=sin(angle1);
642   double tmp0=sin(_angle0);
643   double tmp2=_radius*_radius*_radius;
644   double tmp3=cos(angle1);
645   double tmp4=cos(_angle0);
646   bary[0]=_radius*x0*y0*(tmp4-tmp3)+_radius*_radius*(y0*(cos(2*_angle0)-cos(2*angle1))/4.+
647                                                      x0*(_angle/2.+(sin(2.*_angle0)-sin(2.*angle1))/4.))
648     +tmp2*(tmp1*tmp1*tmp1-tmp0*tmp0*tmp0)/3.;
649   bary[1]=y0*y0*_radius*(tmp4-tmp3)/2.+_radius*_radius*y0*(_angle/2.+(sin(2.*_angle0)-sin(2.*angle1))/4.)
650     +tmp2*(tmp4-tmp3+(tmp3*tmp3*tmp3-tmp4*tmp4*tmp4)/3.)/2.;
651 }
652
653 void EdgeArcCircle::getMiddleOfPoints(const double *p1, const double *p2, double *mid) const
654 {
655   double dx1((p1[0]-_center[0])/_radius),dy1((p1[1]-_center[1])/_radius),dx2((p2[0]-_center[0])/_radius),dy2((p2[1]-_center[1])/_radius);
656   double angle1(GetAbsoluteAngleOfNormalizedVect(dx1,dy1)),angle2(GetAbsoluteAngleOfNormalizedVect(dx2,dy2));
657   //
658   double myDelta1(angle1-_angle0),myDelta2(angle2-_angle0);
659   if(_angle>0.)
660     { myDelta1=myDelta1>=0.?myDelta1:myDelta1+2.*M_PI; myDelta2=myDelta2>=0.?myDelta2:myDelta2+2.*M_PI; }
661   else
662     { myDelta1=myDelta1<=0.?myDelta1:myDelta1-2.*M_PI; myDelta2=myDelta2<=0.?myDelta2:myDelta2-2.*M_PI; }
663   ////
664   mid[0]=_center[0]+_radius*cos(_angle0+(myDelta1+myDelta2)/2.);
665   mid[1]=_center[1]+_radius*sin(_angle0+(myDelta1+myDelta2)/2.);
666 }
667
668 /*!
669  * Characteristic value used is angle in ]_Pi;Pi[ from axe 0x.
670  */
671 bool EdgeArcCircle::isIn(double characterVal) const
672 {
673   return IsIn2Pi(_angle0,_angle,characterVal);
674 }
675
676 Node *EdgeArcCircle::buildRepresentantOfMySelf() const
677 {
678   return new Node(_center[0]+_radius*cos(_angle0+_angle/2.),_center[1]+_radius*sin(_angle0+_angle/2.));
679 }
680
681 /*!
682  * Characteristic value used is angle in ]_Pi;Pi[ from axe 0x.
683  * 'val1' and 'val2' have been detected previously as owning to this.
684  */
685 bool EdgeArcCircle::isLower(double val1, double val2) const
686 {
687   double myDelta1=val1-_angle0;
688   double myDelta2=val2-_angle0;
689   if(_angle>0.)
690     {
691       myDelta1=myDelta1>-(_radius*QUADRATIC_PLANAR::_precision)?myDelta1:myDelta1+2.*M_PI;//in some cases val1 or val2 are so close to angle0 that myDelta is close to 0. but negative.
692       myDelta2=myDelta2>-(_radius*QUADRATIC_PLANAR::_precision)?myDelta2:myDelta2+2.*M_PI;
693       return myDelta1<myDelta2;
694     }
695   else
696     {
697       myDelta1=myDelta1<(_radius*QUADRATIC_PLANAR::_precision)?myDelta1:myDelta1-2.*M_PI;
698       myDelta2=myDelta2<(_radius*QUADRATIC_PLANAR::_precision)?myDelta2:myDelta2-2.*M_PI;
699       return myDelta2<myDelta1;
700     }
701 }
702
703 /*!
704  * For Arc circle the caract value is angle with Ox between -Pi and Pi.
705  */
706 double EdgeArcCircle::getCharactValue(const Node& node) const
707 {
708   double dx=(node[0]-_center[0])/_radius;
709   double dy=(node[1]-_center[1])/_radius;
710   return GetAbsoluteAngleOfNormalizedVect(dx,dy);
711 }
712
713 double EdgeArcCircle::getCharactValueBtw0And1(const Node& node) const
714 {
715   double dx=(node[0]-_center[0])/_radius;
716   double dy=(node[1]-_center[1])/_radius;
717   double angle=GetAbsoluteAngleOfNormalizedVect(dx,dy);
718   //
719   double myDelta=angle-_angle0;
720   if(_angle>0.)
721     myDelta=myDelta>=0.?myDelta:myDelta+2.*M_PI;
722   else
723     myDelta=myDelta<=0.?myDelta:myDelta-2.*M_PI;
724   return myDelta/_angle;
725 }
726
727 double EdgeArcCircle::getDistanceToPoint(const double *pt) const
728 {
729   double angle=Node::computeAngle(_center,pt);
730   if(IsIn2Pi(_angle0,_angle,angle))
731     return fabs(Node::distanceBtw2Pt(_center,pt)-_radius);
732   else
733     {
734       double dist1=Node::distanceBtw2Pt(*_start,pt);
735       double dist2=Node::distanceBtw2Pt(*_end,pt);
736       return std::min(dist1,dist2);
737     }
738 }
739
740 bool EdgeArcCircle::isNodeLyingOn(const double *coordOfNode) const
741 {
742   double dist=Node::distanceBtw2Pt(_center,coordOfNode);
743   if(Node::areDoubleEquals(dist,_radius))
744     {
745       double angle=Node::computeAngle(_center,coordOfNode);
746       return IsIn2Pi(_angle0,_angle,angle);
747     }
748   else
749     return false;
750 }
751
752 /*!
753  * Idem IsAngleNotIn except that here 'start' in ]-Pi;Pi[ and delta in ]-2*Pi;2Pi[. 
754  * @param angleIn in ]-Pi;Pi[.
755  */
756 bool EdgeArcCircle::IsIn2Pi(double start, double delta, double angleIn)
757 {
758   double myDelta=angleIn-start;
759   if(delta>0.)
760     {
761       myDelta=myDelta>=0.?myDelta:myDelta+2.*M_PI;
762       return myDelta>0. && myDelta<delta;
763     }
764   else
765     {
766       myDelta=myDelta<=0.?myDelta:myDelta-2.*M_PI;
767       return myDelta<0. && myDelta>delta;
768     }
769 }
770
771 /*!
772  * Given the arc 'a' defined by 'start' angle and a 'delta' [-Pi;Pi] states for the angle 'angleIn' [-Pi;Pi] if it owns or not 'a'.
773  */
774 bool EdgeArcCircle::IsAngleNotIn(double start, double delta, double angleIn)
775 {
776   double tmp=start;
777   if(tmp<0.)
778     tmp+=2*M_PI;
779   double tmp2=angleIn;
780   if(tmp2<0.)
781     tmp2+=2*M_PI;
782   if(tmp+delta>=2.*M_PI)
783     return (tmp2<tmp) && (tmp2>tmp+delta-2*M_PI);
784   else if(tmp+delta>=0.)
785     return (tmp2<std::min(tmp,tmp+delta) || tmp2>std::max(tmp,tmp+delta));
786   else
787     return (tmp2>tmp) && (tmp2<(tmp+delta+2.*M_PI));
788 }
789
790 void EdgeArcCircle::updateBounds()
791 {
792   _bounds.setValues(std::min((*_start)[0],(*_end)[0]),std::max((*_start)[0],(*_end)[0]),std::min((*_start)[1],(*_end)[1]),std::max((*_start)[1],(*_end)[1]));
793   if(IsIn2Pi(_angle0,_angle,M_PI/2))
794     _bounds[3]=_center[1]+_radius;
795   if(IsIn2Pi(_angle0,_angle,-M_PI/2))
796     _bounds[2]=_center[1]-_radius;
797   if(IsIn2Pi(_angle0,_angle,0.))
798     _bounds[1]=_center[0]+_radius;
799   if(IsIn2Pi(_angle0,_angle,M_PI))
800     _bounds[0]=_center[0]-_radius;
801 }
802
803 void EdgeArcCircle::fillGlobalInfoAbs(bool direction, const std::map<INTERP_KERNEL::Node *,int>& mapThis, const std::map<INTERP_KERNEL::Node *,int>& mapOther, int offset1, int offset2, double fact, double baryX, double baryY,
804                                       std::vector<int>& edgesThis, std::vector<double>& addCoo, std::map<INTERP_KERNEL::Node *,int> mapAddCoo) const
805 {
806   int tmp[2];
807   _start->fillGlobalInfoAbs(mapThis,mapOther,offset1,offset2,fact,baryX,baryY,addCoo,mapAddCoo,tmp);
808   _end->fillGlobalInfoAbs(mapThis,mapOther,offset1,offset2,fact,baryX,baryY,addCoo,mapAddCoo,tmp+1);
809   if(direction)
810     {
811       edgesThis.push_back(tmp[0]);
812       edgesThis.push_back(tmp[1]);
813     }
814   else
815     {
816       edgesThis.push_back(tmp[1]);
817       edgesThis.push_back(tmp[0]);
818     }
819 }
820
821 void EdgeArcCircle::fillGlobalInfoAbs2(const std::map<INTERP_KERNEL::Node *,int>& mapThis, const std::map<INTERP_KERNEL::Node *,int>& mapOther, int offset1, int offset2, double fact, double baryX, double baryY,
822                                        std::vector<int>& edgesOther, std::vector<double>& addCoo, std::map<INTERP_KERNEL::Node *,int>& mapAddCoo) const
823 {
824   _start->fillGlobalInfoAbs2(mapThis,mapOther,offset1,offset2,fact,baryX,baryY,addCoo,mapAddCoo,edgesOther);
825   _end->fillGlobalInfoAbs2(mapThis,mapOther,offset1,offset2,fact,baryX,baryY,addCoo,mapAddCoo,edgesOther);
826 }