1 -- Created on: 1996-01-11
2 -- Created by: Jacques GOUSSARD
3 -- Copyright (c) 1996-1999 Matra Datavision
4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
6 -- This file is part of Open CASCADE Technology software library.
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
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.
14 -- Alternatively, this file may be used under the terms of Open CASCADE
15 -- commercial license or contractual agreement.
17 class WiresOnShape from LocOpe inherits ProjectedWires from LocOpe
21 uses Shape from TopoDS,
27 DataMapOfShapeShape from TopTools,
28 -- DataMapIteratorOfDataMapOfShapeShape from TopTools
29 IndexedDataMapOfShapeShape from TopTools,
30 MapOfShape from TopTools
35 Create(S: Shape from TopoDS)
37 returns WiresOnShape from LocOpe;
40 Init(me: mutable; S: Shape from TopoDS)
44 SetCheckInterior(me: mutable; ToCheckInterior: Boolean from Standard)
45 ---Purpose: Set the flag of check internal intersections
46 -- default value is True (to check)
50 Bind(me: mutable; W: Wire from TopoDS;
55 Bind(me: mutable; Comp: Compound from TopoDS;
60 Bind(me: mutable; E: Edge from TopoDS;
66 Bind(me: mutable; EfromW: Edge from TopoDS;
67 EonFace: Edge from TopoDS)
79 returns Boolean from Standard
84 InitEdgeIterator(me: mutable)
90 returns Boolean from Standard
95 returns Edge from TopoDS
100 ---Purpose: Returns the face of the shape on which the current
101 -- edge is projected.
102 returns Face from TopoDS
106 OnEdge(me: mutable; E: out Edge from TopoDS)
107 ---Purpose: If the current edge is projected on an edge,
108 -- returns <Standard_True> and sets the value of <E>.
109 -- Otherwise, returns <Standard_False>.
110 returns Boolean from Standard
114 NextEdge(me: mutable)
119 OnVertex(me: mutable; Vwire : Vertex from TopoDS;
120 Vshape: out Vertex from TopoDS)
122 returns Boolean from Standard
126 OnEdge(me: mutable; V: Vertex from TopoDS;
127 E: out Edge from TopoDS;
128 P: out Real from Standard)
129 ---Purpose: If the vertex <V> lies on an edge of the original
130 -- shape, returns <Standard_True> and sets the
131 -- concerned edge in <E>, and the parameter on the
133 -- Else returns <Standard_False>.
134 returns Boolean from Standard
137 IsFaceWithSection(me; aFace : Shape from TopoDS)
138 ---Purpose: tells is the face to be split by section or not
140 returns Boolean from Standard
146 myShape : Shape from TopoDS;
147 myMapEF : IndexedDataMapOfShapeShape from TopTools;
148 myFacesWithSection : MapOfShape from TopTools;
149 myCheckInterior : Boolean from Standard;
150 myMap : DataMapOfShapeShape from TopTools;
151 myDone : Boolean from Standard;
152 myIndex : Integer from Standard;