src/IntStart/IntStart_TopolTool.cdl

   1 -- File:        TopolTool.cdl
   2 -- Created:     Tue Nov  3 10:59:04 1992
   3 -- Author:      Jacques GOUSSARD
   4 --              <jag@sdsun2>
   5 ---Copyright:    Matra Datavision 1992
   6
   7
   8
   9 deferred generic class TopolTool from IntStart
  10            ( TheVertex as any;
  11              TheArc    as any
  12            )
  13
  14
  15     ---Purpose: Template class for an iterator the restriction of
  16     --          a surface.
  17
  18
  19 inherits TShared from MMgt
  20
  21 raises DomainError from Standard
  22
  23 is
  24
  25 -- Arc iterator
  26
  27     Init(me: mutable)
  28
  29         ;
  30
  31
  32     More(me: mutable)
  33
  34         returns Boolean from Standard
  35         ;
  36
  37
  38     Value(me: mutable)
  39
  40         returns any TheArc
  41         ;
  42
  43
  44     Next(me: mutable)
  45
  46         ;
  47
  48
  49 -- Iterator on the vertex of an arc of restriction
  50
  51
  52     Initialize(me: mutable; A:TheArc)
  53
  54         ;
  55
  56
  57     InitVertexIterator(me: mutable)
  58
  59         ;
  60
  61
  62     MoreVertex(me: mutable)
  63
  64         returns Boolean from Standard
  65         ;
  66
  67
  68
  69     Vertex(me: mutable)
  70         returns any TheVertex
  71         ;
  72
  73
  74     NextVertex(me: mutable)
  75
  76         ;
  77
  78
  79
  80     Identical(me: mutable; V1,V2: TheVertex)
  81
  82         ---Purpose: Returns True if the vertices V1 and V2 are identical.
  83         --          This method does not take the orientation of the
  84         --          vertices in account.
  85
  86         returns Boolean;
  87
  88
  89
  90 end TopolTool;