1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
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
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
|
-- File: IGESToBRep_BRepEntity.cdl
-- Created: Wed Sep 28 10:55:01 1994
-- Author: Marie Jose MARTZ
-- <mjm@stylox>
---Copyright: Matra Datavision 1994
class BRepEntity from IGESToBRep inherits CurveAndSurface from IGESToBRep
---Purpose : Provides methods to transfer BRep entities
-- ( VertexList 502, EdgeList 504, Loop 508,
-- Face 510, Shell 514, ManifoldSolid 186)
-- from IGES to CASCADE.
uses
CurveAndSurface from IGESToBRep,
IGESEntity from IGESData,
VertexList from IGESSolid,
EdgeList from IGESSolid,
Loop from IGESSolid,
Face from IGESSolid,
Shell from IGESSolid,
ManifoldSolid from IGESSolid,
Face from TopoDS,
Shape from TopoDS,
Vertex from TopoDS,
Trsf2d from gp
is
Create returns BRepEntity;
---Purpose : Creates a tool BRepEntity ready to run, with
-- epsilons set to 1.E-04, TheModeTopo to True, the
-- optimization of the continuity to False.
Create(CS : CurveAndSurface from IGESToBRep) returns BRepEntity;
---Purpose : Creates a tool BRepEntity ready to run and sets its
-- fields as CS's.
Create(eps : Real;
epsGeom : Real;
epsCoeff : Real;
mode : Boolean;
modeapprox : Boolean;
optimized : Boolean) returns BRepEntity;
---Purpose : Creates a tool BRepEntity ready to run.
TransferBRepEntity (me : in out;
start : IGESEntity from IGESData)
returns Shape from TopoDS;
---Purpose : Transfer the BRepEntity" : Face, Shell or ManifoldSolid.
TransferVertex (me : in out;
start : VertexList from IGESSolid;
index : Integer from Standard)
returns Vertex from TopoDS;
---Purpose : Transfer the entity number "index" of the VertexList "start"
TransferEdge (me : in out;
start : EdgeList from IGESSolid;
index : Integer from Standard)
returns Shape from TopoDS;
---Purpose : Transfer the entity number "index" of the EdgeList "start".
TransferLoop (me : in out;
start : Loop from IGESSolid;
Face : Face from TopoDS;
trans : Trsf2d from gp;
uFact :Real)
returns Shape from TopoDS;
---Purpose : Transfer the Loop Entity
TransferFace (me : in out;
start : Face from IGESSolid)
returns Shape from TopoDS;
---Purpose : Transfer the Face Entity
TransferShell (me : in out;
start : Shell from IGESSolid)
returns Shape from TopoDS;
---Purpose : Transfer the Shell Entity
TransferManifoldSolid (me : in out;
start : ManifoldSolid from IGESSolid)
returns Shape from TopoDS;
---Purpose : Transfer the ManifoldSolid Entity
end BRepEntity;
|
