Integration of OCCT 6.5.0 from SVN
[occt.git] / src / IGESDimen / IGESDimen_SectionedArea.cdl
CommitLineData
7fd59977 1--
2-- File : SectionedArea.cdl
3-- Created : Sat 9 Jan 1993
4-- Author : CKY / Contract Toubro-Larsen ( SIVA )
5--
6---Copyright : MATRA-DATAVISION 1993
7--
8
9class SectionedArea from IGESDimen inherits IGESEntity
10
11 ---Purpose: defines IGES Sectioned Area, Type <230> Form <0>,
12 -- in package IGESDimen
13 -- A sectioned area is a portion of a design which is to be
14 -- filled with a pattern of lines. Ordinarily, this entity
15 -- is used to reveal or expose shape or material characteri-
16 -- stics defined by other entities. It consists of a pointer
17 -- to an exterior definition curve, a specification of the
18 -- pattern of lines, the coordinates of a point on a pattern
19 -- line, the distance between the pattern lines, the angle
20 -- between the pattern lines and the X-axis of definition
21 -- space, and the specification of any enclosed definition
22 -- curves (commonly known as islands).
23
24
25uses
26
27 Pnt from gp,
28 XYZ from gp,
29 HArray1OfIGESEntity from IGESData
30
31raises OutOfRange
32
33is
34
35 Create returns mutable SectionedArea;
36
37 -- --specific-- --
38 Init(me : mutable;
39 aCurve : IGESEntity;
40 aPattern : Integer;
41 aPoint : XYZ;
42 aDistance : Real;
43 anAngle : Real;
44 someIslands : HArray1OfIGESEntity);
45 -- This method is used to set fields of the
46 -- class SectionedArea
47 -- - aCurve : The exterior definition curve (closed)
48 -- - aPattern : The fill pattern code
49 -- - aPoint : The passing point of the pattern lines
50 -- - aDistance : Normal distance between adjacent lines
51 -- - anAngle : Angle between XT axis to sectioning lines
52 -- (default Pi/4)
53 -- - someIslands : The interior definition curves
54
55 SetInverted (me : mutable; mode : Boolean);
56 ---Purpose : Sets the cross hatches to be inverted or not,
57 -- according value of <mode> (corresponds to FormNumber)
58
59 IsInverted (me) returns Boolean;
60 ---Purpose : Returns True if cross hatches as Inverted, else they are
61 -- Standard (Inverted : Form=1, Standard : Form=0)
62
63 ExteriorCurve(me) returns IGESEntity;
64 ---Purpose : returns the exterior definition curve
65
66 Pattern(me) returns Integer;
67 ---Purpose : returns fill pattern code
68
69 PassingPoint(me) returns Pnt;
70 ---Purpose : returns point thru which line should pass
71
72 TransformedPassingPoint(me) returns Pnt;
73 ---Purpose : returns point thru which line should pass after Transformation
74
75 ZDepth(me) returns Real;
76 ---Purpose : returns the Z depth
77
78 Distance(me) returns Real;
79 ---Purpose : returns the normal distance between lines
80
81 Angle(me) returns Real;
82 ---Purpose : returns the angle of lines with XT axis
83
84 NbIslands(me) returns Integer;
85 ---Purpose : returns the number of island curves
86
87 IslandCurve(me; Index: Integer) returns IGESEntity
88 raises OutOfRange;
89 ---Purpose : returns the interior definition curves, returns Null Handle
90 -- exception raised if Index <= 0 or Index > NbIslands()
91
92fields
93
94--
95-- Class : IGESDimen_SectionedArea
96--
97-- Purpose : Declaration of variables specific to the definition
98-- of the Class SectionedArea.
99--
100-- Reminder : A SectionedArea instance is defined by :
101-- - An Exterior Curve
102-- - An Integer representing the pattern
103-- - The coordinates thru which a line should pass
104-- - The Z-depth of the lines
105-- - The normal distance between adjacent lines
106-- - The angle in radians from XT-axis to section lines
107-- - A Single Array of Interior Definition Curves
108--
109
110 theExteriorCurve: IGESEntity;
111 thePattern : Integer;
112 thePassingPoint : XYZ;
113 theDistance : Real;
114 theAngle : Real;
115 theIslandCurves : HArray1OfIGESEntity;
116
117end SectionedArea;