blob: b60107610a0957c799bfdde8d0e43dd003dda71b (
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
|
-- File: VrmlConverter_WFShape.cdl
-- Created: Fri Feb 21 13:27:12 1997
-- Author: Alexander BRIVIN
-- <brivin@minox.nizhny.matra-dtv.fr>
---Copyright: Matra Datavision 1997
---Purpose: WFShape - computes the wireframe presentation of
-- compound set of faces, edges and vertices by
-- displaying a given number of U and/or V isoparametric
-- curves converts this one into VRML objects and writes (adds)
-- them into anOStream.
-- All requested properties of the representation are
-- specify in aDrawer.
-- This kind of the presentation is converted into
-- IndexedLineSet and PointSet ( VRML ).
-- The isoparametric curves are drawn with respect
-- to a given number of points.
class WFShape from VrmlConverter
uses
Shape from TopoDS,
Length from Quantity,
Drawer from VrmlConverter
is
Add(myclass; anOStream: in out OStream from Standard;
aShape : Shape from TopoDS;
aDrawer : Drawer from VrmlConverter);
end WFShape;
|
