7fd59977 |
1 | -- File: QANewBRepNaming_Prism.cdl |
2 | -- Created: Fri Nov 5 14:29:04 1999 |
3 | -- Author: Vladislav ROMASHKO |
4 | -- <v-romashko@opencascade.com> |
5 | ---Copyright: Open CASCADE 2003 |
6 | |
7 | |
8 | class Prism from QANewBRepNaming inherits TopNaming from QANewBRepNaming |
9 | |
10 | ---Purpose: To load the Prism results |
11 | |
12 | uses |
13 | |
14 | MakePrism from BRepPrimAPI, |
15 | Label from TDF, |
16 | Shape from TopoDS |
17 | |
18 | is |
19 | |
20 | Create returns Prism from QANewBRepNaming; |
21 | |
22 | Create(ResultLabel : Label from TDF) |
23 | returns Prism from QANewBRepNaming; |
24 | |
25 | Init(me : in out; ResultLabel : Label from TDF); |
26 | |
27 | |
28 | Load (me; mkPrism : in out MakePrism from BRepPrimAPI; |
29 | basis : in Shape from TopoDS); |
30 | ---Purpose: Loads the prism in the data framework |
31 | |
32 | Bottom (me) |
33 | ---Purpose : Returns the insertion label of the bottom face of the Prism. |
34 | returns Label from TDF; |
35 | |
36 | Top (me) |
37 | ---Purpose : Returns the insertion label of the top face of the Prism. |
38 | returns Label from TDF; |
39 | |
40 | Lateral (me) |
41 | ---Purpose: Returns the insertion label of the lateral face of the Prism. |
42 | returns Label from TDF; |
43 | |
44 | Degenerated (me) |
45 | ---Purpose: Returns the insertion label of the degenerated face of the Prism. |
46 | returns Label from TDF; |
47 | |
48 | Dangle (me) |
49 | ---Purpose: Returns the insertion label of the degenerated face of the Prism. |
50 | returns Label from TDF; |
51 | |
52 | Content (me) |
53 | ---Purpose: Returns the insertion label of the degenerated face of the Prism. |
54 | returns Label from TDF; |
55 | |
56 | end Prism; |