0024166: Unable to create file with "Save" menu of voxeldemo Qt sample
[occt.git] / src / AdvApprox / AdvApprox_PrefCutting.cdl
... / ...
CommitLineData
1-- Created on: 1996-04-05
2-- Created by: Joelle CHAUVET
3-- Copyright (c) 1996-1999 Matra Datavision
4-- Copyright (c) 1999-2012 OPEN CASCADE SAS
5--
6-- The content of this file is subject to the Open CASCADE Technology Public
7-- License Version 6.5 (the "License"). You may not use the content of this file
8-- except in compliance with the License. Please obtain a copy of the License
9-- at http://www.opencascade.org and read it completely before using this file.
10--
11-- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
12-- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
13--
14-- The Original Code and all software distributed under the License is
15-- distributed on an "AS IS" basis, without warranty of any kind, and the
16-- Initial Developer hereby disclaims all such warranties, including without
17-- limitation, any warranties of merchantability, fitness for a particular
18-- purpose or non-infringement. Please see the License for the specific terms
19-- and conditions governing the rights and limitations under the License.
20
21
22---Purpose :
23-- inherits class Cutting; contains a list of preferential points (di)i
24-- if Cutting is necessary in [a,b], we cut at the di nearest from (a+b)/2.
25
26class PrefCutting from AdvApprox inherits Cutting from AdvApprox
27
28uses Array1OfReal from TColStd
29
30is
31 Create(CutPnts : Array1OfReal) returns PrefCutting;
32
33 Value(me; a,b : Real;
34 cuttingvalue : out Real)
35 returns Boolean
36 is redefined;
37
38
39fields
40
41 myPntOfCutting : Array1OfReal from TColStd;
42
43
44end PrefCutting;
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
70
71
72
73
74