blob: 141fc2c7b9db39532772227e299d8f8975f6d277 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
-- File: Prs3d_SectionShapeTool.cdl
-- Created: Wed Oct 20 12:58:38 1993
-- Author: Jean-Louis FRENKEL
-- <jlf@stylox>
---Copyright: Matra Datavision 1993
generic class SectionShapeTool from Prs3d ( anyShape as any;
anyEdge as any)
uses
Pln from gp
is
Create ( TheShape: anyShape ) returns SectionShapeTool from Prs3d;
Load(me: in out; aPlane: Pln from gp);
InitEdge (me);
MoreEdge (me) returns Boolean from Standard;
NextEdge (me);
GetEdge(me) returns anyEdge;
end SectionShapeTool from Prs3d;
|