added tree.hs (starting off)