blob: 8781ec7b1a5390322467d84dae288b63c71b57cf (
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
|
-- File: DrawDim_PlanarDimension.cdl
-- Created: Tue Jan 9 16:44:39 1996
-- Author: Denis PASCAL
-- <dp@zerox>
---Copyright: Matra Datavision 1996
deferred class PlanarDimension from DrawDim inherits Dimension from DrawDim
---Purpose:
uses Face from TopoDS
is
SetPlane (me : mutable; plane : Face from TopoDS);
GetPlane (me)
returns Face from TopoDS;
-- Point (myclass; s : Shape from TopoDS; p : in out Pnt from gp)
-- returns Boolean from Standard;
-- Line (myclass; s : Shape from TopoDS; l : in out Lin from gp)
-- returns Boolean from Standard;
-- Circle (myclass; s : Shape from TopoDS; c : in out Circ from gp)
-- returns Boolean from Standard;
-- Ellipse (myclass; s : Shape from TopoDS; c : in out Elips from gp)
-- returns Boolean from Standard;
fields
myPlane : Face from TopoDS is protected;
end PlanarDimension;
|
