interface Tree<K>; class Branch<K> implements Tree<K>; class Leaf<K> implements Tree<K>;
data Tree k = Leaf { ... }
  | Branch { left :: Tree k , ... 
           , right :: Tree k }
Übung: Anzahl aller Blätter, Summe aller Schlüssel (Typ?),
der größte Schlüssel (Typ?)