7fd59977 |
1 | -- File: StdPrs_ToolShadedShape.cdl |
2 | -- Created: Wed Oct 27 09:26:37 1993 |
3 | -- Author: Jean-Louis FRENKEL |
4 | -- <jlf@stylox> |
5 | ---Copyright: Matra Datavision 1993 |
6 | |
7 | |
8 | class ToolShadedShape from StdPrs inherits ShapeTool from BRepMesh |
9 | |
10 | uses |
11 | Shape from TopoDS, |
12 | Face from TopoDS, |
13 | Array1OfDir from TColgp, |
14 | Connect from Poly, |
15 | Triangulation from Poly, |
16 | Location from TopLoc |
17 | is |
18 | |
19 | IsClosed(myclass; aShape: Shape from TopoDS) returns Boolean from Standard; |
20 | |
21 | Triangulation(myclass; aFace: Face from TopoDS; |
22 | loc : out Location from TopLoc) |
23 | returns Triangulation from Poly; |
24 | |
25 | Normal(myclass; aFace: Face from TopoDS; |
26 | PC : in out Connect from Poly; |
27 | Nor : out Array1OfDir from TColgp); |
28 | |
29 | end ToolShadedShape from StdPrs; |