blob: cc163c83d8a5379e71fea0409e0eeca6244517f3 (
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
|
--
-- File : SolidOfLinearExtrusion.cdl
-- Created : Sat 9 Jan 1993
-- Author : CKY / Contract Toubro-Larsen ( SIVA )
--
---Copyright : MATRA-DATAVISION 1993
--
class SolidOfLinearExtrusion from IGESSolid inherits IGESEntity
---Purpose: defines SolidOfLinearExtrusion, Type <164> Form Number <0>
-- in package IGESSolid
-- Solid of linear extrusion is defined by translatin an
-- area determined by a planar curve
uses
Dir from gp,
XYZ from gp
is
Create returns mutable SolidOfLinearExtrusion;
-- Specific Methods pertaining to the class
Init (me : mutable;
aCurve : IGESEntity;
aLength : Real;
aDirection : XYZ);
---Purpose : This method is used to set the fields of the class
-- SolidOfLinearExtrusion
-- - aCurve : the planar curve that is to be translated
-- - aLength : the length of extrusion
-- - aDirection : the vector specifying the direction of extrusion
-- default (0,0,1)
Curve (me) returns IGESEntity;
---Purpose : returns the planar curve that is to be translated
ExtrusionLength (me) returns Real;
---Purpose : returns the Extrusion Length
ExtrusionDirection (me) returns Dir;
---Purpose : returns the Extrusion direction
TransformedExtrusionDirection (me) returns Dir;
---Purpose : returns ExtrusionDirection after applying TransformationMatrix
fields
--
-- Class : IGESSolid_SolidOfLinearExtrusion
--
-- Purpose : Declaration of variables specific to the definition
-- of the Class SolidOfLinearExtrusion.
--
-- Reminder : A SolidOfLinearExtrusion instance is defined by :
-- a planar curve(Curve) that is translated by a distance(Length)
-- in the direction specified by a vector(I1,J1,K1).
--
theCurve : IGESEntity;
-- the planar curve
theLength : Real;
-- the length of the extrusion
theDirection : XYZ;
-- the vector defining the direction of the extrusion
end SolidOfLinearExtrusion;
|
