createInternalNode <- # # Simple function that creates an XML/HTML tree # consisting of an unordered list (