1 -- Created on: 2002-11-13
2 -- Created by: Galina KULIKOVA
3 -- Copyright (c) 2002-2014 OPEN CASCADE SAS
5 -- This file is part of Open CASCADE Technology software library.
7 -- This library is free software; you can redistribute it and/or modify it under
8 -- the terms of the GNU Lesser General Public License version 2.1 as published
9 -- by the Free Software Foundation, with special exception defined in the file
10 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 -- distribution for complete text of the license and disclaimer of any warranty.
13 -- Alternatively, this file may be used under the terms of Open CASCADE
14 -- commercial license or contractual agreement.
16 class RemoveLocations from ShapeUpgrade inherits TShared from MMgt
18 ---Purpose: Removes all locations sub-shapes of specified shape
21 ShapeEnum from TopAbs,
23 MapOfShape from TopTools,
24 DataMapOfShapeShape from TopTools
26 Create returns RemoveLocations from ShapeUpgrade;
27 ---Purpose:Empy constructor
29 Remove(me : mutable;theShape : Shape from TopoDS) returns Boolean;
30 ---Purpose:Removes all location correspodingly to RemoveLevel.
32 MakeNewShape(me : mutable;theShape , theAncShape: Shape from TopoDS;
33 theNewShape:in out Shape from TopoDS;theRemoveLoc : Boolean)
34 returns Boolean is private;
36 GetResult(me) returns Shape from TopoDS;
37 ---Purpose:Returns shape with removed locatins.
40 SetRemoveLevel(me: mutable; theLevel : ShapeEnum from TopAbs);
41 ---Purpose:sets level starting with that location will be removed,
42 -- by default TopAbs_SHAPE. In this case locations will be kept for specified shape
43 -- and if specified shape is TopAbs_COMPOUND for sub-shapes of first level.
46 RemoveLevel(me) returns ShapeEnum from TopAbs;
47 ---Purpose:sets level starting with that location will be removed.Value of level can be set to
48 -- TopAbs_SHAPE,TopAbs_COMPOUND,TopAbs_SOLID,TopAbs_SHELL,TopAbs_FACE.By default TopAbs_SHAPE.
49 -- In this case location will be removed for all shape types for exception of compound.
53 ModifiedShape (me; theInitShape : Shape from TopoDS) returns Shape from TopoDS;
54 ---Purpose: Returns modified shape obtained from initial shape.
58 myLevelRemoving : ShapeEnum from TopAbs;
59 myShape : Shape from TopoDS;
60 myMapNewShapes : DataMapOfShapeShape from TopTools;