0024428: Implementation of LGPL license
[occt.git] / src / AdvApprox / AdvApprox_PrefCutting.cdl
CommitLineData
b311480e 1-- Created on: 1996-04-05
2-- Created by: Joelle CHAUVET
3-- Copyright (c) 1996-1999 Matra Datavision
973c2be1 4-- Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 5--
973c2be1 6-- This file is part of Open CASCADE Technology software library.
b311480e 7--
973c2be1 8-- This library is free software; you can redistribute it and / or modify it
9-- under the terms of the GNU Lesser General Public version 2.1 as published
10-- by the Free Software Foundation, with special exception defined in the file
11-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12-- distribution for complete text of the license and disclaimer of any warranty.
b311480e 13--
973c2be1 14-- Alternatively, this file may be used under the terms of Open CASCADE
15-- commercial license or contractual agreement.
b311480e 16
17---Purpose :
18-- inherits class Cutting; contains a list of preferential points (di)i
19-- if Cutting is necessary in [a,b], we cut at the di nearest from (a+b)/2.
20
7fd59977 21class PrefCutting from AdvApprox inherits Cutting from AdvApprox
22
23uses Array1OfReal from TColStd
24
25is
26 Create(CutPnts : Array1OfReal) returns PrefCutting;
27
28 Value(me; a,b : Real;
29 cuttingvalue : out Real)
30 returns Boolean
31 is redefined;
32
33
34fields
35
36 myPntOfCutting : Array1OfReal from TColStd;
37
38
39end PrefCutting;
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69