core/interface/Sequence.tcl


@interface Sequence : Object {
  { 
    value counter length
  }
  - next ;
  - value ;
  - value: aValue ;
}