Adding of testing cases from subgroups 937 940 and 941 of CHL group
[occt.git] / src / BOPTools / BOPTools_ComparePave.cxx
CommitLineData
b311480e 1// Created on: 2001-02-16
2// Created by: Peter KURNEV
3// Copyright (c) 2001-2012 OPEN CASCADE SAS
4//
5// The content of this file is subject to the Open CASCADE Technology Public
6// License Version 6.5 (the "License"). You may not use the content of this file
7// except in compliance with the License. Please obtain a copy of the License
8// at http://www.opencascade.org and read it completely before using this file.
9//
10// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
11// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
12//
13// The Original Code and all software distributed under the License is
14// distributed on an "AS IS" basis, without warranty of any kind, and the
15// Initial Developer hereby disclaims all such warranties, including without
16// limitation, any warranties of merchantability, fitness for a particular
17// purpose or non-infringement. Please see the License for the specific terms
18// and conditions governing the rights and limitations under the License.
19
7fd59977 20
21
22#include <BOPTools_ComparePave.ixx>
23
24//=======================================================================
25// function: BOPTools_ComparePave::BOPTools_ComparePave
26// purpose:
27//=======================================================================
b311480e 28BOPTools_ComparePave::BOPTools_ComparePave()
7fd59977 29 :myTol(1.e-12)
30 {}
31
32//=======================================================================
33// function: BOPTools_ComparePave::BOPTools_ComparePave
34// purpose:
35//=======================================================================
36 BOPTools_ComparePave::BOPTools_ComparePave(const Standard_Real aTol)
37{
38 myTol=aTol;
39}
40//=======================================================================
41// function: IsLower
42// purpose:
43//=======================================================================
44 Standard_Boolean BOPTools_ComparePave::IsLower(const BOPTools_Pave& aLeft,
45 const BOPTools_Pave& aRight)const
46{
47 return aLeft.Param()<aRight.Param();
48}
49//=======================================================================
50// function: IsGreater
51// purpose:
52//=======================================================================
53 Standard_Boolean BOPTools_ComparePave::IsGreater(const BOPTools_Pave& aLeft,
54 const BOPTools_Pave& aRight)const
55{
56 return aLeft.Param()>aRight.Param();
57}
58//=======================================================================
59// function: IsEqual
60// purpose:
61//=======================================================================
62 Standard_Boolean BOPTools_ComparePave::IsEqual(const BOPTools_Pave& aLeft,
63 const BOPTools_Pave& aRight)const
64{
65 Standard_Real a, b;
66 a=aLeft.Param();
67 b=aRight.Param();
68 return fabs(a-b) < myTol;
69}