1 -- Created on: 1997-06-10
2 -- Created by: Yves FRICAUD
3 -- Copyright (c) 1997-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 private class Localizer from TNaming
23 ShapeEnum from TopAbs,
27 UsedShapes from TNaming,
28 NamedShape from TNaming,
29 MapOfNamedShape from TNaming,
30 ListOfNamedShape from TNaming,
31 Evolution from TNaming,
32 ShapesSet from TNaming,
33 ListOfShape from TopTools,
34 MapOfShape from TopTools,
35 IndexedDataMapOfShapeListOfShape from TopTools,
36 ListOfMapOfShape from TNaming,
37 ListOfIndexedDataMapOfShapeListOfShape from TNaming
42 Create returns Localizer from TNaming;
45 US : UsedShapes from TNaming;
46 CurTrans : Integer from Standard );
48 SubShapes (me : in out; S : Shape from TopoDS; Type : ShapeEnum from TopAbs)
49 returns MapOfShape from TopTools;
52 Ancestors (me : in out; S : Shape from TopoDS; Type : ShapeEnum from TopAbs)
53 returns IndexedDataMapOfShapeListOfShape from TopTools;
56 FindFeaturesInAncestors (me : in out;
57 S : Shape from TopoDS;
58 In : Shape from TopoDS;
59 AncInFeatures : in out MapOfShape from TopTools);
63 S : Shape from TopoDS;
65 Evol : Evolution from TNaming;
66 OldS : in out ListOfShape from TopTools;
67 OldLab : in out ListOfNamedShape from TNaming);
70 Backward (me : in out;
71 NS : NamedShape from TNaming;
72 S : Shape from TopoDS;
73 Primitives : in out MapOfNamedShape from TNaming;
74 ValidShapes : in out MapOfShape from TopTools);
76 FindNeighbourg (me : in out;
77 Cont : Shape from TopoDS;
78 S : Shape from TopoDS;
79 Neighbourg : in out MapOfShape from TopTools);
81 IsNew (myclass ;S : Shape from TopoDS;
82 NS : NamedShape from TNaming)
83 returns Boolean from Standard;
85 FindGenerator (myclass ; NS : NamedShape from TNaming;
86 S : Shape from TopoDS;
87 theListOfGenerators : in out ListOfShape from TopTools );
90 FindShapeContext (myclass ; NS : NamedShape from TNaming;
91 theS : Shape from TopoDS;
92 theSC : in out Shape from TopoDS);
93 ---Purpose: Finds context of the shape <S>.
97 myCurTrans : Integer from Standard;
98 myUS : UsedShapes from TNaming;
100 myShapeWithSubShapes : ListOfShape from TopTools;
101 mySubShapes : ListOfMapOfShape from TNaming;
103 myShapeWithAncestors : ListOfShape from TopTools;
104 myAncestors : ListOfIndexedDataMapOfShapeListOfShape from TNaming;