Create Tree.hs