1 -- Created on: 1991-06-18
2 -- Created by: Didier PIFFAULT
3 -- Copyright (c) 1991-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 class SectionLine from Intf
19 ---Purpose: Describe a polyline of intersection between two
20 -- polyhedra as a sequence of points of intersection.
23 uses SectionPoint from Intf,
24 SeqOfSectionPoint from Intf
27 raises OutOfRange from Standard
35 returns Integer is static;
36 ---Purpose: Returns number of points in this SectionLine.
41 returns SectionPoint from Intf
42 raises OutOfRange from Standard
44 ---Purpose: Gives the point of intersection of address <Index> in the
47 ---C++: return const &
51 returns Boolean is static;
52 ---Purpose: Returns True if the SectionLine is closed.
56 ThePI : in SectionPoint from Intf)
57 returns Boolean is static;
58 ---Purpose: Returns True if ThePI is in the SectionLine <me>.
62 ThePI : in SectionPoint from Intf)
63 returns Integer is static;
64 ---Purpose: Checks if <ThePI> is an end of the SectionLine. Returns 1
65 -- for the beginning, 2 for the end, otherwise 0.
69 Other : in SectionLine from Intf) -- in like me);
70 returns Boolean is static;
71 ---Purpose: Compares two SectionLines.
73 ---C++: alias operator ==
77 Create returns SectionLine;
78 ---Purpose: Constructs an empty SectionLine.
80 Create (Other : SectionLine)
82 ---Purpose: Copies a SectionLine.
86 Pi : in SectionPoint from Intf)
88 ---Purpose: Adds a point at the end of the SectionLine.
92 LS : in out SectionLine from Intf)
94 ---Purpose: Concatenates the SectionLine <LS> at the end of the
99 Pi : in SectionPoint from Intf)
101 ---Purpose: Adds a point to the beginning of the SectionLine <me>.
104 Prepend (me : in out;
105 LS : in out SectionLine from Intf)
107 ---Purpose: Concatenates a SectionLine <LS> at the beginning of the
111 Reverse (me : in out)
113 ---Purpose: Reverses the order of the elements of the SectionLine.
118 ---Purpose: Closes the SectionLine.
122 Indent : in Integer) is static;
126 myPoints : SeqOfSectionPoint from Intf;