Übungen Rekursionmuster

Listen: Muster anwenden (append)

Bäume: Muster definieren und anwenden

data Tree a 
   = Branch (Tree a) a (Tree a) | Leaf
tfold ( branch ::             ) (leaf ::   )
   :: Tree a -> b