src/IntPatch/IntPatch_PolyLine.cdl

   1 -- File:      IntPatch_PolyLine.cdl
   2 -- Created:   Fri Jan 29 17:14:59 1993
   3 -- Author:    Isabelle GRIGNON
   4 ---Copyright: Matra Datavision 1993
   5
   6 class PolyLine from IntPatch
   7
   8 inherits Polygo from IntPatch
   9
  10 uses Pnt2d from gp,
  11      Box2d from Bnd,
  12      IType from IntPatch,
  13      WLine from IntPatch,
  14      RLine from IntPatch
  15
  16 is
  17
  18     Create
  19     returns PolyLine from IntPatch;
  20
  21     Create (InitDefle: Real from Standard)
  22         returns PolyLine from IntPatch;
  23
  24     SetWLine(me: in out; OnFirst: Boolean from Standard; Line: WLine from IntPatch)
  25         is static;
  26
  27     SetRLine(me: in out; OnFirst: Boolean from Standard; Line: RLine from IntPatch)
  28         is static;
  29
  30     Prepare(me: in out)
  31         is static private;
  32
  33     ResetError(me: in out);
  34
  35     NbPoints(me) returns Integer;
  36
  37     Point(me; Index : Integer)
  38         returns Pnt2d from gp;
  39
  40
  41 fields
  42
  43     pnt      : Pnt2d   from gp;
  44     typ      : IType   from IntPatch;
  45     onfirst  : Boolean from Standard;
  46     wpoly    : WLine from IntPatch;
  47     rpoly    : RLine from IntPatch;
  48
  49 end PolyLine;