blob: b921f4de9ce468018365d1b948661bbae044e3a0 (
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
|
--
-- File : Node.cdl
-- Created : Mon 11 Jan 1993
-- Author : CKY / Contract Toubro-Larsen ( Arun MENON )
--
---Copyright : MATRA-DATAVISION 1993
--
class Node from IGESAppli inherits IGESEntity
---Purpose: defines Node, Type <134> Form <0>
-- in package IGESAppli
-- Geometric point used in the definition of a finite element.
uses
XYZ from gp,
Pnt from gp,
TransfEntity from IGESData,
TransformationMatrix from IGESGeom
is
Create returns mutable Node;
-- Specific Methods pertaining to the class
Init (me : mutable;
aCoord : XYZ;
aCoordSystem : TransformationMatrix);
---Purpose : This method is used to set the fields of the class Node
-- - aCoord : Nodal Coordinates
-- - aCoordSystem : the Nodal Displacement Coordinate
-- System Entity (default 0 is Global
-- Cartesian Coordinate system)
Coord (me) returns Pnt;
---Purpose : returns the nodal coordinates
System (me) returns TransfEntity;
---Purpose : returns TransfEntity if a Nodal Displacement Coordinate
-- System Entity is defined
-- else (for Global Cartesien) returns Null Handle
SystemType (me) returns Integer;
---Purpose : Computes & returns the Type of Coordinate System :
-- 0 GlobalCartesian, 1 Cartesian, 2 Cylindrical, 3 Spherical
TransformedNodalCoord (me) returns Pnt;
---Purpose : returns the Nodal coordinates after transformation
fields
--
-- Class : IGESAppli_Node
--
-- Purpose : Declaration of variables specific to the definition
-- of the Class Node.
--
-- Reminder : A Node instance is defined by :
-- - Nodal Coordinates
-- - the Nodal Displacement Coordinate System Entity
theCoord : XYZ;
theSystem : TransformationMatrix;
end Node;
|
