1 -- Created on: 1994-10-07
2 -- Created by: Yves FRICAUD
3 -- Copyright (c) 1994-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 LinkTopoBilo from BRepMAT2d
19 ---Purpose:Constucts links between the Face of the explorer and
20 -- the BasicElts contained in the bisecting locus.
25 Explorer from BRepMAT2d,
26 DataMapOfShapeSequenceOfBasicElt from BRepMAT2d,
27 DataMapOfBasicEltShape from BRepMAT2d,
28 BisectingLocus from BRepMAT2d,
32 ConstructionError from Standard
36 Create returns LinkTopoBilo from BRepMAT2d;
38 Create( Explo : Explorer from BRepMAT2d;
39 BiLo : BisectingLocus from BRepMAT2d)
40 returns LinkTopoBilo from BRepMAT2d
41 ---Purpose: Constructs the links Between S and BiLo.
44 ConstructionError from Standard;
45 ---Purpose: raises if <S> is not a face.
49 Explo : Explorer from BRepMAT2d;
50 BiLo : BisectingLocus from BRepMAT2d)
51 ---Purpose: Constructs the links Between S and BiLo.
54 ConstructionError from Standard
55 ---Purpose: raises if <S> is not a face or a wire.
59 Init (me : in out; S : Shape from TopoDS)
60 ---Purpose: Initialise the Iterator on <S>
61 -- <S> is an edge or a vertex of the initial
64 ConstructionError from Standard
65 ---Purpose: raises if <S> is not an edge or a vertex.
69 More (me : in out) returns Boolean from Standard
70 ---Purpose: Returns True if there is a current BasicElt.
75 ---Purpose: Proceed to the next BasicElt.
79 Value(me) returns BasicElt from MAT
80 ---Purpose: Returns the current BasicElt.
83 GeneratingShape (me ; aBE : BasicElt from MAT)
84 ---Purpose: Returns the Shape linked to <aBE>.
85 returns Shape from TopoDS
88 LinkToWire (me : in out;
90 Explo : Explorer from BRepMAT2d;
91 IndexContour : Integer from Standard;
92 BiLo : BisectingLocus from BRepMAT2d)
97 myMap : DataMapOfShapeSequenceOfBasicElt from BRepMAT2d;
98 myBEShape : DataMapOfBasicEltShape from BRepMAT2d;
99 myKey : Shape from TopoDS;
100 current : Integer from Standard;
101 isEmpty : Boolean from Standard;