src/IntTools/IntTools_CompareRange.cxx

   1 // Created on: 2000-10-24
   2 // Created by: Peter KURNEV
   3 // Copyright (c) 2000-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
  20
  21
  22 #include <IntTools_CompareRange.ixx>
  23 //=======================================================================
  24 //function :IntTools_CompareRange::IntTools_CompareRange
  25 //purpose  :
  26 //=======================================================================
  27 IntTools_CompareRange::IntTools_CompareRange() :myTol(1.e-12) {}
  28
  29 //=======================================================================
  30 //function :IntTools_CompareRange::IntTools_CompareRange
  31 //purpose  :
  32 //=======================================================================
  33   IntTools_CompareRange::IntTools_CompareRange(const Standard_Real aTol)
  34 {
  35   myTol=aTol;
  36 }
  37
  38 //=======================================================================
  39 //function :IsLower
  40 //purpose  :
  41 //=======================================================================
  42   Standard_Boolean IntTools_CompareRange::IsLower(const IntTools_Range& aLeft,
  43                                                   const IntTools_Range& aRight)const
  44 {
  45   return aLeft.First()<aRight.First();
  46 }
  47
  48 //=======================================================================
  49 //function :IsGreater
  50 //purpose  :
  51 //=======================================================================
  52   Standard_Boolean IntTools_CompareRange::IsGreater(const IntTools_Range& aLeft,
  53                                                     const IntTools_Range& aRight)const
  54 {
  55   return !IsLower(aLeft,aRight);
  56 }
  57
  58 //=======================================================================
  59 //function :IsEqual
  60 //purpose  :
  61 //=======================================================================
  62   Standard_Boolean IntTools_CompareRange::IsEqual(const IntTools_Range& aLeft,
  63                                                   const IntTools_Range& aRight)const
  64 {
  65   Standard_Real a, b;
  66   a=aLeft.First();
  67   b=aRight.First();
  68   return fabs(a-b) < myTol;
  69 }
  70
  71
  72