Haskell2Xml (II)

Node { key = 4, colour = Black
   , left = Node { key = 1, colour = Black
                 , left = Leaf, right = Leaf }
   , right = Leaf }

Objekt (oben), Repräsentation (unten)

<Tree-int-XML>
 <Node-int>
    <int value="4" /> <Black />
    <Node-int >
      <int value="1" /> <Black /><Leaf /><Leaf/>
    </Node-int>
    <Leaf/>
  </Node-int>
</Tree-int-XML>