0027282: [Regression to 6.9.1] smesh/bugs_00/A6: Cut produces an empty shape
[occt.git] / src / IntSurf / IntSurf_PntOn2S.cxx
CommitLineData
b311480e 1// Copyright (c) 1995-1999 Matra Datavision
973c2be1 2// Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 3//
973c2be1 4// This file is part of Open CASCADE Technology software library.
b311480e 5//
d5f74e42 6// This library is free software; you can redistribute it and/or modify it under
7// the terms of the GNU Lesser General Public License version 2.1 as published
973c2be1 8// by the Free Software Foundation, with special exception defined in the file
9// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
10// distribution for complete text of the license and disclaimer of any warranty.
b311480e 11//
973c2be1 12// Alternatively, this file may be used under the terms of Open CASCADE
13// commercial license or contractual agreement.
b311480e 14
7fd59977 15
42cf5bc1 16#include <gp_Pnt.hxx>
17#include <IntSurf_PntOn2S.hxx>
7fd59977 18
a3f6f591 19IntSurf_PntOn2S::IntSurf_PntOn2S () : pt(0,0,0),u1(0),v1(0),u2(0),v2(0) {}
7fd59977 20
21void IntSurf_PntOn2S::SetValue (const gp_Pnt& Pt,
22 const Standard_Boolean OnFirst,
23 const Standard_Real U,
24 const Standard_Real V) {
25
26 pt = Pt;
27 if (OnFirst) {
28 u1 = U;
29 v1 = V;
30 }
31 else {
32 u2 = U;
33 v2 = V;
34 }
35}
36
37
38void IntSurf_PntOn2S::SetValue (const Standard_Boolean OnFirst,
39 const Standard_Real U,
40 const Standard_Real V) {
41
42 if (OnFirst) {
43 u1 = U;
44 v1 = V;
45 }
46 else {
47 u2 = U;
48 v2 = V;
49 }
50}
51
52
baf72cd2 53Standard_Boolean IntSurf_PntOn2S::IsSame( const IntSurf_PntOn2S& theOterPoint,
54 const Standard_Real theTol3D,
55 const Standard_Real theTol2D) const
56{
57 if(pt.SquareDistance(theOterPoint.Value()) > theTol3D*theTol3D)
58 return Standard_False;
7fd59977 59
eee615ad 60 if(theTol2D < 0.0)
baf72cd2 61 {//We need not compare 2D-coordinates of the points
62 return Standard_True;
63 }
64
65 Standard_Real aU1 = 0.0, aV1 = 0.0, aU2 = 0.0, aV2 = 0.0;
66 theOterPoint.Parameters(aU1, aV1, aU2, aV2);
67
68 gp_Pnt2d aP1(u1, v1), aP2(aU1, aV1);
69
70 if(!aP1.IsEqual(aP2, theTol2D))
71 return Standard_False;
72
73 aP1.SetCoord(u2, v2);
74 aP2.SetCoord(aU2, aV2);
75
76 if(!aP1.IsEqual(aP2, theTol2D))
77 return Standard_False;
78
79 return Standard_True;
80}