0024927: Getting rid of "Persistent" functionality -- Code
[occt.git] / src / MgtPoly / MgtPoly.cdl
1 -- Created on: 1995-10-24
2 -- Created by: Mister rmi
3 -- Copyright (c) 1995-1999 Matra Datavision
4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
5 --
6 -- This file is part of Open CASCADE Technology software library.
7 --
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.
13 --
14 -- Alternatively, this file may be used under the terms of Open CASCADE
15 -- commercial license or contractual agreement.
16
17 package MgtPoly
18
19         ---Purpose: This  package   provides   methods  to   translate
20         --          transient objects from Poly to  persistent objects
21         --          from PPoly and vice-versa.
22         --          As far as objects can be shared (just as Geometry),
23         --          a map is given as translate argument.
24
25
26 uses Poly,
27      PPoly,
28      PTColStd
29      
30 is
31
32     -- Triangle (Storable)
33
34     Translate(POjb: Triangle from PPoly)
35         returns Triangle from Poly;
36         ---Purpose: translates Transient -> Persistent
37     
38     Translate(TObj: Triangle from Poly)
39         returns Triangle from PPoly;
40         ---Purpose: translates Persistent -> Transient
41
42     -- Triangulation
43
44     Translate(PObj : Triangulation from PPoly;
45               aMap : in out PersistentTransientMap from PTColStd)
46         returns Triangulation from Poly;
47         ---Purpose: translates Persistent -> Transient
48
49     Translate(TObj : Triangulation from Poly;
50               aMap : in out TransientPersistentMap from PTColStd)
51         returns Triangulation from PPoly;
52         ---Purpose: translates Transient -> Persistent
53     
54     -- Polygon3D
55
56     Translate(PObj : Polygon3D from PPoly;
57               aMap : in out PersistentTransientMap from PTColStd)
58         returns Polygon3D from Poly;
59         ---Purpose: translates Persistent -> Transient
60
61     Translate(TObj : Polygon3D from Poly;
62               aMap : in out TransientPersistentMap from PTColStd)
63         returns Polygon3D from PPoly;
64         ---Purpose: translates Transient -> Persistent
65
66     -- Polygon2D
67
68
69     Translate(PObj : Polygon2D from PPoly;
70               aMap : in out PersistentTransientMap from PTColStd)
71         returns Polygon2D from Poly;
72         ---Purpose: translates Persistent -> Transient
73
74     Translate(TObj : Polygon2D from Poly;
75               aMap : in out TransientPersistentMap from PTColStd)
76         returns Polygon2D from PPoly;
77         ---Purpose: translates Transient -> Persistent
78
79     -- PolygonOnTriangulation
80
81     Translate(PObj : PolygonOnTriangulation from PPoly;
82               aMap : in out PersistentTransientMap from PTColStd)
83         returns PolygonOnTriangulation from Poly;
84         ---Purpose: translates Persistent -> Transient
85
86     Translate(TObj : PolygonOnTriangulation from Poly;
87               aMap : in out TransientPersistentMap from PTColStd)
88         returns PolygonOnTriangulation from PPoly;
89         ---Purpose: translates Transient -> Persistent
90
91 end MgtPoly;