blob: f0eefb82341e93f9d49caf2cd14978f90642e599 (
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
|
-- File: DsgPrs_EqualRadiusPresentation.cdl
-- Created: Sat Jan 17 14:13:23 1998
-- Author: Julia GERASIMOVA
-- <jgv@orthodox.nnov.matra-dtv.fr>
---Copyright: Matra Datavision 1998
class EqualRadiusPresentation from DsgPrs
---Purpose: A framework to define display of equality in radii.
uses
Presentation from Prs3d,
Drawer from Prs3d,
Pnt from gp,
Plane from Geom
is
Add( myclass; aPresentation : Presentation from Prs3d;
aDrawer : Drawer from Prs3d;
FirstCenter : Pnt from gp;
SecondCenter : Pnt from gp;
FirstPoint : Pnt from gp;
SecondPoint : Pnt from gp;
Plane : Plane from Geom );
---Purpose: Adds the points FirstCenter, SecondCenter,
-- FirstPoint, SecondPoint, and the plane Plane to the
-- presentation object aPresentation.
-- The display attributes of these elements is defined by
-- the attribute manager aDrawer.
-- FirstCenter and SecondCenter are the centers of the
-- first and second shapes respectively, and FirstPoint
-- and SecondPoint are the attachment points of the radii to arcs.
end EqualRadiusPresentation;
|