0024428: Implementation of LGPL license
[occt.git] / src / BOPInt / BOPInt_Tools.cdl
1 -- Created by: Peter KURNEV
2 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
3 --
4 -- This file is part of Open CASCADE Technology software library.
5 --
6 -- This library is free software; you can redistribute it and / or modify it
7 -- under the terms of the GNU Lesser General Public version 2.1 as published
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.
11 --
12 -- Alternatively, this file may be used under the terms of Open CASCADE
13 -- commercial license or contractual agreement.
14
15 class Tools from BOPInt 
16
17 ---Purpose: 
18
19 uses 
20     Box from Bnd,
21     Lin from gp, 
22     Pln from gp, 
23     Pnt from gp, 
24     Curve from Geom, 
25          
26     Edge from TopoDS, 
27     Face from TopoDS,
28     Range from IntTools, 
29     CommonPrt from IntTools
30 --raises
31
32 is 
33     
34  
35     CheckCurve(myclass; 
36         theC:Curve from Geom;  
37         theTol:Real from Standard; 
38         theBox:out Box from Bnd) 
39     returns Boolean from Standard;   
40      
41     IsOnPave(myclass; 
42         theT:Real from Standard;  
43         theRange:Range from IntTools; 
44         theTol: Real from Standard) 
45     returns Boolean from Standard;  
46
47     VertexParameters(myclass; 
48         theCP:CommonPrt from IntTools; 
49         theT1:out Real from Standard;  
50         theT2:out Real from Standard);  
51
52     VertexParameter(myclass; 
53         theCP:CommonPrt from IntTools; 
54         theT:out Real from Standard); 
55  
56     IsOnPave1(myclass; 
57         theT:Real from Standard;  
58         theRange:Range from IntTools; 
59         theTol: Real from Standard) 
60     returns Boolean from Standard;     
61       
62     IsInRange(myclass;
63         theRRef : Range from IntTools; 
64         theR    : Range from IntTools; 
65         theTol  : Real  from Standard) 
66     returns Boolean from Standard;      
67     ---Purpose:  Checks if the range <theR> interfere with the range <theRRef>
68     
69     SegPln(myclass; 
70         theLin   :  Lin from gp; 
71         theTLin1 :  Real from Standard; 
72         theTLin2 :  Real from Standard; 
73         theTolLin:  Real from Standard;   
74         thePln   :  Pln  from gp; 
75         theTolPln:  Real from Standard; 
76         theP     :out Pnt from gp;   
77         theT     :out Real from Standard;  
78         theTolP  :out Real from Standard; 
79         theTmin  :out Real from Standard; 
80         theTmax  :out Real from Standard) 
81     returns Integer from Standard;     
82 --fields
83
84 end Tools;