0024428: Implementation of LGPL license
[occt.git] / src / StepShape / StepShape_OrientedEdge.cdl
CommitLineData
b311480e 1-- Created on: 1995-12-01
2-- Created by: EXPRESS->CDL V0.2 Translator
3-- Copyright (c) 1995-1999 Matra Datavision
973c2be1 4-- Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 5--
973c2be1 6-- This file is part of Open CASCADE Technology software library.
b311480e 7--
973c2be1 8-- This library is free software; you can redistribute it and / or modify it
9-- under the terms of the GNU Lesser General Public 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.
b311480e 13--
973c2be1 14-- Alternatively, this file may be used under the terms of Open CASCADE
15-- commercial license or contractual agreement.
7fd59977 16
17class OrientedEdge from StepShape
18
19inherits Edge from StepShape
20
21uses
22
23 Boolean from Standard,
24 Vertex from StepShape,
25 HAsciiString from TCollection
26is
27
28 Create returns mutable OrientedEdge;
29 ---Purpose: Returns a OrientedEdge
30
31
32 Init (me : mutable;
33 aName : mutable HAsciiString from TCollection;
34 aEdgeElement : mutable Edge from StepShape;
35 aOrientation : Boolean from Standard) is virtual;
36
37 -- Specific Methods for Field Data Access --
38
39 SetEdgeElement(me : mutable; aEdgeElement : mutable Edge);
40 EdgeElement (me) returns mutable Edge;
41 SetOrientation(me : mutable; aOrientation : Boolean);
42 Orientation (me) returns Boolean;
43 SetEdgeStart(me : mutable; aEdgeStart : mutable Vertex) is redefined;
44 EdgeStart (me) returns mutable Vertex is redefined;
45 SetEdgeEnd(me : mutable; aEdgeEnd : mutable Vertex) is redefined;
46 EdgeEnd (me) returns mutable Vertex is redefined;
47
48fields
49
50 edgeElement : Edge from StepShape;
51 orientation : Boolean from Standard;
52
53 --
54 -- NB : field <edge_start> inherited from classe <edge> is redeclared.
55 -- it shall appears in a physical file as a *.
56 --
57
58 --
59 -- NB : field <edge_end> inherited from classe <edge> is redeclared.
60 -- it shall appears in a physical file as a *.
61 --
62
63end OrientedEdge;