来源：https://stackoverflow.com/questions/63547939/haskell-how-to-create-a-maptree-function-based-on-a-foldr-of-a-binarytree 标签 haskell tree binary fold map-function
