mgkit/src/BinaryTree.i3


 Copyright (C) 1992, Digital Equipment Corporation 
 All rights reserved. 
 See the file COPYRIGHT for a full description. 
 
 by Steve Glassman and Stephen Harrison 
 Last modified on Wed May 20 00:46:17 1992 by steveg 

INTERFACE BinaryTree;

<* PRAGMA LL *>

IMPORT GenericTree;

TYPE
  V <: GenericTree.V;
  T <: PublicT;
  PublicT = GenericTree.GenericTree OBJECT
    l, r: T;
  METHODS
    <* LL = v.mu *>
    set(v: V; lr: LR; ch: T);
  END;

  LR = {Left, Right};

END BinaryTree.