blob: 580c1752535a3b86493cb053644b6ce0febb681a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
--
-- File : AngularDimension.cdl
-- Created : Wed 13 Jan 1993
-- Author : CKY / Contract Toubro-Larsen ( Deepak PRABHU )
--
---Copyright : MATRA-DATAVISION 1993
--
class AngularDimension from IGESDimen inherits IGESEntity
---Purpose: defines AngularDimension, Type <202> Form <0>
-- in package IGESDimen
-- Used to dimension angles
uses
GeneralNote from IGESDimen,
WitnessLine from IGESDimen,
LeaderArrow from IGESDimen,
Pnt from gp,
Pnt2d from gp,
XYZ from gp,
XY from gp
is
Create returns mutable AngularDimension;
-- Specific Methods pertaining to the class
Init (me : mutable;
aNote : GeneralNote;
aLine : WitnessLine;
anotherLine : WitnessLine;
aVertex : XY;
aRadius : Real;
aLeader : LeaderArrow;
anotherLeader : LeaderArrow);
---Purpose : This method is used to set the fields of the class
-- AngularDimension
-- - aNote : General Note Entity
-- - aLine : First Witness Line Entity or Null
-- Handle
-- - anotherLine : Second Witness Line Entity or Null
-- Handle
-- - aVertex : Coordinates of vertex point
-- - aRadius : Radius of leader arcs
-- - aLeader : First Leader Entity
-- - anotherLeader : Second Leader Entity
Note (me) returns GeneralNote;
---Purpose : returns the General Note Entity of the Dimension.
HasFirstWitnessLine (me) returns Boolean;
---Purpose : returns False if theFirstWitnessLine is Null Handle.
FirstWitnessLine (me) returns WitnessLine;
---Purpose : returns the First Witness Line Entity or Null Handle.
HasSecondWitnessLine (me) returns Boolean;
---Purpose : returns False if theSecondWitnessLine is Null Handle.
SecondWitnessLine (me) returns WitnessLine;
---Purpose : returns the Second Witness Line Entity or Null Handle.
Vertex (me) returns Pnt2d;
---Purpose : returns the co-ordinates of the Vertex point as Pnt2d from gp.
TransformedVertex (me) returns Pnt2d;
---Purpose : returns the co-ordinates of the Vertex point as Pnt2d from gp
-- after Transformation. (Z = 0.0 for Transformation)
Radius (me) returns Real;
---Purpose : returns the Radius of the Leader arcs.
FirstLeader (me) returns LeaderArrow;
---Purpose : returns the First Leader Entity.
SecondLeader (me) returns LeaderArrow;
---Purpose : returns the Second Leader Entity.
fields
--
-- Class : IGESDimen_AngularDimension
--
-- Purpose : Declaration of variables specific to the definition
-- of the Class AngularDimension.
--
-- Reminder : A AngularDimension instance is defined by :
-- - General Note Entity
-- - optional First Witness Line Entity
-- - optional Second Witness Line Entity
-- - Coordinates of vertex point
-- - Radius of leader arcs
-- - First Leader Entity
-- - Second Leader Entity
-- Consists of two leaders each consisting of at least one circular arc
-- segment with an arrowhead at one end
theNote : GeneralNote;
theFirstWitnessLine : WitnessLine;
theSecondWitnessLine : WitnessLine;
theVertex : XY;
theRadius : Real;
theFirstLeader : LeaderArrow;
theSecondLeader : LeaderArrow;
end AngularDimension;
|