blob: e04a5a83f427b85ca9295e809c80f733064db8fe (
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
|
-- File: Prs3d_Arrow.cdl
-- Created: Thu Apr 15 10:20:58 1993
-- Author: Jean-Louis Frenkel
-- <jlf@phylox>
---Copyright: Matra Datavision 1993
class Arrow from Prs3d
inherits Root from Prs3d
---Purpose: provides class methods to draw an arrow at a given
-- location, along a given direction and using a given
-- angle.
uses
Pnt from gp,
Dir from gp,
PlaneAngle from Quantity,
Length from Quantity,
Presentation from Prs3d
is
Draw(myclass; aPresentation: Presentation from Prs3d;
aLocation: Pnt from gp;
aDirection: Dir from gp;
anAngle: PlaneAngle from Quantity;
aLength: Length from Quantity);
---Purpose: Defines the representation of the arrow defined by
-- the location point aLocation, the direction
-- aDirection and the length aLength.
-- The angle anAngle defines the angle of opening of the arrow head.
-- The presentation object aPresentation stores the
-- information defined in this framework.
Fill(myclass; aPresentation: Presentation from Prs3d;
aLocation: Pnt from gp;
aDirection: Dir from gp;
anAngle: PlaneAngle from Quantity;
aLength: Length from Quantity);
---Purpose: Defines the representation of the arrow defined by
-- the location point aLocation, the direction vector
-- aDirection and the length aLength.
-- The angle anAngle defines the angle of opening of
-- the arrow head, and the drawer aDrawer specifies
-- the display attributes which arrows will have.
-- With this syntax, no presentation object is created.
end Arrow from Prs3d;
|
