1 -- Created by: DAUTRY Philippe
2 -- Copyright (c) 1998-1999 Matra Datavision
3 -- Copyright (c) 1999-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 -- --------------------------
19 --Version Date Purpose
20 -- 0.0 Feb 3 1998 Creation
23 class TranslateTool1 from MgtBRep inherits TranslateTool1 from MgtTopoDS
25 ---Purpose: The TranslateTool1 class is provided to support the
26 -- translation of BRep topological data structures.
27 -- Used to call the MgtTopoDS methods.
30 TransientPersistentMap from PTColStd,
31 PersistentTransientMap from PTColStd,
32 CurveRepresentation from PBRep,
33 CurveRepresentation from BRep,
42 TriangleMode from MgtBRep
45 TypeMismatch from Standard
49 Create(aTriMode : TriangleMode from MgtBRep)
50 returns TranslateTool1 from MgtBRep;
51 ---Purpose: Creates a new TranslateTool1
54 -- Auxiliairy Protected Methods for Shape Geometrical Rep
59 M : in out TransientPersistentMap from PTColStd)
60 returns Curve from PGeom
62 ---Purpose: Translates a Transient Curve onto a Persistent Curve
65 PC : Curve from PGeom;
66 M : in out PersistentTransientMap from PTColStd)
67 returns Curve from Geom
69 ---Purpose: Translates a Persistent Curve onto a Transient Curve
73 TC : Curve from Geom2d;
74 M : in out TransientPersistentMap from PTColStd)
75 returns Curve from PGeom2d
77 ---Purpose: Translates a Transient Curve2d onto a Persistent Curve
80 PC : Curve from PGeom2d;
81 M : in out PersistentTransientMap from PTColStd)
82 returns Curve from Geom2d
84 ---Purpose: Translates a Persistent Curve2d onto a Transient Curve
88 TS : Surface from Geom;
89 M : in out TransientPersistentMap from PTColStd)
90 returns Surface from PGeom
92 ---Purpose: Translates a Transient Surface onto a Persistent Curve
95 PS : Surface from PGeom;
96 M : in out PersistentTransientMap from PTColStd)
97 returns Surface from Geom
99 ---Purpose: Translates a Persistent Surface onto a Transient Curve
102 -- The Add method is used to insert a shape in an other shape.
106 S1 : in out Shape from TopoDS;
107 S2 : Shape from TopoDS)
110 TypeMismatch from Standard;
113 -- The Make methods should create a new empty object of the
114 -- given type with the given Model. They should raise the
115 -- TypeMismatch exception if the Model is not of the
120 MakeVertex(me; S : in out Shape from TopoDS)
123 TypeMismatch from Standard;
125 MakeVertex(me; S : in out Shape1 from PTopoDS)
128 TypeMismatch from Standard;
130 MakeEdge(me; S : in out Shape from TopoDS)
133 TypeMismatch from Standard;
135 MakeEdge(me; S : in out Shape1 from PTopoDS)
138 TypeMismatch from Standard;
140 MakeWire(me; S : in out Shape from TopoDS)
143 TypeMismatch from Standard;
145 MakeWire(me; S : in out Shape1 from PTopoDS)
148 TypeMismatch from Standard;
150 MakeFace(me; S : in out Shape from TopoDS)
153 TypeMismatch from Standard;
155 MakeFace(me; S : in out Shape1 from PTopoDS)
158 TypeMismatch from Standard;
160 MakeShell(me; S : in out Shape from TopoDS)
163 TypeMismatch from Standard;
165 MakeShell(me; S : in out Shape1 from PTopoDS)
168 TypeMismatch from Standard;
170 MakeSolid(me; S : in out Shape from TopoDS)
173 TypeMismatch from Standard;
175 MakeSolid(me; S : in out Shape1 from PTopoDS)
178 TypeMismatch from Standard;
180 MakeCompSolid(me; S : in out Shape from TopoDS)
183 TypeMismatch from Standard;
185 MakeCompSolid(me; S : in out Shape1 from PTopoDS)
188 TypeMismatch from Standard;
190 MakeCompound(me; S : in out Shape from TopoDS)
193 TypeMismatch from Standard;
195 MakeCompound(me; S : in out Shape1 from PTopoDS)
198 TypeMismatch from Standard;
201 -- The Update methods should transfer the data from the first
202 -- shape to the second.
204 -- When an update method is redefined it should transfer the
205 -- data then call the Update redefined method to transfer the
210 S1 : Shape from TopoDS;
211 S2 : in out Shape1 from PTopoDS;
212 M : in out TransientPersistentMap from PTColStd)
217 S1 : Shape1 from PTopoDS;
218 S2 : in out Shape from TopoDS;
219 M : in out PersistentTransientMap from PTColStd)
224 S1 : Shape from TopoDS;
225 S2 : in out Shape1 from PTopoDS;
226 M : in out TransientPersistentMap from PTColStd)
231 S1 : Shape1 from PTopoDS;
232 S2 : in out Shape from TopoDS;
233 M : in out PersistentTransientMap from PTColStd)
238 S1 : Shape from TopoDS;
239 S2 : in out Shape1 from PTopoDS;
240 M : in out TransientPersistentMap from PTColStd)
245 S1 : Shape1 from PTopoDS;
246 S2 : in out Shape from TopoDS;
247 M : in out PersistentTransientMap from PTColStd)
253 myTriangleMode : TriangleMode from MgtBRep;