0024750: Replace instantiations of TCollection generic classes by NCollection templat...
[occt.git] / src / ShapeCustom / ShapeCustom_ConvertToBSpline.cdl
CommitLineData
b311480e 1-- Created on: 1999-06-17
2-- Created by: data exchange team
3-- Copyright (c) 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--
d5f74e42 8-- This library is free software; you can redistribute it and/or modify it under
9-- the terms of the GNU Lesser General Public License version 2.1 as published
973c2be1 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.
7fd59977 16
da2db6a7 17private class ConvertToBSpline from ShapeCustom inherits Modification from ShapeCustom
7fd59977 18
19 ---Purpose: implement a modification for BRepTools
20 -- Modifier algortihm. Converts Surface of
21 -- Linear Exctrusion, Revolution and Offset
22 -- surfaces into BSpline Surface according to
23 -- flags.
24
25uses
26
27 Face from TopoDS,
28 Edge from TopoDS,
29 Vertex from TopoDS,
30 Shape from GeomAbs,
31 Surface from Geom,
32 Curve from Geom,
33 Curve from Geom2d,
34 Pnt from gp,
35 Location from TopLoc
36is
37
6e33d3ce 38 Create returns ConvertToBSpline from ShapeCustom;
7fd59977 39
40 SetExtrusionMode(me: mutable; extrMode: Boolean);
41 ---Purpose: Sets mode for convertion of Surfaces of Linear
42 -- extrusion.
43
44 SetRevolutionMode(me: mutable; revolMode: Boolean);
45 ---Purpose: Sets mode for convertion of Surfaces of Revolution.
46
47 SetOffsetMode(me: mutable; offsetMode: Boolean);
48 ---Purpose: Sets mode for convertion of Offset surfaces.
49
50 SetPlaneMode(me: mutable; planeMode: Boolean);
51 ---Purpose: Sets mode for convertion of Plane surfaces.
52
53 NewSurface(me: mutable; F : Face from TopoDS;
54 S : out Surface from Geom;
55 L : out Location from TopLoc;
56 Tol: out Real from Standard;
57 RevWires : out Boolean from Standard;
58 RevFace : out Boolean from Standard)
59 returns Boolean from Standard;
60 ---Purpose: Returns Standard_True if the face <F> has been
61 -- modified. In this case, <S> is the new geometric
62 -- support of the face, <L> the new location, <Tol>
63 -- the new tolerance. Otherwise, returns
64 -- Standard_False, and <S>, <L>, <Tol> are not
65 -- significant.
66
67 NewCurve(me: mutable; E : Edge from TopoDS;
68 C : out Curve from Geom;
69 L : out Location from TopLoc;
70 Tol: out Real from Standard)
71 returns Boolean from Standard;
72 ---Purpose: Returns Standard_True if the edge <E> has been
73 -- modified. In this case, <C> is the new geometric
74 -- support of the edge, <L> the new location, <Tol>
75 -- the new tolerance. Otherwise, returns
76 -- Standard_False, and <C>, <L>, <Tol> are not
77 -- significant.
78
79 NewPoint(me: mutable; V : Vertex from TopoDS;
80 P : out Pnt from gp;
81 Tol: out Real from Standard)
82 returns Boolean from Standard;
83 ---Purpose: Returns Standard_True if the vertex <V> has been
84 -- modified. In this case, <P> is the new geometric
85 -- support of the vertex, <Tol> the new tolerance.
86 -- Otherwise, returns Standard_False, and <P>, <Tol>
87 -- are not significant.
88
89 NewCurve2d(me: mutable; E : Edge from TopoDS;
90 F : Face from TopoDS;
91 NewE : Edge from TopoDS;
92 NewF : Face from TopoDS;
93 C : out Curve from Geom2d;
94 Tol : out Real from Standard)
95 returns Boolean from Standard;
96 ---Purpose: Returns Standard_True if the edge <E> has a new
97 -- curve on surface on the face <F>.In this case, <C>
98 -- is the new geometric support of the edge, <L> the
99 -- new location, <Tol> the new tolerance.
100 --
101 -- Otherwise, returns Standard_False, and <C>, <L>,
102 -- <Tol> are not significant.
103 --
104 -- <NewE> is the new edge created from <E>. <NewF>
105 -- is the new face created from <F>. They may be usefull.
106
107 NewParameter(me: mutable; V : Vertex from TopoDS;
108 E : Edge from TopoDS;
109 P : out Real from Standard;
110 Tol: out Real from Standard)
111 returns Boolean from Standard;
112 ---Purpose: Returns Standard_True if the Vertex <V> has a new
113 -- parameter on the edge <E>. In this case, <P> is
114 -- the parameter, <Tol> the new tolerance.
115 -- Otherwise, returns Standard_False, and <P>, <Tol>
116 -- are not significant.
117
118 Continuity(me: mutable; E : Edge from TopoDS;
119 F1,F2 : Face from TopoDS;
120 NewE : Edge from TopoDS;
121 NewF1,NewF2: Face from TopoDS)
122 returns Shape from GeomAbs;
123 ---Purpose: Returns the continuity of <NewE> between <NewF1>
124 -- and <NewF2>.
125 --
126 -- <NewE> is the new edge created from <E>. <NewF1>
127 -- (resp. <NewF2>) is the new face created from <F1>
128 -- (resp. <F2>).
129
130 IsToConvert(me; S : Surface from Geom;
131 SS:out Surface from Geom)
132 returns Boolean is private;
133
134fields
135
136 myExtrMode : Boolean;
137 myRevolMode : Boolean;
138 myOffsetMode: Boolean;
139 myPlaneMode : Boolean;
140
141end ConvertToBSpline;