add sexml example

xml written in s-expr
idiomatism: remove print and use zipWith

* the output is now a bareword list
* the sizes function were replaced by a zipoWith comprehension