blob: 257cd442c930adda6e951b940d898ad6559239f8 (
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
|
-- File: PGeom2d_Vector.cdl
-- Created: Tue Apr 6 17:21:36 1993
-- Author: Philippe DAUTRY
-- <fid@mastox>
-- Copyright: Matra Datavision 1993
deferred class Vector from PGeom2d inherits Geometry from PGeom2d
---Purpose : Defines a vector in 3D space.
-- It can be a Direction (unitary vector) or a vector
-- with magnitude.
--
---See Also : Vector from Geom2d.
uses Vec2d from gp
is
Initialize;
---Purpose: Initializes the field(s) with default value(s).
---Level: Advanced
Initialize(aVec: Vec2d from gp);
---Purpose: Initializes the field vec with <aVec>.
---Level: Advanced
Vec (me: mutable; aVec: Vec2d from gp);
---Purpose : Set the field vec.
---Level: Advanced
Vec (me) returns Vec2d from gp;
---Purpose : Returns the value of the field vec.
---Level: Advanced
fields
vec : Vec2d from gp is protected;
end;
|