小编vs9*_*734的帖子

如果我将玫瑰树定义为

data RTree = Node a [RTree a]
    deriving(Show, Eq)

我该如何为它定义地图功能？map函数定义为

map_rose_tree :: (a -> b) -> RTree a -> RTree b