blob: ada1ef5bf25c6cf3b472d7b6ba648b70ce846ba8 (
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
|
-- File: StdPrs_WFSurface.cdl
-- Created: Fri Aug 4 11:30:13 1995
-- Author: Modelistation
-- <model@metrox>
---Copyright: Matra Datavision 1995
class WFSurface from StdPrs
inherits Root from Prs3d
uses
HSurface from Adaptor3d,
Presentation from Prs3d,
Drawer from Prs3d
is
--- Purpose: Draws a surface by drawing the isoparametric curves with respect to
-- a fixed number of points given by the Drawer.
-- The number of isoparametric curves to be drawn and their color are
-- controlled by the furnished Drawer.
Add(myclass; aPresentation: Presentation from Prs3d;
aSurface : HSurface from Adaptor3d;
aDrawer : Drawer from Prs3d);
end WFSurface from StdPrs;
|