3 -- Created : Sat 9 Jan 1993
4 -- Author : CKY / Contract Toubro-Larsen ( Kiran )
6 ---Copyright : MATRA-DATAVISION 1993
9 class Line from IGESGeom inherits IGESEntity
11 ---Purpose: defines IGESLine, Type <110> Form <0>
12 -- in package IGESGeom
13 -- A line is a bounded, connected portion of a parent straight
14 -- line which consists of more than one point. A line is
15 -- defined by its end points.
17 -- From IGES-5.3, two other Forms are admitted (same params) :
18 -- 0 remains for standard limited line (the default)
19 -- 1 for semi-infinite line (End is just a passing point)
20 -- 2 for full infinite Line (both Start and End are abitrary)
29 Create returns mutable Line;
31 -- Specific Methods pertaining to the class
33 Init (me : mutable; aStart : XYZ; anEnd : XYZ);
34 ---Purpose : This method is used to set the fields of the class Line
35 -- - aStart : Start point of the line
36 -- - anEnd : End point of the line
38 Infinite (me) returns Integer;
39 ---Purpose : Returns the Infinite status i.e. the Form Number : 0 1 2
41 SetInfinite (me : mutable; status : Integer);
42 ---Purpose : Sets the Infinite status
43 -- Does nothing if <status> is not 0 1 or 2
46 StartPoint(me) returns Pnt;
47 ---Purpose : returns the start point of the line
49 TransformedStartPoint(me) returns Pnt;
50 ---Purpose : returns the start point of the line after applying Transf. Matrix
52 EndPoint(me) returns Pnt;
53 ---Purpose : returns the end point of the line
55 TransformedEndPoint(me) returns Pnt;
56 ---Purpose : returns the end point of the line after applying Transf. Matrix
61 -- Class : IGESGeom_Line
63 -- Purpose : Declaration of variables specific to the definition
66 -- Reminder : A Line instance is defined by :
67 -- A starting and ending point