1 -- File: BezierSurface.cdl
2 -- Created: Fri May 22 10:41:09 1992
3 -- Author: Jean Claude VAUTHIER
5 ---Copyright: Matra Datavision 1992
12 inherits Surface from DrawTrSurf
14 uses BezierSurface from Geom,
16 MarkerShape from Draw,
23 Create (S : BezierSurface from Geom)
25 -- creates a drawable Bezier curve from a Bezier curve of
27 returns mutable BezierSurface from DrawTrSurf;
31 Create (S : BezierSurface from Geom;
32 NbUIsos, NbVIsos : Integer;
33 BoundsColor, IsosColor, PolesColor : Color from Draw;
34 ShowPoles : Boolean; Discret : Integer;Deflection : Real;
36 returns mutable BezierSurface from DrawTrSurf;
39 DrawOn (me; dis : in out Display from Draw)
43 ShowPoles (me : mutable)
47 ClearPoles (me : mutable)
51 FindPole(me; X,Y : Real; D : Display from Draw; Prec : Real;
52 UIndex, VIndex : in out Integer)
56 SetPolesColor (me : mutable; aColor : Color from Draw)
61 PolesColor (me) returns Color from Draw
65 Copy(me) returns mutable Drawable3D from Draw
66 ---Purpose: For variable copy.
73 polesLook : Color from Draw;