Add tree_view_sample.hs