Aufgabe: Besucher für Bäume

data Tree k = Leaf { key  :: k }
  | Branch { left :: Tree k
           , right :: Tree k }

• das entsprechende Kompositum

  (alle Attribute final, Konstruktoren, toString())

• Methode zum Erzeugen von Testdaten

  static Tree<Integer> full (int h);

• das passende Besucher-Muster
• Anwendung: Zählen von Blättern usw.