[Haskell-beginners] Recursive XML schema and feeding into data model