RosettaCodeData/Task/Visualize-a-tree/Clojure/visualize-a-tree.clj

(use 'vijual)

(draw-tree [[:A] [:B] [:C [:D [:E] [:F]] [:G]]])