blob: 68843ef8b1a1eee8e738ef239219e3e8e6c458e4 (
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
|
-- File: VrmlConverter_DeflectionCurve.cdl
-- Created: Tue Apr 29 14:15:41 1997
-- Author: Alexander BRIVIN
-- <brivin@minox.nizhny.matra-dtv.fr>
---Copyright: Matra Datavision 1997
class DeflectionCurve from VrmlConverter
---Purpose: DeflectionCurve - computes the presentation of
-- objects to be seen as curves, converts this one into
-- VRML objects and writes (adds) into
-- anOStream. All requested properties of the
-- representation are specify in aDrawer.
-- This kind of the presentation
-- is converted into IndexedLineSet ( VRML ).
-- The computation will be made according to a maximal
-- chordial deviation.
uses
Length from Quantity,
Curve from Adaptor3d,
Drawer from VrmlConverter
is
Add(myclass; anOStream: in out OStream from Standard;
aCurve : in out Curve from Adaptor3d;
aDrawer : Drawer from VrmlConverter);
---Purpose: adds to the OStream the drawing of the curve aCurve with
-- respect to the maximal chordial deviation defined
-- by the drawer aDrawer.
-- The aspect is defined by LineAspect in aDrawer.
--
Add(myclass; anOStream: in out OStream from Standard;
aCurve : in out Curve from Adaptor3d;
U1, U2 : Real from Standard;
aDrawer : Drawer from VrmlConverter);
---Purpose: adds to the OStream the drawing of the curve aCurve with
-- respect to the maximal chordial deviation defined
-- by the drawer aDrawer.
-- The aspect is defined by LineAspect in aDrawer.
-- The drawing will be limited between the points of parameter
-- U1 and U2.
Add(myclass; anOStream: in out OStream from Standard;
aCurve : in out Curve from Adaptor3d;
aDeflection : Real from Standard;
aLimit : Real from Standard);
---Purpose: adds to the OStream the drawing of the curve aCurve with
-- respect to the maximal chordial deviation aDeflection.
-- The aspect is the current aspect
Add(myclass; anOStream: in out OStream from Standard;
aCurve : in out Curve from Adaptor3d;
aDeflection : Real from Standard;
aDrawer : Drawer from VrmlConverter);
---Purpose: adds to the OStream the drawing of the curve aCurve with
-- respect to the maximal chordial deviation aDeflection.
-- The aspect is the current aspect
Add(myclass; anOStream: in out OStream from Standard;
aCurve : in out Curve from Adaptor3d;
U1, U2 : Real from Standard;
aDeflection : Real from Standard);
---Purpose: adds to the OStream the drawing of the curve aCurve with
-- respect to the maximal chordial deviation aDeflection.
-- The aspect is the current aspect
-- The drawing will be limited between the points of parameter
-- U1 and U2.
end DeflectionCurve;
|
